DGPMV331 ;ALB/MIR - ASIH DISCHARGE PROCESSING ; 11 JAN 89 @9
Source file <DGPMV331.m>
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 |
---|---|---|
Registration | 3 | DGPMV321 DGPMV322 DGPMV33 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ASIH | ;if admission type was TO ASIH...
|
|
Q | ||
DEL | ;delete the NHCU discharge if FROM ASIH - called from transfer, too
|
|
CRXFR | ;for FROM ASIH and CONTINUED ASIH (O.F.), create corresponding transfer
|
|
UNDO | ;delete discharge/transfer is time-out during transfer
|
|
SPEC | ;ask specialty on return?
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DGPM - [#405] | Classic Fileman Calls |
^DGPT - [#45] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DG(405.1 - [#405.1] | SPEC+1 |
^DGPM - [#405] | ASIH+1, ASIH+4, ASIH+5, DEL+1, DEL+2, DEL+4, DEL+5, CRXFR+4, CRXFR+6, CRXFR+7 , CRXFR+8, CRXFR+9, UNDO+3 |
^DGPM("APMV" | CRXFR+7, CRXFR+8 |
^DGPT - [#45] | ASIH+7, DEL+6 |
^UTILITY("DGPM" | ASIH+5*, DEL+3*, DEL+4*, DEL+5*, CRXFR+4*, CRXFR+6*, CRXFR+9*, UNDO+2* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DA | ASIH+4*, ASIH+5, ASIH+6*, ASIH+7*, DEL+1*, DEL+2, DEL+4, DEL+6*, CRXFR+2*, CRXFR+6* , CRXFR+9, UNDO+2* |
>> DFN | CRXFR+3, CRXFR+7, CRXFR+8 |
DG | ASIH+5!, ASIH+6!, ASIH+7!, DEL+6!, CRXFR+2!, CRXFR+6!, CRXFR+9! |
DGFAC | CRXFR+1! |
DGHX | CRXFR+1*, SPEC+1, SPEC+2! |
>> DGMAS | CRXFR+1* |
>> DGPM0ND | CRXFR+3* |
>> DGPMA | ASIH+2, ASIH+3, ASIH+5, ASIH+7, CRXFR+1, CRXFR+3, CRXFR+5, UNDO+3 |
DGPMAA | ASIH+1*, ASIH+4, ASIH+7, Q!, DEL+1, DEL+3, DEL+6 |
DGPMAI | ASIH+1*, Q!, DEL+3, DEL+5, CRXFR+3, CRXFR+7, CRXFR+8 |
DGPMAN | ASIH+1, CRXFR+7, UNDO+3~* |
DGPMCA | UNDO+3~* |
>> DGPMDA | ASIH+6, CRXFR+2, UNDO+2 |
>> DGPMER | UNDO+1* |
>> DGPMP | ASIH+3 |
>> DGPMT | DEL+7 |
DGPMXMT | Q!, CRXFR+6*, UNDO+2, SPEC+1 |
>> DGX | CRXFR+1*, CRXFR+3, CRXFR+5*, CRXFR+6 |
>> DIE | ASIH+5*, ASIH+6*, ASIH+7*, DEL+6*, CRXFR+2*, CRXFR+6* |
>> DIE("NO^" | CRXFR+3*, CRXFR+6* |
>> DIK | DEL+4*, UNDO+2* |
DQ | ASIH+5!, ASIH+6!, ASIH+7!, DEL+6!, CRXFR+2!, CRXFR+6!, CRXFR+9! |
>> DR | ASIH+5*, ASIH+6*, ASIH+7*, DEL+6*, CRXFR+2*, CRXFR+6*, CRXFR+8* |
>> I | CRXFR+7*, CRXFR+8* |
>> J | CRXFR+7*, CRXFR+8* |
>> X | CRXFR+3*, CRXFR+7*, CRXFR+8* |
>> Y | CRXFR+4, CRXFR+6, SPEC+1* |