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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: PSBOBZ

Package: Barcode Medication Administration

Routine: PSBOBZ


Information

PSBOBZ ;BIRMINGHAM/TTH-BAR CODE LABELS (MAIN) ;8/17/21 12:43

Source Information

Source file <PSBOBZ.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 3 ^DIC  MIX^DIC1  $$GET1^DIQ  
Barcode Medication Administration 1 CLEAN^PSBVT  
Kernel 1 $$FMTE^XLFDT  
PCE Patient Care Encounter 1 $$HRN^AUPNPAT  
Pharmacy Data Management 1 $$HAZ^PSSUTIL  
Toolkit 1 $$GET^XPAR  

Entry Points

Name Comments DBIA/ICR reference
EN ;
LABEL ;Get Barcode Label Type
INIT ;Initialize barcode printer
END ; Close Label or End of Label
START ;Start Label Print Process
PRINT ;Print barcode label
PROCESS ;Process control code and field data.
BCSTRIP ; *106 - Adjust height of bar code if HAZ text exists
; *131 - No longer executing this code. Control Code "HAZ" was added.
; All M code executed through the Control Code.
INPTR ;Input transform for DRUG field (#.31) in file 53.69.

External References

Name Field # of Occurrence
$$HRN^AUPNPAT EN+25
^DIC INPTR+7
MIX^DIC1 INPTR+6
$$GET1^DIQ EN+24, EN+25, EN+27, EN+28, EN+46, INPTR+8
CLEAN^PSBVT EN+55
$$HAZ^PSSUTIL EN+46
$$FMTE^XLFDT EN+36
$$GET^XPAR EN+15, LABEL+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"^FO20,90^A0N,22,20^CI13^FR^FD"_HAZTEXT_"^FS"
  • Line Location: PRINT+13
Function Call: WRITE
  • Prompt: !,"^BY2,3.0,80^FO20,115^"_PSBTYPE_",N,65,Y,N^FR^FD"_PSBBAR_"^FS"
  • Line Location: BCSTRIP+7
Routine Call
  • DIC
  • Line Location:
    • INPTR+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] Classic Fileman Calls,  GET1^DIQ
^PSB(53.69 - [#53.69] GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS(2 - [#3.2] EN+6
^PSB(53.69 - [#53.69] EN+25

Label References

Name Line Occurrences
LABEL EN+54
PRINT INIT+10
PROCESS PRINT+2, PRINT+3, PRINT+4, PRINT+5, PRINT+6, PRINT+7, PRINT+8, PRINT+9
START INIT+9

Naked Globals

Name Field # of Occurrence
^( EN+6
^(0 EN+25
^(1 EN+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D INPTR+1~, INPTR+4*
DIC INPTR+4~*
DIC("S" INPTR+5*
DIC(0 INPTR+4*
DUZ("AG" EN+25
HAZTEXT EN+3~, EN+48*, EN+50*, EN+52*, EN+53*, PRINT+14
IOST(0 EN+6
PSBANS EN+2~
PSBBAR EN+1~, EN+14*, EN+16*, INIT+15
PSBCB EN+2~, EN+43*, EN+44
PSBCLIN EN+2~, EN+28*, EN+31
PSBCNT EN+2~, EN+54*
PSBCODE EN+5~
PSBCODE( EN+6*
PSBCODE("EBF" INIT+7
PSBCODE("EL" END+1
PSBCODE("FI" INIT+1
PSBCODE("FI1" INIT+2
PSBCODE("FI2" INIT+3
PSBCODE("HAZ" PRINT+14
PSBCODE("SB" INIT+15, INIT+18
PSBCODE("SBF" INIT+6
PSBCODE("SL" START+1
PSBCODE("ST" PRINT+14, PROCESS+2
PSBCODE("STF" PROCESS+1
PSBDD EN+3~, EN+46*
PSBDEA INPTR+1~
PSBDOSE EN+1~, EN+21*, EN+22*, EN+23*, PRINT+3
PSBDRUG EN+1~, EN+17*, EN+19*, EN+20*, PRINT+2
PSBEXP EN+2~, EN+36*, EN+37*, EN+38*, PRINT+7
PSBFB EN+2~, EN+42*, EN+44
PSBFCB EN+2~, EN+44*, PRINT+9
PSBFD EN+2~, EN+35*, EN+36
PSBHAZD EN+3~, EN+47*, EN+50, EN+52, EN+53
PSBHAZH EN+3~, EN+47*, EN+49, EN+51, EN+52
PSBHZ EN+3~, EN+46*, EN+47
PSBI EN+1~
PSBIAD INPTR+1~
PSBIENS EN+1~, EN+13*, EN+24, EN+25, EN+27, EN+28, EN+46
PSBLOT EN+1~, EN+32*, EN+33*, EN+34*, PRINT+6
PSBMFG EN+2~, EN+39*, EN+40*, EN+41*, PRINT+8
PSBNAME EN+1~, EN+24*, EN+25*, EN+26*, PRINT+4
PSBNODE3 EN+1~
PSBORD EN+2~
PSBPRE EN+2~, EN+15*, EN+16
PSBQTY EN+1~, EN+18*, EN+19, EN+20
>> PSBRPT EN+13
>> PSBRPT( EN+14, EN+17, EN+18, EN+21, EN+32, EN+35, EN+39, EN+42, EN+43, EN+54
PSBSYM EN+2~, LABEL+2*, INIT+6, INIT+7, INIT+15, INIT+18
PSBTLE EN+1~, PRINT+2*, PRINT+3*, PRINT+4*, PRINT+5*, PRINT+6*, PRINT+7*, PRINT+8*, PRINT+9*, PRINT+14*
PSBWARD EN+1~, EN+27*, EN+29*, EN+30*, EN+31*, PRINT+5
PSBX EN+2~, EN+6*
PSBXX EN+5~, EN+6*
PSBY EN+2~, EN+6*
PSBYY EN+5~, EN+6*
SL EN+1~
TEXT EN+2~, INIT+15*, INIT+18*, PRINT+2*, PRINT+3*, PRINT+4*, PRINT+5*, PRINT+6*, PRINT+7*, PRINT+8*
PRINT+9*, PRINT+14*
U EN+14, EN+17, EN+18, EN+21, EN+25, EN+32, EN+35, EN+39, EN+42, EN+43
EN+47, EN+54
X INPTR+2!, INPTR+3*, INPTR+6, INPTR+7, INPTR+8*!
Y INPTR+1~, INPTR+8
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All