Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  Local Variables |  All
Print Page as PDF
Routine: LRBARBT

Package: Lab Service

Routine: LRBARBT


Information

LRBARBT ; IHS/DIR/FJE - TEST PRINT FOR INTERMEC 4100 10 PART LABEL FORMAT 12:36 ; [ 8/29/94 ]

Source Information

Source file <LRBARBT.m>

Entry Points

Name Comments DBIA/ICR reference
TEST ;prints a test label after programming the Intermec
PRT ;programs the Intermec for print mode
FLAG

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *2,"R",*3
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>19
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: "STAT"
  • Condition for execution: $D(LRURG)#2
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: *2,*27,"E4",*24,!,LRACC,!,LRDAT,!,LRTOP,!,$E(PNM,1,27),!,HRCN,!,"W:",$E(LRLLOC,1,9),!,$E("0000",$L(LRAN),4)_LRAN,!,"Order#:",LRCE,!,$E(LRTXT,1,19)
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>19
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: "STAT"
  • Condition for execution: $D(LRURG)#2
  • Line Location: PRT+3
Function Call: WRITE
  • Prompt: *2,"Order#:",LRCE,!,$E(LRTXT,1,26)
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: "..."
  • Condition for execution: $L(LRTXT)>26
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: !
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: "STAT"
  • Condition for execution: $D(LRURG)#2
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: *3
  • Line Location: PRT+8
Function Call: WRITE
  • Prompt: *2,!,LRACC,!,LRTOP,!,LRACC,!,LRTOP,!,LRACC,!,LRLPNM,!,HRCN,!,LRDAT,!,$S($P(LRTXT,";",3)'="":$P(LRTXT,";",3),1:LRZTXT),!,LRACC,!,LRLPNM,!,HRCN,!,LRDAT,!,$S($P(LRTXT,";",4)'="":$P(LRTXT,";",4),1:LRZTXT),*3,*2,*23,*15,"S30",*12,*3
  • Line Location: PRT+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
FLAG FLAG, PRT+12!
HRCN TEST+2*, PRT+3, PRT+5, PRT+7, PRT+10, PRT+12!
LRACC TEST+2*, PRT+3, PRT+5, PRT+7, PRT+10, PRT+12!
LRAN TEST+2*, PRT+3, PRT+12!
LRCE TEST+2*, PRT+3, PRT+8, PRT+12!
LRDAT TEST+2*, PRT+3, PRT+5, PRT+7, PRT+10, PRT+12!
>> LRLLOC TEST+2*, PRT+3, PRT+7
LRLPNM TEST+3*, FLAG+1*, PRT+5, PRT+7, PRT+10, PRT+12!
LRTOP TEST+2*, PRT+3, PRT+5, PRT+7, PRT+10, PRT+12!
LRTXT TEST+2*, FLAG, PRT+3, PRT+5, PRT+7, PRT+8, PRT+10, PRT+12!
LRURG TEST+2*, PRT+3, PRT+8, PRT+12!
LRZTXT FLAG*, PRT+5, PRT+7, PRT+10, PRT+12!
PNM TEST+2*, TEST+3, FLAG+1, PRT+3, PRT+7, PRT+12!
SSN PRT+12!
Info |  Source |  Entry Points |  Interaction Calls |  Local Variables |  All