APCPAPC ; IHS/TUCSON/LAB - create APC,INPT and Contract transactions AUGUST 14, 1992 ; [ 04/15/02 8:52 AM ]
Source file <APCPAPC.m>
Package | Total | Call Graph |
---|---|---|
Patient Care Component Data Transmission | 3 | ^APCPAA COUNT^APCPDR2 ^APCPDRPP |
Package | Total | Caller Graph |
---|---|---|
Patient Care Component Data Transmission | 1 | APCPDR2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
CHKCL | ;
|
|
START | ;process APC transactios
|
|
GETACC | ;EP - Get accept command if there is one and save variable
|
|
APC | ;
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVINP - [#9000010.02] | GETACC+9 |
^AUPNVINP("AD" | GETACC+7 |
^AUPNVMED("AD" | CHKCL+3 |
^AUPNVPOV - [#9000010.07] | GETACC+2 |
^AUPNVPOV("AD" | GETACC+2 |
^AUPNVPRC - [#9000010.08] | GETACC+5 |
^AUPNVPRC("AD" | GETACC+5 |
Name | Line Occurrences |
---|---|
CHKCL | APC+2 |
GETACC | APC+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> APCP("V DFN" | CHKCL+3, GETACC+2, GETACC+5, GETACC+7 |
>> APCPE | APC+6 |
>> APCPT(1 | GETACC+7*, GETACC+8, GETACC+9 |
>> APCPT(2 | GETACC+2*, GETACC+5* |
>> APCPV("ACC" | GETACC+2*, GETACC+3, GETACC+5*, GETACC+6, GETACC+9* |
>> APCPV("CLINIC | CODE" , CHKCL+2, CHKCL+4* |
>> APCPV("SKIP" | APC+3, CHKCL+3* |
>> APCPV("TYPE" | APC+1 |
U | GETACC+2, GETACC+5, GETACC+9 |