BILOT1 ;IHS/CMI/MWR - EDIT LOT NUMBERS.; MAY 10, 2010
Source file <BILOT1.m>
| 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 |
| 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
|
| 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 |
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine 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 |
| 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! |
| 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 |
| >> | 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 |
| Name | Field # of Occurrence |
|---|---|
| $T(@BILINL+I | PRINTX+3 |