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 |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BILOT1

Package: Immunization Tracking

Routine: BILOT1


Information

BILOT1 ;IHS/CMI/MWR - EDIT LOT NUMBERS.; MAY 10, 2010

Source Information

Source file <BILOT1.m>

Call Graph

Call Graph Total: 17

Package Total Call Graph
Immunization Tracking 10 (DDS,FDIE,UPDATE)^BIFMAN  $$LMVER^BILOGO  (HDR,INIT,TEXT3,TEXT33)^BILOT  CHGORDR^BILOT2  ($$LOTEXP,$$LOTRBAL)^BIRPC3  ($$VNAME,ERRCD)^BIUTL2  DIRZ^BIUTL3  ($$PAD,TITLE)^BIUTL5  
$$INSTTX^BIUTL6  WL^BIW  
Registration 3 TERM^VALM0  (CLEAR,FULL)^VALM1  EN^VALM2  
VA Fileman 3 (HLP,UNED)^DDSUTL  PUT^DDSVALF  ^DIR  
IHS VA Utilities 1 ^XBKVAR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Immunization Tracking 2 BILOT  BILOT2  

Entry Points

Name Comments DBIA/ICR reference
RESET ;EP
INACTA1 ;EP
CALCDOS(E,F) ;EP
PRINTX(BILINL,BITAB) ;EP
LINE(BIIEN,BILINE,BIENT) ;EP
EDITSCR(BILOT,BINEW) ;EP
NULLACT ;EP
CHGORDR ;EP
INVOFF(BIZ) ;EP
TEXT2 ;EP
INIT ;EP
VACINA3 ;EP
VACINA2 ;EP
VACINA1 ;EP
EDITLOT(BINEW) ;EP
WRITE(BILINE,BIVAL,BIBLNK,BIENT) ;EP
INACTA ;EP
INACTLN ;EP
LOADLOT ;EP

External References

Name Field # of Occurrence
DDS^BIFMAN EDITSCR+30
FDIE^BIFMAN EDITSCR+65
UPDATE^BIFMAN EDITSCR+64
$$LMVER^BILOGO INIT+4
HDR^BILOT RESET+4
INIT^BILOT RESET+4
TEXT3^BILOT INACTA+4
TEXT33^BILOT INACTA+12
CHGORDR^BILOT2 CHGORDR+2
$$LOTEXP^BIRPC3 LINE+29
$$LOTRBAL^BIRPC3 LINE+37
$$VNAME^BIUTL2 INIT+25, LINE+21, LOADLOT+18, VACINA1+10
ERRCD^BIUTL2 EDITLOT+27, EDITLOT+30, EDITLOT+31, EDITSCR+8
DIRZ^BIUTL3 EDITSCR+59, EDITSCR+70, INACTA+9, INACTA+16, INACTLN+14, NULLACT+13
$$PAD^BIUTL5 LINE+18, LINE+22, LINE+26, LINE+30, LINE+34, LINE+38, LINE+42
TITLE^BIUTL5 EDITSCR+54, EDITSCR+69, INACTA+4, INACTA+12
$$INSTTX^BIUTL6 LINE+41
WL^BIW WRITE+9
HLP^DDSUTL VACINA2+9
UNED^DDSUTL LOADLOT+6
PUT^DDSVALF LOADLOT+9, LOADLOT+12, LOADLOT+15, LOADLOT+18, LOADLOT+21, LOADLOT+24, LOADLOT+27, LOADLOT+30, LOADLOT+33, LOADLOT+36
, LOADLOT+39, LOADLOT+42, LOADLOT+45, INVOFF+10, INVOFF+11, CALCDOS+8, VACINA1+10, VACINA3+6
^DIR INACTA+6, INACTA+13
TERM^VALM0 RESET+3
CLEAR^VALM1 EDITSCR+54, EDITSCR+69
FULL^VALM1 EDITLOT+33, EDITSCR+54, EDITSCR+69, INACTA+4
EN^VALM2 EDITLOT+24
^XBKVAR INACTLN+4, NULLACT+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?5,"Done. ",M," Lot Numbers have been Inactivated."
  • Line Location: INACTLN+14
Function Call: WRITE
  • Prompt: !,T,$P(X,";;",2)
  • Line Location: PRINTX+3
Function Call: WRITE
  • Prompt: !!?5,"Checking Lot Numbers for null Status..."
  • Line Location: NULLACT+5
Function Call: WRITE
  • Prompt: !!?5,"Done. ",M," Lot Numbers have been fixed."
  • Line Location: NULLACT+13
