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: BLRLABLD

Package: IHS Changes To Lab

Routine: BLRLABLD


Information

BLRLABLD ; IHS/DIR/FJE - INTERMEC 7421 LABEL PRINT BARCODE/PLAIN 10:16 ; [ 03/18/1999 9:09 AM ]

Source Information

Source file <BLRLABLD.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 PRT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *2,"R",*3
  • Line Location: BAR+1
Function Call: WRITE
  • Prompt: *2,*27,"E4",*24,LRACC,*3
  • Line Location: BAR+2
Function Call: WRITE
  • Prompt: *2,!,LRDAT,!,LRTOP,*3
  • Line Location: BAR+3
Function Call: WRITE
  • Prompt: *2,!,$E(PNM,1,27),!,HRCN,!,"W:"_$E(LRLLOC,1,7)_" B:"_LRRB,*3
  • Line Location: BAR+4
Function Call: WRITE
  • Prompt: *2,!,$E("0000",$L(LRAN),4)_LRAN,*3
  • Line Location: BAR+5
Function Call: WRITE
  • Prompt: *2,!,"Order#:",LRCE,!,$E(LRTXT,1,32)
  • Line Location: BAR+6
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>32
  • Line Location: BAR+6
Function Call: WRITE
  • Prompt: *2,!,BLRURG,*3
  • Line Location: BAR+8
Function Call: WRITE
  • Prompt: *2,!,LRACC,*3
  • Line Location: BAR+9
Function Call: WRITE
  • Prompt: *2,!,LRDAT,*3
  • Line Location: BAR+10
Function Call: WRITE
  • Prompt: *2,!,LRACC,*3
  • Line Location: BAR+11
Function Call: WRITE
  • Prompt: *2,!,$E(PNM,1,27),!,HRCN,!,"W:"_$E(LRLLOC,1,7)_" B:"_LRRB,*3
  • Line Location: BAR+12
Function Call: WRITE
  • Prompt: *2,!,LRDAT,!,$E(LRTXT,1,32)
  • Line Location: BAR+13
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>32
  • Line Location: BAR+13
Function Call: WRITE
  • Prompt: *2,*23,*15,"S30",*12,*3
  • Line Location: BAR+14
Function Call: WRITE
  • Prompt: *2,"R",*3
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: *2,*27,"E5",*24,!,LRACC,*3
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: *2,!,LRDAT,!,LRTOP,*3
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: *2,!,$E(PNM,1,27),!,HRCN,!,"DOB:"_$E(Y,4,5)_"/"_$E(Y,6,7)_"/"_$E(Y,2,3),!,"W:"_$E(LRLLOC,1,7)_" B:"_LRRB,*3
  • Line Location: PRT+5
Function Call: WRITE
  • Prompt: *2,!,"Order#:",LRCE,!,$E(LRTXT,1,32)
  • Line Location: PRT+6
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>32
  • Line Location: PRT+6
Function Call: WRITE
  • Prompt: *2,!,BLRURG,*3
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: *2,!,LRACC,*3
  • Line Location: PRT+9
Function Call: WRITE
  • Prompt: *2,!,LRDAT,*3
  • Line Location: PRT+10
Function Call: WRITE
  • Prompt: *2,!,LRACC,*3
  • Line Location: PRT+11
Function Call: WRITE
  • Prompt: *2,!,$E(PNM,1,27),!,HRCN,!,"W:"_$E(LRLLOC,1,7)_" B:"_LRRB,*3
  • Line Location: PRT+12
Function Call: WRITE
  • Prompt: *2,!,LRDAT,!,$E(LRTXT,1,32)
  • Line Location: PRT+13
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>32
  • 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+7, PRT+7

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+7*, BAR+8, BAR+15!, PRT+7*, PRT+8, PRT+15!
>> DOB PRT+4
>> FLAG EN+5*, FLAG
>> HRCN BAR+4, BAR+12, PRT+5, PRT+12
I1 EN+1~, EN+5*
J EN+1~, EN+5*
>> LRACC BAR+2, BAR+9, BAR+11, PRT+2, PRT+9, PRT+11
>> LRAN BAR+5
>> LRBAR FLAG+2
>> LRCE BAR+6, PRT+6
>> LRDAT BAR+3, BAR+10, BAR+13, PRT+3, PRT+10, PRT+13
>> LRDTXT FLAG*
>> LRLLOC BAR+4, BAR+12, PRT+5, PRT+12
>> LRLPNM FLAG+1*
>> LRRB EN+3*, BAR+4, BAR+12, PRT+5, PRT+12
>> LRTOP BAR+3, PRT+3
>> LRTS( EN+5
>> LRTXT EN+5*, FLAG, BAR+6, BAR+13, PRT+6, PRT+13
>> LRURG0 BAR+7*, PRT+7*
>> PNM FLAG+1, BAR+4, BAR+12, PRT+5, PRT+12
U BAR+7, PRT+7
>> X EN+2*, PRT+4*
>> Y 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