DVBAPLNG ;ALB/JLU;updates the long description of file 31.;1/18/94
Source file <DVBAPLNG.m>
| Package | Total | Call Graph |
|---|---|---|
| Automated Medical Information Exchange | 2 | (BUMP,BUMPBLK)^DVBAPOST $$VERSION^DVBAPST1 |
| VA FileMan | 1 | ^DIE |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ||
| SET | ||
| SET1 | ||
| EXIT | ;cleans variables and exit.
|
|
| SE | ;writes and updates the tmp global with error message.
|
|
| SG1 | ;writes and updates the tmp global with the finish.
|
|
| LOOP | ;loops through tmp and updates file 31 long description field.
|
|
| ADCHK | ;checks to see if the disability code exists and if it already has a
|
|
| ADD | ;adds the long description to file 31 long description field.
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^DIC(31 - [#31] | Classic Fileman Calls |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CODE | EXIT+1!, SE+2, LOOP+2*, LOOP+3, LOOP+4*, ADCHK+3, ADCHK+4, ADCHK+5 |
| CT | SET*, EXIT+1!, SG1+6, ADD+6* |
| DA | ADD+2*, ADD+5! |
| DIE | SET+1*, EXIT+1! |
| DIF | SET1*, SET1+4! |
| DIR | EXIT+1! |
| DR | ADD+3*, ADD+5! |
| JA | EXIT+1!, ADCHK+5*, ADCHK+6, ADCHK+7, ADD+2 |
| JB | EXIT+1!, ADCHK+7*, ADCHK+8 |
| LP | EXIT+1!, LOOP+2*, ADD+7 |
| LP1 | SET+2*, EXIT+1!, SG1+2* |
| R | SET1+2~, SET1+3*, SET1+4! |
| STOP | LOOP+5!, LOOP+7, ADCHK+3*, ADCHK+4*, ADCHK+6* |
| TEXT | EXIT+1!, LOOP+3*, ADCHK+8, ADD+3 |
| U | ADCHK+8 |
| V1 | SET+3*, SET+4, SET+5, EXIT+1!, SE+2*, SE+3, SE+4, SE+5*, SE+6, SE+7 , SG1+3*, SG1+4, SG1+5, SG1+6*, SG1+7, SG1+8 |
| >> VAR | EN+1*, EN+4, EN+5, EN+6*, EN+7, EN+8 |
| X | SET1+3*, SET1+4! |
| XCNP | SET1*, SET1+4! |