VAFCDD01 ;ALB/JRP,LTL-DATA DICTIONARY UTILITIES ;05-SEP-1996
Source file <VAFCDD01.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
AVAFC(DFN) | ;AVAFC* cross reference for PATIENT file (#2)
|
|
PVT4A08(DFN) | ;Create entry in ADT/HL7 PIVOT file for an ADT-A08 event
; and mark it for transmission |
|
PROCESS() | ;
|
|
REGEDIT(PIVOTNUM,FIELDS) | ;
|
|
TRANSMIT(PIVOTNUM) | ;
|
|
MESSAGE(PIVOTPTR,NUMBER) | ;
|
|
REG() | ;
|
|
HL7A08 | ;
|
|
SECA08(DFN) | ;PUT ENTRY IN PIVOT FILE WHEN USER FLAGS A PT AS SENSITIVE IN
|
|
XMITFLAG(PIVOTPTR,PIVOTNUM,TURNOFF) | ;Turn transmission flag for entry
; in ADT/HL7 PIVOT file on/off |
|
SETTFLAG(PIVOTPTR,PIVOTNUM,TURNOFF) | ;Turn transmission flag for entry
; in ADT/HL7 PIVOT file on/off |
Name | Field # of Occurrence |
---|---|
^DIE | REGEDIT+9, TRANSMIT+5, MESSAGE+4, SECA08+11 |
$$PROCESS^VAFCDD01 | HL7A08+14 |
REGEDIT^VAFCDD01 | HL7A08+16 |
TRANSMIT^VAFCDD01 | HL7A08+17, SECA08+13 |
$$PIVNW^VAFHPIVT | PVT4A08+16, HL7A08+10, SECA08+4 |
$$EN^VAFHREG | AVAFC+57 |
$$SEND^VAFHUTL | AVAFC+43, AVAFC+58, PVT4A08+19, PVT4A08+21 |
KILL^VAFHUTL2 | HL7A08+1 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(391.71 | XMITFLAG+40, XMITFLAG+42, XMITFLAG+45, SETTFLAG+36, SETTFLAG+38, SETTFLAG+41 |
^DPT - [#2] | AVAFC+31, PVT4A08+9 |
^VAT(391.71 - [#391.71] | HL7A08+12, SECA08+6, XMITFLAG+26, XMITFLAG+28, XMITFLAG+35*, XMITFLAG+37*, SETTFLAG+26, SETTFLAG+28, SETTFLAG+33* |
Name | Line Occurrences |
---|---|
$$REG | AVAFC+45 |
PVT4A08 | AVAFC+49, AVAFC+60 |
SETTFLAG | AVAFC+63, PVT4A08+21 |
XMITFLAG | AVAFC+52, PVT4A08+19 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | REGEDIT+7*, REGEDIT+10!, TRANSMIT+3*, TRANSMIT+6!, MESSAGE+2*, MESSAGE+5!, SECA08+9*, SECA08+12!, XMITFLAG+24~, XMITFLAG+30* , XMITFLAG+35, XMITFLAG+37, SETTFLAG+24~, SETTFLAG+30*, SETTFLAG+33 |
DFN | AVAFC~, AVAFC+31, AVAFC+49, AVAFC+60, PVT4A08~, PVT4A08+9, PVT4A08+14, PVT4A08+16, HL7A08+1, HL7A08+9 , HL7A08+10, SECA08~, SECA08+3, SECA08+4 |
DIE | REGEDIT+7*, REGEDIT+10!, TRANSMIT+3*, TRANSMIT+6!, MESSAGE+2*, MESSAGE+5!, SECA08+9*, SECA08+12! |
>> DIU(0 | AVAFC+34 |
DR | REGEDIT+8*, REGEDIT+10!, TRANSMIT+4*, TRANSMIT+6!, MESSAGE+3*, MESSAGE+5!, SECA08+10*, SECA08+12! |
DT | PVT4A08+16, HL7A08+10, SECA08+4 |
FIELDS | REGEDIT~ |
IEN | HL7A08+8~, HL7A08+12*, HL7A08+13, HL7A08+16, HL7A08+17, SECA08+2~, SECA08+6*, SECA08+7, SECA08+9, SECA08+13 |
INDEX | PROCESS+4~*, PROCESS+5*, PROCESS+6 |
NODE | XMITFLAG+24~, XMITFLAG+42*, XMITFLAG+43, XMITFLAG+45*, XMITFLAG+46, SETTFLAG+24~, SETTFLAG+38*, SETTFLAG+39, SETTFLAG+41*, SETTFLAG+42 |
NUMBER | MESSAGE~ |
PIVOTNUM | AVAFC+36~, AVAFC+50, AVAFC+52, AVAFC+59, AVAFC+60, AVAFC+61, AVAFC+63, PVT4A08+16*, PVT4A08+17, PVT4A08+19 , PVT4A08+21, REGEDIT~, REGEDIT+7, TRANSMIT~, TRANSMIT+3, HL7A08+8~, HL7A08+10*, HL7A08+11, HL7A08+12, SECA08+2~ , SECA08+4*, SECA08+5, SECA08+6, XMITFLAG~, XMITFLAG+20*, XMITFLAG+21, XMITFLAG+28, SETTFLAG~, SETTFLAG+20*, SETTFLAG+21 , SETTFLAG+28 |
PIVOTPTR | MESSAGE~, MESSAGE+2, XMITFLAG~, XMITFLAG+19*, XMITFLAG+21, XMITFLAG+26, XMITFLAG+28*, XMITFLAG+30, SETTFLAG~, SETTFLAG+19* , SETTFLAG+21, SETTFLAG+26, SETTFLAG+28*, SETTFLAG+30 |
PTR | HL7A08+8~, HL7A08+9*, HL7A08+10, SECA08+2~, SECA08+3*, SECA08+4 |
RETURN | PROCESS+4~*, PROCESS+6*, PROCESS+7, PROCESS+8 |
TURNOFF | XMITFLAG~, XMITFLAG+22*, XMITFLAG+31, SETTFLAG~, SETTFLAG+22*, SETTFLAG+31 |
U | XMITFLAG+37 |
>> VAFCA08 | AVAFC+40 |
VAFCF | AVAFC+38!, AVAFC+46, AVAFC+47, XMITFLAG+37 |
VAFCFLDS | PROCESS+3, HL7A08+7, HL7A08+14*, HL7A08+15, HL7A08+16, HL7A08+18! |
VAFCFLDS( | AVAFC+47*, PROCESS+5 |
>> VAFCFLG | AVAFC+56, AVAFC+57*, PVT4A08+21 |
>> VAFHBEF | HL7A08+1 |
>> VAFHCA08 | AVAFC+55 |
>> VAFHMRG | HL7A08+1 |
VALUE | XMITFLAG+24~, SETTFLAG+24~ |
VARPTR | AVAFC+36~, PVT4A08+14*, PVT4A08+16 |
X | XMITFLAG+24~, XMITFLAG+31*, XMITFLAG+35, SETTFLAG+24~, SETTFLAG+31*, SETTFLAG+33 |
>> XQY0 | REG+3, REG+4 |
XREFNUM | XMITFLAG+24~, XMITFLAG+39*, XMITFLAG+40*, XMITFLAG+42, XMITFLAG+45, SETTFLAG+24~, SETTFLAG+35*, SETTFLAG+36*, SETTFLAG+38, SETTFLAG+41 |