BHLZP1I ; cmi/sitka/maw - BHL File Incoming ZP1 segment ;
Source file <BHLZP1I.m>
Package | Total | Call Graph |
---|---|---|
VA Fileman | 2 | ^DIC ^DIE |
IHS Support HL7 Interfaces | 1 | CHKPAT^BHLPIDI |
Name | Comments | DBIA/ICR reference |
---|---|---|
PROCESS | ;-- process and file the data
|
|
CHKPAT | ;-- this will get the HRCN and lookup to find the patient
|
|
MAIN | ;-- this is the main routine driver
|
|
EOJ | ;-- end of job kill variables
|
FileNo | Call Tags |
---|---|
^AUPNPAT - [#9000001] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^BHLS("B" | CHKPAT+3 |
Name | Line Occurrences |
---|---|
EOJ | MAIN+1 |
PROCESS | MAIN+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> BHLDA | PROCESS+1*, PROCESS+2, PROCESS+3, PROCESS+4, PROCESS+5, PROCESS+6, CHKPAT+4*, CHKPAT+5, CHKPAT+6, CHKPAT+7 |
>> BHLDFN | CHKPAT+10* |
>> BHLDI | PROCESS+4*, PROCESS+14 |
>> BHLDIEM | PROCESS+14, PROCESS+15, PROCESS+16 |
BHLDR | EOJ+2! |
>> BHLDUZ2 | CHKPAT+8* |
>> BHLERCD | PROCESS+11* |
>> BHLERR | PROCESS+11 |
BHLFL | PROCESS+12*, EOJ+2! |
BHLFL2 | PROCESS+12*, EOJ+2! |
BHLFLD | PROCESS+14*, PROCESS+15*, PROCESS+16*, EOJ+2! |
BHLFLD2 | EOJ+3! |
BHLHRCN | PROCESS+2*, PROCESS+9, CHKPAT+5*, CHKPAT+9, EOJ+2! |
BHLHRFAC | PROCESS+3*, PROCESS+8, PROCESS+13, CHKPAT+6*, CHKPAT+8, EOJ+2! |
>> BHLPAT | PROCESS+8, PROCESS+12, CHKPAT+4, CHKPAT+12 |
BHLR | CHKPAT+2~, CHKPAT+3* |
BHLRD | PROCESS+5*, PROCESS+15, EOJ+2! |
>> BHLRS | PROCESS+6*, PROCESS+16 |
>> BHLSGIEN | CHKPAT+3* |
>> BHLTMP | PROCESS+1, PROCESS+2, PROCESS+3, PROCESS+4, PROCESS+5, PROCESS+6, CHKPAT+4, CHKPAT+5, CHKPAT+6, CHKPAT+7 , EOJ+1 |
BHLVAL | PROCESS+13*, EOJ+2! |
BHLVAL2 | PROCESS+14*, PROCESS+15*, PROCESS+16*, EOJ+3! |
BHLX | PROCESS+12*, EOJ+3! |
DA | PROCESS+7!, PROCESS+8* |
DIC | CHKPAT+9!*, CHKPAT+13! |
DIC(0 | CHKPAT+9* |
DIE | PROCESS+7!, PROCESS+8* |
DR | PROCESS+7!, PROCESS+8* |
DR(2 | PROCESS+9* |
DUZ(2 | CHKPAT+8* |
U | PROCESS+3, CHKPAT+6 |
>> X | CHKPAT+9* |
>> Y | PROCESS+11, CHKPAT+10 |