©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DIFGG ;SFISC/XAK,EDE(OHPRD)-FILEGRAM GENERATOR ;7/25/92 2:15 PM
Source file <DIFGG.m>
| Package | Total | Caller Graph |
|---|---|---|
| VA Fileman | 4 | DIFGB DIFGG4 DIFGO DIFGSRV |
| Health Summary Components | 1 | BHSUTL |
| IHS Changes To Pharmacy | 1 | APSQCK2 |
| Patient Care Component | 1 | APCHSUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| BODY | ; FILEGRAM BODY
|
|
| TLR | ; FILEGRAM TRAILER
|
|
| EN | ; EXTERNAL ENTRY POINT
|
|
| HDR | ; FILEGRAM HEADER
|
|
| NEXTLVL2 | ; CHECK TEMPLATE ENTRY
|
|
| FIELDS | ; FILEGRAM FIELDS
|
|
| RECURSE | ; RECURSION FOR DINUM BACK POINTERS AND FORWARD DIRECT POINTERS
|
|
| SEND | ; CALL MAILMAN
|
|
| START | ;
|
|
| INIT | ; INITIALIZATION
|
|
| BASE | ; BASEFILE ENTRY
|
|
| ENV | ; ENVIRONMENTAL VARS
|
|
| EOJ | ;
|
|
| NEXTLVL | ; DO NEXT LEVEL FILES/SUBFILES (CALLED RECURSIVELY)
|
|
| LOG | ; RECORD THE SENDING
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DD( | SEND+2 |
| ^DIAR(1.12 - [#1.12] | LOG+3* |
| ^DIC(3 - [#3] | DIFGG+6 |
| ^DIPT - [#.4] | NEXTLVL+3 |
| ^UTILITY("DIFG" | DIFGG+7! |
| ^UTILITY("DIFGLINK" | EOJ+3! |
| ^VA(200 - [#200] | DIFGG+6 |
| Name | Line Occurrences |
|---|---|
| BASE | BODY+1 |
| BODY | START+3 |
| ENV | START+3 |
| EOJ | START+2, START+3 |
| FIELDS | BASE+2, NEXTLVL2+11 |
| HDR | START+3 |
| INIT | START+1 |
| LOG | DIFGG+7, LOG+2 |
| NEXTLVL | BODY+3, RECURSE+1 |
| NEXTLVL2 | NEXTLVL+3 |
| RECURSE | NEXTLVL2+12 |
| SEND | DIFGG+7 |
| START | DIFGG+7 |
| TLR | START+3 |
| Name | Field # of Occurrence |
|---|---|
| ^( | NEXTLVL+3 |
| ^(0 | DIFGG+6 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %H | EOJ+5! |
| %K | EOJ+5! |
| %W | EOJ+5! |
| >> D | DIFGG+4* |
| DA | LOG+4! |
| DIADD | LOG+2*, LOG+4! |
| >> DIAR | LOG+1, SEND+1 |
| DIC | DIFGG+3, DIFGG+4*, DIFGG+5!, DIFGG+6*, LOG+2*, LOG+4! |
| DIC("A" | DIFGG+3* |
| DIC("S" | DIFGG+4* |
| DIC(0 | DIFGG+4*, DIFGG+6*, LOG+2* |
| DIE | LOG+4! |
| DIFG | DIFGG+3!*, DIFGG+6, DIFGG+7!, LOG+3, SEND+2 |
| DIFG( | HDR+1, NEXTLVL+1*, NEXTLVL+5, NEXTLVL2+2, NEXTLVL2+4, NEXTLVL2+5, NEXTLVL2+6, EOJ+2! |
| DIFG("DUZ" | DIFGG+6*, LOG+3 |
| DIFG("ENV" | ENV+1, ENV+4 |
| DIFG("EV" | ENV+3*, ENV+4*, ENV+5! |
| DIFG("FE" | DIFGG+6*, LOG+3, SEND+2 |
| DIFG("FGR" | SEND+3 |
| DIFG("FUNC" | DIFGG+6* |
| DIFG("NOKEY" | BODY+2! |
| DIFG("PARM" | HDR+1 |
| DIFG("QFLG" | START+2, EOJ+1 |
| DIFG("TEMPLATE" | DIFGG+5*, LOG+3 |
| DIFG2 | EOJ+4! |
| DIFGENV | EOJ+4! |
| >> DIFGER | EOJ+1* |
| DIFGGF | EOJ+4! |
| DIFGGU | EOJ+4! |
| DIFGGUQ | NEXTLVL2+10! |
| DIFGI | NEXTLVL+1, NEXTLVL+3*, NEXTLVL+5*, NEXTLVL2+1*, EOJ+4! |
| DIFGT | DIFGG+5*, NEXTLVL+3, EOJ+4! |
| DILL | HDR+1, NEXTLVL+1, NEXTLVL+2*, NEXTLVL+4*, NEXTLVL+5, NEXTLVL2+1, NEXTLVL2+2, NEXTLVL2+4, NEXTLVL2+5, NEXTLVL2+6 , NEXTLVL2+13, EOJ+4! |
| DITAB | NEXTLVL2+13*, FIELDS+1*, TLR+1*, EOJ+4! |
| >> DK | DIFGG+4* |
| DLAYGO | LOG+2*, LOG+4! |
| DR | LOG+4! |
| DUZ | DIFGG+6, SEND+3 |
| DY | DIFGG+5!, LOG+1, SEND+1 |
| >> I | EOJ+2* |
| S | EOJ+5! |
| U | DIFGG+6, HDR+1, NEXTLVL2+1, NEXTLVL2+2, LOG+2, LOG+3 |
| V | HDR+1*, ENV+4*, NEXTLVL2+14*, TLR+1*, EOJ+5! |
| X | NEXTLVL+3*, NEXTLVL2+1, NEXTLVL2+2, LOG+2*, EOJ+5! |
| >> XMDUZ | SEND+3* |
| >> XMSUB | SEND+2* |
| >> XMTEXT | SEND+3* |
| XMZ | LOG+3, LOG+4! |
| Y | DIFGG+4, DIFGG+5, DIFGG+6, HDR+3!, LOG+2, LOG+3 |