DGYLPOST ;ALB/CAW;Update VA Admitting Regulation/HL7 file;8/10/94<<= NOT VERIFIED >
Source file <DGYLPOST.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
INDEX | ; Reindex VA ADMITTING REGULATION file
|
|
EN | ;
|
|
HL7 | ; Update HL7 version and segment files
|
|
HL7713 | ||
ENQ | ||
INIT | ;Place active codes in an array
|
|
CLEAN | ;Clean up existing entries; add new if doesn't exit
|
|
NEW | ;Add new entry
|
|
INACT | ;Inactivate entry
|
|
ADM | ;List of active VA ADMITTING REGULATIONS
|
|
NMCHG | ;Change the name of codes
|
|
MESA | ;Message to add new entry
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(43.4 - [#43.4] | Classic Fileman Calls |
^HL(770 - [#770] | Classic Fileman Calls |
^HL(771.3 - [#771.3] | Classic Fileman Calls |
^HL(771.5 - [#771.5] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(43.4 - [#43.4] | NMCHG+3, NMCHG+5, CLEAN+4, CLEAN+6, CLEAN+9, INACT+3, INACT+4*, INACT+5* |
^HL(770 - [#770] | HL7+5 |
^HL(771.3 - [#771.3] | HL7713 |
^HL(771.5 - [#771.5] | HL7+3 |
Name | Line Occurrences |
---|---|
CLEAN | EN+4 |
HL7 | EN+7 |
HL7713 | HL7+3 |
INACT | CLEAN+5, CLEAN+9 |
INDEX | EN+6 |
INIT | EN+2 |
MESA | NEW+9 |
NEW | EN+5 |
NMCHG | EN+3 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ADM | ENQ! |
ADM( | INIT+2*, CLEAN+5, CLEAN+7, CLEAN+10!, NEW+5, NEW+7, NEW+8, MESA+1 |
DA | NMCHG+2~, NMCHG+4*, NMCHG+6*, CLEAN+2~, CLEAN+7*, HL7+2~, HL7+5*, HL7+6, HL7713+1*, HL7713+2* |
DD | HL7+4!, HL7713+1! |
DGA | CLEAN+2~, CLEAN+3*, CLEAN+6*, CLEAN+7, CLEAN+9*, INACT+2, INACT+3 |
DGA1 | CLEAN+2~, INACT+2*, INACT+3*, INACT+4, INACT+5* |
DGC | INIT+1~, INIT+2* |
DGI | INIT+1~, INIT+2*, NMCHG+2~, NMCHG+3*, NMCHG+4, NMCHG+5*, NMCHG+6, CLEAN+2~, CLEAN+3*, CLEAN+4* , CLEAN+5, CLEAN+6, CLEAN+7, CLEAN+9, CLEAN+10, INACT+3, INACT+5, NEW+2~, NEW+3*, NEW+5* , NEW+7, NEW+8, MESA+1 |
DIC | NEW+2~, NEW+6*, HL7+2~, HL7+4*, HL7713+1*, HL7713+2 |
DIC("DR" | NEW+8* |
DIC(0 | NEW+6*, HL7+4*, HL7713+1* |
DIE | NMCHG+2~, NMCHG+4*, NMCHG+6*, CLEAN+2~, CLEAN+7*, HL7+2~, HL7+6*, HL7713+2* |
DIK | INDEX+1~, INDEX+2* |
DIK(1 | INDEX+2* |
DLAYGO | NEW+2~, NEW+6*, HL7+2~, HL7+4*, HL7713+1* |
DO | HL7+4!, HL7713+1! |
DR | NMCHG+2~, NMCHG+4*, NMCHG+6*, CLEAN+2~, CLEAN+7*, HL7+6*, HL7713+2* |
HLVER | HL7+2~, HL7+3*, HL7+5* |
U | INIT+2, CLEAN+7, INACT+4, INACT+5, NEW+7, NEW+8, MESA+1 |
X | NEW+2~, NEW+7*, HL7+2~, HL7+4*, HL7713+1* |
Y | NEW+2~, HL7+2~, HL7+5, HL7+6, HL7713+1, HL7713+2 |
Name | Field # of Occurrence |
---|---|
$T(ADM+DGI | INIT+2 |