HBHCXMM ; LR VAMC(IRMS)/MJT-HBHC Transmit Medical Foster Home Data to AITC; May 21, 2021@12:36
Source file <HBHCXMM.m>
Package | Total | Call Graph |
---|---|---|
Hospital Based Home Care | 1 | HOSP^HBHCUTL1 |
VA FileMan | 1 | NOW^%DTC |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Hospital Based Home Care | 1 | HBHCFILE |
Name | Comments | DBIA/ICR reference |
---|---|---|
START | ; Initialization
|
|
LOOP | ; Loop thru ^HBHC(633.2) "AC","N" cross-ref to create nodes in ^HBHC(634) => transmit or ^HBHC(634.7) => Medical Foster Home Error(s) file
|
|
EXIT | ; Exit module
|
|
SETNODE | ; Set node in ^HBHC(634) (Transmit) or ^HBHC(634.7) Medical Foster Home Error(s))
|
|
NOW | ; Get time NOW, repeat until Hours/Minutes/Seconds = 6 digits in length
|
|
PARENT | ;
|
|
TRANS | ; Set node in ^HBHC(634) transmit file & flag record as 'F" (filed for transmit) in ^HBHC(633.2)
|
|
ERROR | ; Set node in ^HBHC(634.7) if data is incomplete
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(40.8 - [#40.8] | PARENT+16 |
^DIC(4 - [#4] | PARENT+18 |
^DIC(5 - [#5] | SETNODE+10, SETNODE+11 |
^HBHC(631.8 - [#631.8] | SETNODE+10, SETNODE+11 |
^HBHC(631.9 - [#631.9] | PARENT+12, PARENT+13 |
^HBHC(633.2 - [#633.2] | LOOP+1, SETNODE+1, PARENT+10, TRANS+3!, TRANS+4* |
^HBHC(634 - [#634] | TRANS+1*, TRANS+2* |
^HBHC(634.7 - [#634.7] | ERROR+1*, ERROR+2* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | EXIT+2!, NOW+1 |
>> DILOCKTM | TRANS+1, TRANS+3, ERROR+1 |
DT | SETNODE+3 |
HBHCBEDM | EXIT+1!, SETNODE+17*, NOW+4 |
HBHCCDOB | EXIT+1!, SETNODE+15*, NOW+4 |
HBHCCDTS | EXIT+1!, NOW+1*, NOW+4, TRANS+4 |
HBHCCLOS | EXIT+1!, SETNODE+20*, NOW+4 |
HBHCCNTY | EXIT+1!, SETNODE+11*, NOW+4 |
HBHCDFN | LOOP+1*, EXIT+1!, SETNODE+1, SETNODE+23, PARENT+10, TRANS+3, TRANS+4, ERROR+2 |
HBHCDR | LOOP+1, EXIT+1!, SETNODE+6*, SETNODE+10*, SETNODE+11*, SETNODE+12*, SETNODE+14*, SETNODE+15*, SETNODE+16*, SETNODE+17* , SETNODE+18*, SETNODE+21, PARENT+22*, ERROR+2 |
HBHCFLG | LOOP+1*, EXIT+1!, SETNODE+5* |
HBHCFORM | START+3*, EXIT+1!, NOW+4 |
HBHCHOSP | EXIT+1! |
HBHCHOSPX | START+2~, NOW+4, PARENT+9*, PARENT+18*, PARENT+19*, PARENT+22 |
HBHCIEN | EXIT+1!, SETNODE+23*, NOW+4 |
HBHCINFO | EXIT+1!, SETNODE+1*, SETNODE+5, SETNODE+9, SETNODE+10, SETNODE+11, SETNODE+12, SETNODE+13, SETNODE+14, SETNODE+15 , SETNODE+16, SETNODE+17, SETNODE+18, SETNODE+20 |
HBHCLNTH | START+3*, EXIT+1!, SETNODE+9 |
HBHCLREQ | EXIT+1!, SETNODE+18*, NOW+4 |
HBHCLSDT | EXIT+1!, SETNODE+3*, SETNODE+5 |
HBHCMFHN | EXIT+1!, SETNODE+9*, NOW+4 |
HBHCMXPT | EXIT+1!, SETNODE+16*, NOW+4 |
HBHCNDX1 | EXIT+1!, TRANS+1*, TRANS+2 |
HBHCNDX2 | EXIT+1!, ERROR+1*, ERROR+2 |
HBHCOPEN | EXIT+1!, SETNODE+14*, NOW+4 |
HBHCPRNT | PARENT+8~, PARENT+10*, PARENT+12, PARENT+13*, PARENT+14, PARENT+16*, PARENT+18 |
HBHCREC | EXIT+1!, NOW+4*, TRANS+2 |
HBHCS101 | START+3*, EXIT+1!, NOW+4 |
HBHCSP4 | START+3*, EXIT+1!, SETNODE+13, PARENT+19 |
HBHCSP8 | START+3*, EXIT+1!, SETNODE+14, SETNODE+15, SETNODE+20 |
HBHCST | EXIT+1!, SETNODE+10*, NOW+4 |
HBHCX | EXIT+2!, NOW+1* |
HBHCXMT7 | EXIT+2!, SETNODE+1*, TRANS+3 |
HBHCZIP | EXIT+2!, SETNODE+12*, SETNODE+13*, NOW+4 |
U | SETNODE+1, SETNODE+5, SETNODE+9, SETNODE+10, SETNODE+11, SETNODE+12, SETNODE+13, SETNODE+14, SETNODE+15, SETNODE+16 , SETNODE+17, SETNODE+18, SETNODE+20, TRANS+1, TRANS+2, TRANS+4, ERROR+1 |