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

Package: IHS Changes To Lab

Routine: BLRP41UI


Information

BLRP41UI ; IHS/OIT/MKK - INTERMEC PC41 UID Barcoded Initialization ;DEC 09, 2008 8:30 AM

Source Information

Source file <BLRP41UI.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 4 ^%ZIS  ^%ZISC  ^%ZTLOAD  $$HTE^XLFDT  

Entry Points

Name Comments DBIA/ICR reference
PLAINDEF ; EP - PLAIN LABEL Format
F2 ; Prints TEST label WITHOUT a barcoded UID number
F3 ; Prints TEST label with UID # barcoded
BAR ; EP - programs format F3 for label with the accession # barcoded
ZIS
FMT ; EP -- E3;F3 erases form 3 and accesses form #
BARUIDV ; EP -- BARCODE Format
PRT ; EP - programs the Intermec for print mode
TEST ; EP - Tests formats
SETVARS ; EP - Initialize variables for testing

External References

Name Field # of Occurrence
^%ZIS ZIS
^%ZISC ZIS, ZIS+2, ZIS+3, PRT+3
^%ZTLOAD ZIS+1
$$HTE^XLFDT F3+9, F2+7

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?7,*7,"NO DEVICE SELECTED ",!
  • Line Location: ZIS+0
Function Call: WRITE
  • Prompt: !!?5,"Barcode Formating Program",$S($G(ZTSK):" Queued ",1:" NOT QUEUED"),!!
  • Line Location: ZIS+2
Function Call: WRITE
  • Prompt: *2,"R",*3
  • Line Location: PRT+1
Function Call: WRITE
  • Prompt: *2,*27,"C",*3
  • Line Location: BARUIDV+1
Function Call: WRITE
  • Prompt: *2,*27,"P",*3
  • Line Location: BARUIDV+2
Function Call: WRITE
  • Prompt: *2,"E3;F3;",*3
  • Line Location: BARUIDV+5
Function Call: WRITE
  • Prompt: *2,"F3;H1;o165,580;f1;c2;h1;w1;d0,32;",*3
  • Line Location: BARUIDV+8
Function Call: WRITE
  • Prompt: *2,"F3;H2;o148,335;f1;c2;h1;w1;d0,12;",*3
  • Line Location: BARUIDV+9
Function Call: WRITE
  • Prompt: *2,"F3;H3;o47,580;f1;c2;h1;w1;d0,13;",*3
  • Line Location: BARUIDV+10
Function Call: WRITE
  • Prompt: *2,"F3;H4;o130,580;f1;c2;h1;w1;d0,14;",*3
  • Line Location: BARUIDV+11
Function Call: WRITE
  • Prompt: *2,"F3;H5;o130,370;f1;c2;h1;w1;d0,16;",*3
  • Line Location: BARUIDV+12
Function Call: WRITE
  • Prompt: *2,"F3;H6;o30,580;f1;c2;h1;w1;d0,7;",*3
  • Line Location: BARUIDV+13
Function Call: WRITE
  • Prompt: *2,"F3;H7;o47,330;f1;c2;h1;w1;d0,12;",*3
  • Line Location: BARUIDV+14
Function Call: WRITE
  • Prompt: *2,"F3;H8;o0,580;f1;c2;h2;w1;d0,26;",*3
  • Line Location: BARUIDV+15
Function Call: WRITE
  • Prompt: *2,"F3;H9;o30,260;f1;c2;h1;w1;d0,4;",*3
  • Line Location: BARUIDV+16
Function Call: WRITE
  • Prompt: *2,"F3;B10;o67,575;f1;c6;h60;w3.5;d0,10;",*3
  • Line Location: BARUIDV+19
Function Call: WRITE
  • Prompt: *2,"F3;H11;o0,270;f1;c2;h1;w1;d0,5;",*3
  • Line Location: BARUIDV+21
Function Call: WRITE
  • Prompt: *2,"F3;H12;o148,580;f1;c2;h1;w1;d0,20;",*3
  • Line Location: BARUIDV+22
Function Call: WRITE
  • Prompt: *2,"F3;H13;o30,470;f1;c2;h1;w1;d0,15;",*3
  • Line Location: BARUIDV+23
Function Call: WRITE
  • Prompt: *2,*27,"C",*3
  • Line Location: PLAINDEF+1
Function Call: WRITE
  • Prompt: *2,*27,"P",*3
  • Line Location: PLAINDEF+2
