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
Print Page as PDF
Routine: LRLABEL1

Package: Lab Service

Routine: LRLABEL1


Information

LRLABEL1 ;SLC/TGA - PRINTS LABELS 2X5 UNEVEN ;2/6/91 08:18

Source Information

Source file <LRLABEL1.m>

Entry Points

Name Comments DBIA/ICR reference
1
T
SKIP
T1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$E(PNM,1,$S($L(LRINFW):18,1:28)),@$S($L(LRINFW):"?19",1:"?28"),LRINFW
  • Line Location: T+0
Function Call: WRITE
  • Prompt: ?30,LRACC
  • Line Location: T+1
Function Call: WRITE
  • Prompt: ?(J*22+27),LRACC
  • Line Location: T+2
Function Call: WRITE
  • Prompt: !,SSN," W:",$E(LRLLOC,1,17),?33,LRDAT
  • Line Location: T+3
Function Call: WRITE
  • Prompt: ?(J*22+27),LRDAT
  • Line Location: T+3
Function Call: WRITE
  • Prompt: !
  • Line Location: T+4
Function Call: WRITE
  • Prompt: LRPREF
  • Line Location: T+5
Function Call: WRITE
  • Prompt: LRTOP,?15," Order:",LRCE
  • Line Location: SKIP+0
Function Call: WRITE
  • Prompt: ?(J*22+27),$E(LRLPNM,1,17)
  • Line Location: SKIP+2
Function Call: WRITE
  • Prompt: !,LRTXT
  • Line Location: SKIP+4
Function Call: WRITE
  • Prompt: ?(J*22+27),$E(LRTOP,1,17)
  • Line Location: SKIP+5
Function Call: WRITE
  • Prompt: !,$E(PNM,1,28)
  • Line Location: T1+1
Function Call: WRITE
  • Prompt: ?30,LRACC
  • Line Location: T1+1
Function Call: WRITE
  • Prompt: ?(J*22+27),LRACC
  • Line Location: T1+2
Function Call: WRITE
  • Prompt: !,SSN," W:",$E(LRLLOC,1,17),?33,LRDAT
  • Line Location: T1+3
Function Call: WRITE
  • Prompt: ?(J*22+27),LRDAT
  • Line Location: T1+4
Info |  Source |  Entry Points |  Interaction Calls