APCPDRPP ; IHS/TUCSON/LAB - OHPRD-TUCSON/LAB Check PV and Prov prior to tx generation AUGUST 14, 1992 ; [ 02/14/00 2:26 PM ]
Source file <APCPDRPP.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Patient Care Component Data Transmission | 2 | APCPAH APCPAPC | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| START | ; | |
| CHKPROV | ;EP | |
| POS | ; Provider Code. CP | |
| EOJ | ; | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNVPOV("AD" | START+4 | 
| ^AUPNVPRV - [#9000010.06] | CHKPROV+1 | 
| ^AUPNVPRV("AD" | CHKPROV+1 | 
| ^DIC(6 - [#6] | POS+2 | 
| ^VA(200 - [#200] | POS+1 | 
| Name | Line Occurrences | 
|---|---|
| CHKPROV | START+2 | 
| EOJ | START+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> APCP("V DFN" | START+4, CHKPROV+1 | 
| APCP1 | EOJ+1!, CHKPROV+1*, CHKPROV+2, CHKPROV+3 | 
| APCP2 | EOJ+1!, CHKPROV+1* | 
| APCPE | START+1!, START+3 | 
| APCPE("ERROR" | START+4*, CHKPROV+2*, CHKPROV+3*, POS+1*, POS+2*, POS+3*, POS+4*, POS+5* | 
| APCPL | POS+8! | 
| >> APCPS("PROV F | ILE" , POS+1, POS+2, POS+3, POS+4, POS+5 | 
| >> APCPV("PP AFF | L" , POS+3*, POS+7 | 
| >> APCPV("PP COD | E" , POS+5*, POS+6*, POS+7 | 
| >> APCPV("PP DFN | " , CHKPROV+1*, POS+1, POS+2, POS+3, POS+4, POS+5 | 
| >> APCPV("PP DIS | C" , POS+4*, POS+7 | 
| >> APCPV("PP POS | " , POS+7* | 
| >> APCPV("PP VPR | V DFN" , CHKPROV+1* | 
| >> APCPV("TX" | EOJ+1! | 
| >> I | POS+6* | 
| >> L | POS+6* | 
| U | CHKPROV+1 |