Routine Call
  • DIR
  • Line Location:
    • INACTA+6
    • INACTA+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC - [#1] PUT^DDSVALF
^DIC(10 - [#10] PUT^DDSVALF
^DIC(11 - [#11] PUT^DDSVALF
^DPT - [#2] PUT^DDSVALF,  UNED^DDSUTL
^DIC(3 - [#3] PUT^DDSVALF
^DIC(4 - [#4] PUT^DDSVALF
^XMB(4.5 - [#4.5] PUT^DDSVALF
^DIC(5 - [#5] PUT^DDSVALF
^DIC(6 - [#6] PUT^DDSVALF
^DIC(7 - [#7] PUT^DDSVALF
^DIC(8 - [#8] PUT^DDSVALF

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTTIML - [#9999999.41] INIT+15, INIT+16!, INIT+18, LINE+8, EDITSCR+8, EDITSCR+12, INACTLN+6, INACTLN+7, INACTLN+9, INACTLN+11
, INACTLN+13*, NULLACT+7, NULLACT+8, NULLACT+10, NULLACT+12*
^AUTTIML("B" EDITSCR+53
^AUTTIMM - [#9999999.14] VACINA1+6
^TMP("BILOT" INIT+7!

Label References

Name Line Occurrences
CALCDOS LOADLOT+48
EDITSCR EDITLOT+20, EDITLOT+32
INACTA1 INACTA+5, INACTA+12
INACTLN INACTA+19
LINE INIT+44
PRINTX TEXT2+14
RESET EDITLOT+20, EDITLOT+27, EDITLOT+30, EDITLOT+31, EDITLOT+34, INACTA+10, INACTA+17, INACTA+20
WRITE INIT+37, LINE+45

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
BI EDITSCR+11~
BI("A" EDITSCR+14*, EDITSCR+37, EDITSCR+46, LOADLOT+9
BI("AS" EDITSCR+13*, EDITSCR+14, EDITSCR+15, EDITSCR+37*, EDITSCR+38*, EDITSCR+43, EDITSCR+53
BI("B" EDITSCR+16*, EDITSCR+48, LOADLOT+15, LOADLOT+18, VACINA1+10*, VACINA2+3, VACINA3+6!
BI("C" EDITSCR+17*, EDITSCR+41*, EDITSCR+43, LOADLOT+21
BI("D" EDITSCR+18*, EDITSCR+43, LOADLOT+24
BI("E" EDITSCR+19*, EDITSCR+44, LOADLOT+27, LOADLOT+48
BI("F" EDITSCR+20*, EDITSCR+44, LOADLOT+30, LOADLOT+48
BI("G" EDITSCR+21*, EDITSCR+44, LOADLOT+33
BI("H" EDITSCR+22*, EDITSCR+45, LOADLOT+36
BI("M" EDITSCR+23*, EDITSCR+45, LOADLOT+39
BI("N" EDITSCR+24*, EDITSCR+45, LOADLOT+42
BI("O" EDITSCR+25*, EDITSCR+46, LOADLOT+45
BI("S" EDITSCR+15*, EDITSCR+38, LOADLOT+12
BI0 LINE+7~, LINE+8*, LINE+17, LINE+21, LINE+25, LINE+29, LINE+33, LINE+37, LINE+41
BIACT INIT+17~, INIT+18*, INIT+21, INIT+33
BIBLNK WRITE~, WRITE+9
>> BICOLL INIT+10*, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31
BIENT INIT+8~*, INIT+37, INIT+44, LINE~, LINE+11*, LINE+14, LINE+45, WRITE~, WRITE+9
BIERR EDITSCR+36~, EDITSCR+64, EDITSCR+65, EDITSCR+68, EDITSCR+70
BIEXP INIT+17~, INIT+24*, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31, INIT+32
BIFLD EDITSCR+36~, EDITSCR+64, EDITSCR+65
BIFLD( EDITSCR+43*, EDITSCR+44*, EDITSCR+45*, EDITSCR+46*, EDITSCR+48*
BIIEN INIT+14~*, INIT+15*, INIT+16, INIT+18, INIT+33, LINE~, LINE+8, LINE+11, LINE+29, LINE+37
>> BIINACT INIT+12*, INIT+21, INIT+53
BILINE INIT+8~*, INIT+37, INIT+44, INIT+47, LINE~, LINE+45, WRITE~, WRITE+8, WRITE+9
BILINL PRINTX~, PRINTX+1
BILOT INIT+7!, INIT+17~, INIT+18*, INIT+22*, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31, INIT+32
, EDITSCR~, EDITSCR+8, EDITSCR+11, EDITSCR+12, EDITSCR+30, EDITSCR+64, EDITSCR+65
BILOT( LINE+11*, EDITLOT+31, EDITLOT+32
BINEW EDITLOT~, EDITLOT+20, EDITSCR~, EDITSCR+8, EDITSCR+48, EDITSCR+53, EDITSCR+64, LOADLOT+6
BINEW(1 VACINA1+9*
>> BIPOP EDITSCR+30, INACTA+7*, INACTA+14*
BISAVE EDITSCR+28~, EDITSCR+30, EDITSCR+33
BIT VACINA2+6~*, VACINA2+7*, VACINA2+8*, VACINA2+9
BITAB PRINTX~, PRINTX+2*
BITMP INIT+7!, INIT+8~
BITMP( INIT+33*, INIT+35, INIT+39, INIT+40, INIT+41, INIT+42, INIT+43, INIT+44
BIUNSD INIT+17~, INIT+19*, INIT+27, INIT+28, INIT+29, INIT+30, INIT+32
BIVAL WRITE~, WRITE+9
BIVNAM INIT+17~, INIT+25*, INIT+27, INIT+28, INIT+29, INIT+30, INIT+31, INIT+32
BIZ INVOFF~, INVOFF+8, INVOFF+10, INVOFF+11
>> DDSBR VACINA1+9*, VACINA2+3*
>> DDSOLD INVOFF+10, INVOFF+11
>> DDSSTACK INVOFF+9*, VACINA1+7*
DIR INACTA+5~
DIR("?" INACTA1+4*, INACTA1+5*
DIR("A" INACTA1+3*
DIR("B" INACTA1+3*
DIR(0 INACTA1+2*
>> DIRUT INACTA+7, INACTA+14
DR EDITSCR+29~*, EDITSCR+30
DT INACTLN+9
E CALCDOS~, CALCDOS+7, CALCDOS+8
F CALCDOS~, CALCDOS+7, CALCDOS+8
I PRINTX+2~*, PRINTX+3*
J INIT+42~*, INIT+43, INIT+44
K INIT+41~*, INIT+42, INIT+43, INIT+44
L INIT+40~*, INIT+41, INIT+42, INIT+43, INIT+44
M INIT+39~*, INIT+40, INIT+41, INIT+42, INIT+43, INIT+44, INACTLN+5~*, INACTLN+13*, INACTLN+14, NULLACT+6~*
, NULLACT+12*, NULLACT+13
N INIT+35~*, INIT+37, INIT+39, INIT+40, INIT+41, INIT+42, INIT+43, INIT+44, INACTLN+5~*, INACTLN+6*
, INACTLN+7, INACTLN+9, INACTLN+11, INACTLN+13, NULLACT+6~*, NULLACT+7*, NULLACT+8, NULLACT+10, NULLACT+12
P INIT+43~*, INIT+44
T PRINTX+2~*, PRINTX+3
U INIT+18, INIT+19, INIT+24, INIT+25, LINE+17, LINE+21, LINE+25, LINE+29, LINE+33, LINE+37
, LINE+41, EDITSCR+13, EDITSCR+16, EDITSCR+17, EDITSCR+18, EDITSCR+19, EDITSCR+20, EDITSCR+21, EDITSCR+22, EDITSCR+23
, EDITSCR+24, EDITSCR+25, VACINA1+6
>> VALM("TITLE" INIT+4*
>> VALMBCK RESET+2*, RESET+3*
>> VALMCNT INIT+47*, INIT+48, INIT+53
>> VALMQUIT RESET+2
>> VALMSG INIT+3*, INIT+54*
VALMY EDITLOT+23~, EDITLOT+27
VALMY(0 EDITLOT+29
>> W INIT+27*, INIT+28*, INIT+29*, INIT+30*, INIT+31*, INIT+32*, INIT+33
X INIT+17~, INIT+27*, INIT+28*, INIT+29*, INIT+30*, INIT+31*, INIT+32*, INIT+33, LINE+7~, LINE+14*
, LINE+17*, LINE+18*, LINE+21*, LINE+22*, LINE+25*, LINE+26*, LINE+29*, LINE+30*, LINE+33*, LINE+34*
, LINE+37*, LINE+38*, LINE+41*, LINE+42*, LINE+45, VACINA1+6, VACINA1+10, PRINTX+2~, PRINTX+3*
>> XQORNOD(0 EDITLOT+24
Y INIT+17~, INIT+18*, INIT+19, INIT+24, INIT+25, INIT+27*, INIT+28*, INIT+29*, INIT+30*, INIT+31*
, INIT+32*, INIT+33, INIT+53~*, INIT+54, LINE+7~, EDITLOT+29~*, EDITLOT+30, EDITLOT+31, EDITLOT+32, EDITSCR+12~*
, EDITSCR+13, EDITSCR+16, EDITSCR+17, EDITSCR+18, EDITSCR+19, EDITSCR+20, EDITSCR+21, EDITSCR+22, EDITSCR+23, EDITSCR+24
, EDITSCR+25, INACTA+5~, INACTA+8, INACTA+15
Z INIT+17~, INIT+27*, INIT+28*, INIT+29*, INIT+30*, INIT+31*, INIT+32*, INIT+33

Marked Items

Name Field # of Occurrence
$T(@BILINL+I PRINTX+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All