Function Call: WRITE
  • Prompt: *2,"E2;F2;",*3
  • Line Location: PLAINDEF+5
Function Call: WRITE
  • Prompt: *2,"F2;H14;o164,570;f1;c2;h1;w1;d0,30;",*3
  • Line Location: PLAINDEF+8
Function Call: WRITE
  • Prompt: *2,"F2;H15;o147,570;f1;c2;h1;w1;d0,14;",*3
  • Line Location: PLAINDEF+9
Function Call: WRITE
  • Prompt: *2,"F2;H16;o53,570;f1;c2;h1;w1;d0,13;",*3
  • Line Location: PLAINDEF+10
Function Call: WRITE
  • Prompt: *2,"F2;H17;o75,570;f1;c2;h2;w1;d0,21;",*3
  • Line Location: PLAINDEF+11
Function Call: WRITE
  • Prompt: *2,"F2;H18;o108,570;f1;c2;h1;w1;d0,16;",*3
  • Line Location: PLAINDEF+12
Function Call: WRITE
  • Prompt: *2,"F2;H19;o33,570;f1;c2;h1;w1;d0,7;",*3
  • Line Location: PLAINDEF+13
Function Call: WRITE
  • Prompt: *2,"F2;H20;o147,340;f1;c2;h1;w1;d0,12",*3
  • Line Location: PLAINDEF+14
Function Call: WRITE
  • Prompt: *2,"F2;H21;o0,570;f1;c2;h2;w1;d0,32;",*3
  • Line Location: PLAINDEF+15
Function Call: WRITE
  • Prompt: *2,"F2;H22;o45,200;f0;c0;h3;w3;b2;d0,4;",*3
  • Line Location: PLAINDEF+16
Function Call: WRITE
  • Prompt: *2,"F2;H23;o53,340;f1;c2;h1;w1;d0,5;",*3
  • Line Location: PLAINDEF+17
Function Call: WRITE
  • Prompt: *2,"F2;H24;o128,570;f1;c2;h1;w1;d0,28;",*3
  • Line Location: PLAINDEF+18
Function Call: WRITE
  • Prompt: *2,"F2;H25;o33,460;f1;c2;h1;w1;d0,16;",*3
  • Line Location: PLAINDEF+19
Function Call: WRITE
  • Prompt: *2,"R",*3
  • Line Location: F3+3
Function Call: WRITE
  • Prompt: *2,*27,"E3",*24,!,$G(LRTXT),*3
  • Line Location: F3+5
Function Call: WRITE
  • Prompt: *2,!,$G(LRTOP),*3
  • Line Location: F3+6
Function Call: WRITE
  • Prompt: *2,!,"Ord#:"_$G(LRCE),*3
  • Line Location: F3+7
Function Call: WRITE
  • Prompt: *2,!,"UID:"_$G(LRUID),*3
  • Line Location: F3+8
Function Call: WRITE
  • Prompt: *2,!,$G(LRDAT),*3
  • Line Location: F3+10
Function Call: WRITE
  • Prompt: *2,!,$G(HRCN),*3
  • Line Location: F3+11
Function Call: WRITE
  • Prompt: *2,!,$G(LRLLOC)," ",$G(LRRB),*3
  • Line Location: F3+12
Function Call: WRITE
  • Prompt: *2,!,$E($G(PNM),1,27),*3
  • Line Location: F3+13
Function Call: WRITE
  • Prompt: *2,!,$G(LRURG),*3
  • Line Location: F3+14
Function Call: WRITE
  • Prompt: *2,!,$G(LRUID),*3
  • Line Location: F3+15
Function Call: WRITE
  • Prompt: *2,!,"Sex:",$G(SEX),*3
  • Line Location: F3+16
Function Call: WRITE
  • Prompt: *2,!,"Prov:"_$G(LRPROV),*3
  • Line Location: F3+17
Function Call: WRITE
  • Prompt: *2,!,"DoB:"_$G(DOB),*3
  • Line Location: F3+18
Function Call: WRITE
  • Prompt: *2,*23,*15,"S30",*12,*3
  • Line Location: F3+20
Function Call: WRITE
  • Prompt: *2,*23,*15,"S30",*3
  • Line Location: F3+21
Function Call: WRITE
  • Prompt: *2,*27,"E2",*24,!,$G(PLRTXT),*3
  • Line Location: F2+3
Function Call: WRITE
  • Prompt: *2,!,$G(PLRTOP),*3
  • Line Location: F2+4
