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 |