ECXPRO2 ;ALB/GTS - Prosthetics Extract for DSS (Continued) ;3/26/15 16:38
Source file <ECXPRO2.m>
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ECXBUL(ECXLNE,ECXEBDT,ECXEEDT,ECNUM) | ;* Set up the header for the exception msg
|
|
| ECXMISLN(ECXMISS,ECXLNE,ECXPIEN) | ;** Report Missing Lines
|
|
| ECXFLD | ;* Missing Required fields
|
|
| FEEDINFO(ECXSRCE,ECXHCPCS,ECXTYPE,ECXSTAT2,ECXRQST,ECXRCST,ECXLAB,ECXNPPDC) | ;Get Feeder Key and Feeder Location
; Input ; ECXSTAT2 - Station Number for extract ; ECXTYPE - Type of Transaction work performed ; ECXSRCE - Source of prosthesis ; ECXHCPCS - HCPCS code for prosthesis ; ECXRQST - Requesting Station ; ECXRCST - Receiving Station ; ECXLAB - Lab or non-Lab ; ECXNPPDC - NPPD Code ; Output (to be KILLed by calling routine) ; ECXFELOC - Feeder Location ; ECXFEKEY - Feeder Key |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^TMP("ECX-PRO EXC" | ECXBUL+12*, ECXBUL+13*, ECXBUL+14*, ECXBUL+15*, ECXBUL+16*, ECXBUL+17*, ECXBUL+18*, ECXBUL+19*, ECXBUL+20*, ECXBUL+21* , ECXBUL+22*, ECXBUL+23*, ECXBUL+24*, ECXBUL+25*, ECXBUL+26*, ECXBUL+27*, ECXMISLN+6*, ECXMISLN+8*, ECXMISLN+11* |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ECNUM | ECXBUL~, ECXBUL+13, ECXBUL+21 |
| ECXEBDT | ECXBUL~, ECXBUL+13 |
| ECXEEDT | ECXBUL~, ECXBUL+13 |
| >> ECXFEKEY | FEEDINFO+20*, FEEDINFO+29*, FEEDINFO+33*, FEEDINFO+34* |
| >> ECXFELOC | FEEDINFO+19*, FEEDINFO+23*, FEEDINFO+28*, FEEDINFO+32* |
| ECXFIELD | ECXMISLN+1~, ECXMISLN+5*, ECXMISLN+6, ECXMISLN+8 |
| ECXFIRST | ECXMISLN+1~, ECXMISLN+2*, ECXMISLN+6, ECXMISLN+7, ECXMISLN+9* |
| >> ECXFORM | FEEDINFO+34 |
| ECXHCPCS | FEEDINFO~, FEEDINFO+20 |
| ECXLAB | FEEDINFO~, FEEDINFO+23, FEEDINFO+26, FEEDINFO+30 |
| ECXLNE | ECXBUL~, ECXBUL+28*, ECXMISLN~, ECXMISLN+6, ECXMISLN+8, ECXMISLN+10*, ECXMISLN+11, ECXMISLN+12* |
| ECXMISS | ECXMISLN~, ECXMISLN+4 |
| ECXNPPDC | FEEDINFO~, FEEDINFO+23 |
| ECXPCE | ECXMISLN+1~, ECXMISLN+3*, ECXMISLN+4 |
| ECXPIEN | ECXMISLN~, ECXMISLN+8 |
| ECXRCST | FEEDINFO~, FEEDINFO+27, FEEDINFO+28, FEEDINFO+33 |
| ECXRQST | FEEDINFO~, FEEDINFO+29, FEEDINFO+31, FEEDINFO+32 |
| ECXSRCE | FEEDINFO~, FEEDINFO+20 |
| ECXSTAT2 | FEEDINFO~, FEEDINFO+23, FEEDINFO+27, FEEDINFO+31 |
| ECXTYPE | FEEDINFO~, FEEDINFO+20 |
| U | FEEDINFO+34 |
| Name | Field # of Occurrence |
|---|---|
| $T(ECXFLD+ECXPCE | ECXMISLN+5 |