Function Call: WRITE
  • Prompt: *2,!,"Ord#:",$G(PLRCE),*3
  • Line Location: F2+5
Function Call: WRITE
  • Prompt: *2,!,"UID:",$G(PLRUID),*3
  • Line Location: F2+6
Function Call: WRITE
  • Prompt: *2,!,$G(PLRDAT),*3
  • Line Location: F2+8
Function Call: WRITE
  • Prompt: *2,!,$G(PHRCN),*3
  • Line Location: F2+9
Function Call: WRITE
  • Prompt: *2,!,$G(PLRLLOC)," ",$G(LRRB),*3
  • Line Location: F2+10
Function Call: WRITE
  • Prompt: *2,!,$E($G(PPNM),1,27),*3
  • Line Location: F2+11
Function Call: WRITE
  • Prompt: *2,!,$G(PLRURG),*3
  • Line Location: F2+12
Function Call: WRITE
  • Prompt: *2,!,"Sex:",$G(PSEX),*3
  • Line Location: F2+13
Function Call: WRITE
  • Prompt: *2,!,"Prov:"_$G(PLRPROV),*3
  • Line Location: F2+14
Function Call: WRITE
  • Prompt: *2,!,"DoB:"_$G(PDOB),*3
  • Line Location: F2+15
Function Call: WRITE
  • Prompt: *2,*23,*15,"S30",*12,*3
  • Line Location: F2+17
Function Call: WRITE
  • Prompt: *2,*23,*15,"S30",*3
  • Line Location: F2+18
Routine Call
  • %ZIS
  • Line Location:
    • ZIS

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("RM" BAR+2, BAR+8, F3+2, F2+1

Label References

Name Line Occurrences
BARUIDV BAR+10
PLAINDEF BAR+12
SETVARS TEST+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ZIS!*
DOB TEST+1~, F3+18, SETVARS+18*
ETX BAR+4~, BAR+6*
HRCN TEST+1~, F3+11, SETVARS+7*
ION ZIS+1
LRACCAP TEST+1~, SETVARS+20*
LRAN TEST+1~, SETVARS+6*
LRAS TEST+1~, SETVARS+5*
LRCE TEST+1~, F3+7, SETVARS+3*
LRDAT TEST+1~, F3+9*, F3+10
LRLLOC TEST+2~, F3+12, SETVARS+9*
LRPROV TEST+2~, F3+17, SETVARS+17*
LRRB TEST+2~, F3+12, F2+10, SETVARS+22*
LRSPEC TEST+2~, SETVARS+21*
LRTOP TEST+2~, F3+6, SETVARS+2*
LRTXT TEST+2~, F3+5, SETVARS+1*
LRUID TEST+2~, F3+8, F3+15, SETVARS+12*
LRURG TEST+2~, F3+14, SETVARS+11*
NUMBER TEST+3~, SETVARS+14*
PDOB TEST+4~, F2+15, SETVARS+18*
PHRCN TEST+4~, F2+9, SETVARS+8*
PLRACCAP TEST+4~, SETVARS+20*
PLRAN TEST+4~, SETVARS+6*
PLRAS TEST+4~, SETVARS+5*
PLRCE TEST+4~, F2+5, SETVARS+4*
PLRDAT TEST+4~, F2+7*, F2+8
PLRLLOC TEST+5~, F2+10, SETVARS+9*
PLRPROV TEST+5~, F2+14, SETVARS+17*
PLRRB TEST+5~, SETVARS+22*
PLRSPEC TEST+5~, SETVARS+21*
PLRTOP TEST+5~, F2+4, SETVARS+2*
PLRTXT TEST+5~, F2+3, SETVARS+1*
PLRUID TEST+5~, F2+6, SETVARS+13*
PLRURG TEST+5~, F2+12, SETVARS+11*
PNM TEST+3~, F3+13, SETVARS+10*
PNUMBER TEST+6~, SETVARS+14*
>> POP ZIS
PPNM TEST+6~, F2+11, SETVARS+10*
PSEX TEST+6~, F2+13, SETVARS+16*
SEX TEST+3~, F3+16, SETVARS+16*
STX BAR+4~, BAR+5*
>> X BAR+2*, BAR+8*, F3+2*, F2+1*
>> ZTDESC ZIS+1*
>> ZTDTH ZIS+1*
>> ZTIO ZIS+1*
>> ZTQUEUED BAR+1
>> ZTREQ BAR+1*
>> ZTRTN ZIS+1*
ZTSK ZIS+2, ZIS+3!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All