BHLPID ; cmi/flag/maw - BHL IHS PID Supplement ; [ 06/10/2002 6:51 AM ]
Source file <BHLPID.m>
Package | Total | Call Graph |
---|---|---|
IHS Patient | 1 | $$HRN^AUPNPAT |
IHS VA Utilities | 1 | $$VAL^XBDIQ1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
QRY | ;EP - setup the V02 PID segment
|
|
PID3 | ;-- this will generate the IHS PID-3 field
|
|
PID4 | ;-- this will generate the IHS PID-4 field
|
|
LZERO(V,L) | ;EP - left zero fill
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNPAT - [#9000001] | PID4+2 |
Name | Line Occurrences |
---|---|
$$LZERO | PID3+1, PID4+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | LZERO+1~, LZERO+2* |
>> BHL("SSN" | PID3+5*, PID4+9 |
>> BHLASU | PID3+2*, PID3+4, PID4+5*, PID4+8 |
>> BHLCNT | PID4+1*, PID4+7*, PID4+8, QRY+1*, QRY+4*, QRY+5 |
>> BHLDA | PID4+2*, PID4+3, PID4+4, PID4+5, PID4+6, QRY+3*, QRY+5 |
>> BHLLOC | PID3+3*, PID4+6* |
>> BHLPAT( | QRY+3, QRY+5 |
>> BHLPAT(1 | QRY+2 |
>> BHLRN | PID3+1*, PID3+4, PID4+4*, PID4+8 |
DUZ(2 | PID3+1, PID3+2, PID3+3, PID4+3 |
I | LZERO+1~, LZERO+2* |
>> INA("PID3" | PID3+4*, PID4+9*, PID4+10* |
>> INA("PID4" | PID4+8*, PID4+9 |
>> INDA | PID3+1, PID3+5, PID4+2, PID4+4, QRY+2* |
>> INDA(2 | QRY+5* |
L | LZERO~, LZERO+2 |
>> RS | PID4+8, PID4+9 |
V | LZERO~, LZERO+2*, LZERO+3 |
>> Z | LZERO+2* |