Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: BLRLABLE

Package: IHS Changes To Lab

Routine: BLRLABLE


Information

BLRLABLE ; IHS/DIR/FJE - INTERMEC 4100 2 LABEL PRINT BARCODE/PLAIN 10:16 ; [ 10/12/1999 12:08 PM ]

Source Information

Source file <BLRLABLE.m>

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA Fileman 1 ^%DT  

Entry Points

Name Comments DBIA/ICR reference
PRT ;plain label..no barcode
FLAG
EN
BAR ;barcode label..accession number barcoded

External References

Name Field # of Occurrence
^%DT BAR+13, PRT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *2,"R",*3
  • Line Location: BAR+1
Function Call: WRITE
  • Prompt: *2,*27,"E3",*24,!,$E(LRTXT,1,32)
  • Line Location: BAR+2
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>32
  • Line Location: BAR+2
Function Call: WRITE
  • Prompt: *3
  • Line Location: BAR+2
Function Call: WRITE
  • Prompt: *2,!,LRTOP,!,"O#:",LRCE,!,LRACC,!,LRDAT,!,HRCN,!,"W:"_$E(LRLLOC,1,9),*3
  • Line Location: BAR+3
Function Call: WRITE
  • Prompt: *2,!,$E(PNM,1,27),*3
  • Line Location: BAR+4
Function Call: WRITE
  • Prompt: *2,!,BLRURG,*3
  • Line Location: BAR+6
Function Call: WRITE
  • Prompt: *2,!,$E("0000",$L(LRAN),4)_LRAN,*3
  • Line Location: BAR+7
Function Call: WRITE
  • Prompt: *2,!,LRDOC,*3
  • Line Location: BAR+12
Function Call: WRITE
  • Prompt: *2,!,$E(Y,4,5)_"/"_$E(Y,6,7)_"/"_($E(Y,1,3)+1700),*3
  • Line Location: BAR+14
Function Call: WRITE
  • Prompt: *2,*23,*15,"S30",*12,*3
  • Line Location: BAR+15
Function Call: WRITE
  • Prompt: *2,"R",*3
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: *2,*27,"E2",*24,!,$E(LRTXT,1,32)
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>32
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: *3
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: *2,!,"O#:",LRCE,!,"W:"_$E(LRLLOC,1,9),*3
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: *2,!,HRCN,!,"DOB:"_$E(Y,4,5)_"/"_$E(Y,6,7)_"/"_($E(Y,1,3)+1700),*3
  • Line Location: PRT+5
Function Call: WRITE
  • Prompt: *2,!,PNM,!,LRTOP,!,LRDAT,!,LRACC,*3
  • Line Location: PRT+6
Function Call: WRITE
  • Prompt: *2,!,BLRURG,*3
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: *2,!,LRDOC,*3
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: *2,*23,*15,"S30",*12,*3
  • Line Location: PRT+14

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RM" EN+2
^LAB(62.05 - [#62.05] BAR+5, PRT+7
^LRO(68 - [#68] BAR+9, PRT+10
^VA(200 - [#200] BAR+10, PRT+11

Label References

Name Line Occurrences
BAR FLAG+2
PRT FLAG+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BLRURG EN+4*, FLAG+3!, BAR+5*, BAR+6, BAR+16!, PRT+7*, PRT+8
>> DOB BAR+13, PRT+4
>> FLAG EN+5*, FLAG
>> HRCN BAR+3, PRT+5
I1 EN+1~, EN+5*
J EN+1~, EN+5*
>> LRAA BAR+8, BAR+9, PRT+9, PRT+10
>> LRACC BAR+3, PRT+6
>> LRAD BAR+8, BAR+9, PRT+9, PRT+10
>> LRAN BAR+7, BAR+8, BAR+9, PRT+9, PRT+10
>> LRBAR FLAG+2
>> LRCE BAR+3, PRT+3
>> LRDAT BAR+3, PRT+6
>> LRDOC BAR+8, BAR+9*, BAR+10*, BAR+11*, BAR+12, PRT+9, PRT+10*, PRT+11*, PRT+12*, PRT+13
>> LRDTXT FLAG*
>> LRLLOC BAR+3, PRT+3
>> LRLPNM FLAG+1*
>> LRRB EN+3*
>> LRTOP BAR+3, PRT+6
>> LRTS( EN+5
>> LRTXT EN+5*, FLAG, BAR+2, PRT+2
>> LRURG0 BAR+5*, PRT+7*
>> PNM FLAG+1, BAR+4, PRT+6
U BAR+5, BAR+9, BAR+10, PRT+7, PRT+10, PRT+11
>> X EN+2*, BAR+13*, PRT+4*
>> Y BAR+14, PRT+5
>> ZTQUEUED EN
>> ZTREQ EN*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All