IBCNERPC ;DAOU/RO - PAYER LINK REPORT - Compile & Print;AUG-2003
Source file <IBCNERPC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
COMPILE(IBCNERTN,IBCNESPC) | ; Entry point called from EN^XUTMDEVQ.
; IBCNERTN = Routine name for ^TMP($J,... ; IBCNESPC = Array of params |
|
COMPILEX | ; COMPILE exit
|
|
GETDATA | ; Compile the data.
|
|
GETDATA1 | ; Process the current payer.
|
|
SORTIT | ; Set SORT params...use the negative of IBCT to sort in reverse order.
|
|
SAVDATA(APP) | ; Save data to print
|
|
;
|
||
PRINT1 | ; Print report
|
|
PRINT2 | ;
|
|
HEADER(APP,HDRNAME,HDRDATE) | ; Report header
|
|
DATA(DIS) | ; Build disp lines
|
|
EHDR | ; EXCEL header
|
|
LINE(DIS) | ; Print data
|
|
LINEX | ||
CENTER(LINE,XWIDTH) | ;return centered line OFFSET
; IB*2*687/DTG start change for space |
Name | Field # of Occurrence |
---|---|
^%ZISC | COMPILEX+2 |
$$S^%ZTLOAD | HEADER+6 |
$$FIND1^DIC | GETDATA1+3 |
$$GET1^DIQ | GETDATA+22, GETDATA1+33, GETDATA1+34, GETDATA1+35 |
^DIR | PRINT+14, PRINT+15, HEADER+4 |
$$FO^IBCNEUT1 | DATA+23, DATA+24, DATA+25, DATA+27, DATA+37, DATA+44, DATA+45 |
$$PYRAPP^IBCNEUT5 | GETDATA+23, GETDATA1+6 |
$$PYRDEACT^IBCNINSU | GETDATA+21 |
PAYER^IBCNINSU | GETDATA1+4 |
$$FMTE^XLFDT | PRINT+4, EHDR+9 |
$$NOW^XLFDT | PRINT+4, EHDR+9 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | GET1^DIQ |
^IBE(365.12 - [#365.12] | GET1^DIQ |
^IBE(365.13 - [#365.13] | FIND1^DIC |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(36 - [#36] | GETDATA1+26, GETDATA1+27, GETDATA1+28, GETDATA1+29 |
^DIC(5 - [#5] | GETDATA1+34 |
^IBE(365.12 - [#365.12] | GETDATA+20 |
^TMP($J | COMPILE+14!, COMPILEX+1!, GETDATA+3!, GETDATA+6*, GETDATA+7*, GETDATA1+36*, SAVDATA+2*, SAVDATA+4*, PRINT1+5, PRINT1+10 , PRINT1+11, PRINT1+12, PRINT1+13, PRINT1+14, PRINT1+19, PRINT1+28, PRINT1+33, PRINT1+38, PRINT1+39, PRINT1+40 , PRINT1+41, PRINT1+42, DATA+4, DATA+5, DATA+6, DATA+12, DATA+15, DATA+16, DATA+17, DATA+18 |
Name | Line Occurrences |
---|---|
$$CENTER | PRINT1+7, PRINT1+24, PRINT1+35, PRINT2+5, HEADER+14 |
DATA | PRINT1+16, PRINT1+44 |
EHDR | PRINT1+4 |
GETDATA | COMPILE+15 |
GETDATA1 | GETDATA+15, GETDATA+24 |
HEADER | PRINT1+6, PRINT1+23, PRINT1+34, PRINT1+37, PRINT2+4, LINE+6 |
LINE | PRINT1+16, PRINT1+44 |
COMPILE+16 | |
PRINT1 | PRINT+11 |
PRINT2 | PRINT1+3 |
SAVDATA | SORTIT+5, SORTIT+8, SORTIT+14, SORTIT+17, SORTIT+23, SORTIT+26, SORTIT+32, SORTIT+35, SORTIT+41, SORTIT+44 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALSOEIV | GETDATA1+1~, GETDATA1+15*, SAVDATA+2 |
ALSOIIU | GETDATA1+1~, GETDATA1+16*, SAVDATA+2 |
APP | SAVDATA~, SAVDATA+2, PRINT+1~, PRINT+5*, PRINT1+1*, PRINT1+6, PRINT1+28*, PRINT1+29, PRINT1+33, PRINT1+34 , PRINT1+37, PRINT1+38, PRINT1+39, PRINT1+40, PRINT1+41, PRINT1+42, HEADER~, HEADER+8, HEADER+18, HEADER+20 , HEADER+21, HEADER+27, HEADER+28, DATA+5, LINE+6 |
APPEIV | GETDATA1+1~, GETDATA1+3* |
APPIIU | GETDATA1+1~, GETDATA1+3* |
AUTUPD | GETDATA1+1~, GETDATA1+17*, SAVDATA+2, SAVDATA+4 |
CITY | DATA+1~, DATA+38*, DATA+43 |
CRT | PRINT+1~, PRINT+9*, PRINT+10*, PRINT+12, PRINT+15, HEADER+2 |
CSZ | DATA+1~, DATA+43*, DATA+44 |
CT | DATA+1~ |
CT2 | DATA+1~ |
DASHES | PRINT+1~, PRINT+5*, HEADER+29 |
DIR | PRINT+14!, PRINT+15!, HEADER+1~, HEADER+4! |
DIR(0 | PRINT+14*, PRINT+15*, HEADER+4* |
DIS | PRINT+1~, DATA~, LINE~ |
DIS( | DATA+12*, DATA+20*, DATA+23*, DATA+24*, DATA+25*, DATA+26*, DATA+27*, DATA+32*, DATA+37*, DATA+44* , DATA+45*, DATA+46*, LINE+7 |
DIS("" | LINE+2 |
DISPDATA | PRINT1+15!, PRINT1+16, PRINT1+43!, PRINT1+44 |
DTOUT | HEADER+1~, HEADER+5 |
DUOUT | HEADER+1~, HEADER+5 |
EDIINST | GETDATA1+1~, GETDATA1+14*, SAVDATA+2, SAVDATA+4 |
EDIPROF | GETDATA1+1~, GETDATA1+14*, SAVDATA+2, SAVDATA+4 |
ELINE | DATA+1~, DATA+11*, DATA+12, DATA+20 |
EORMSG | PRINT+1~, PRINT+2*, PRINT2+5 |
HDR | HEADER+1~, EHDR+1~, EHDR+2*, EHDR+5*, EHDR+7* |
HDRDATE | PRINT+1~, PRINT+4*, PRINT1+6, PRINT1+23, PRINT1+34, PRINT1+37, PRINT2+4, HEADER~, HEADER+7*, HEADER+15 , HEADER+16, LINE+6 |
HDRDET | HEADER+1~, HEADER+7*, HEADER+8*, HEADER+10*, HEADER+12*, HEADER+14, HEADER+16 |
HDRNAME | PRINT+1~, PRINT+4*, PRINT1+6, PRINT1+23, PRINT1+34, PRINT1+37, PRINT2+4, HEADER~, HEADER+14, HEADER+16 , LINE+6 |
IBAPP | COMPILE+5~, PRINT1+22*, PRINT1+23 |
IBCNERTN | COMPILE~, COMPILE+14, COMPILEX+1, GETDATA+3, GETDATA+6, GETDATA+7, GETDATA1+36, SAVDATA+2, SAVDATA+4, PRINT1+5 , PRINT1+10, PRINT1+11, PRINT1+12, PRINT1+13, PRINT1+14, PRINT1+19, PRINT1+28, PRINT1+33, PRINT1+38, PRINT1+39 , PRINT1+40, PRINT1+41, PRINT1+42, DATA+4, DATA+5, DATA+6, DATA+12, DATA+15, DATA+16, DATA+17 , DATA+18 |
IBCNESPC | COMPILE~ |
IBCNESPC("PAPP" | COMPILE+7 |
IBCNESPC("PDEACT" | COMPILE+8 |
IBCNESPC("PDET" | COMPILE+9 |
IBCNESPC("POUT" | COMPILE+10 |
IBCNESPC("PPYR" | COMPILE+11 |
IBCNESPC("PSORT" | COMPILE+12 |
IBCNESPC("PTYPE" | COMPILE+13 |
IBCT | GETDATA1+1~, GETDATA1+25*, GETDATA1+30*, SORTIT+2, SORTIT+11, SORTIT+20, SORTIT+29, SORTIT+38, SAVDATA+2, SAVDATA+4 |
IBEIVIEN | GETDATA1+1~, GETDATA1+6*, GETDATA1+7 |
IBII | COMPILE+5~, PRINT1+21*, PRINT1+22 |
IBIIUIEN | GETDATA1+1~, GETDATA1+6*, GETDATA1+8 |
IBIJ | COMPILE+5~, PRINT1+22* |
IBINS | GETDATA1+1~, GETDATA1+25*, GETDATA1+28*, GETDATA1+29, GETDATA1+33, GETDATA1+34, GETDATA1+35, GETDATA1+36, DATA+10~, DATA+14* , DATA+17*, DATA+18 |
IBINSN | GETDATA1+1~, GETDATA1+29*, GETDATA1+36, DATA+10~, DATA+14*, DATA+16*, DATA+17, DATA+18, DATA+20 |
IBPGC | PRINT+1~, PRINT+6*, PRINT+12, PRINT2+4, HEADER+2, HEADER+7*, LINE+6 |
IBPXT | PRINT+1~, PRINT+6*, PRINT+11, PRINT1+10, PRINT1+11, PRINT1+12, PRINT1+13, PRINT1+14, PRINT1+28, PRINT1+37 , PRINT1+38, PRINT1+39, PRINT1+40, PRINT1+41, PRINT1+42, PRINT2+1, PRINT2+3, HEADER+2, HEADER+5*, LINE+4 , LINE+5, LINE+6 |
IBPY | GETDATA+2~, GETDATA+13*, GETDATA+19*, GETDATA+20*, GETDATA+21, GETDATA+22, GETDATA+23, GETDATA1+4, GETDATA1+6, GETDATA1+7 , GETDATA1+8, GETDATA1+13, GETDATA1+14, GETDATA1+26, GETDATA1+27, GETDATA1+28, GETDATA1+36, SAVDATA+2, SAVDATA+4, DATA+10~ , DATA+11*, DATA+12, DATA+15, DATA+16, DATA+17, DATA+18 |
IBPYR | GETDATA+2~, GETDATA+14*, GETDATA+22*, SORTIT+2, SORTIT+11, SORTIT+20, SORTIT+29, SORTIT+38, SAVDATA+2, SAVDATA+4 |
INCO | DATA+1~, DATA+6* |
INCO( | DATA+34, DATA+35, DATA+36 |
INCO("" | DATA+30 |
INSDATA | GETDATA1+1~, GETDATA1+34*, GETDATA1+35*, GETDATA1+36, DATA+33*, DATA+36*, DATA+37, DATA+38, DATA+41, DATA+42 , DATA+45 |
INSNA | DATA+1~, DATA+33*, DATA+34*, DATA+35, DATA+36, DATA+37 |
INSNO | DATA+1~, DATA+33*, DATA+35*, DATA+36 |
INSR | DATA+1~, DATA+10~, DATA+18*, DATA+20 |
IOF | HEADER+16 |
IOSL | PRINT+9, PRINT+10 |
IOST | GETDATA+9, PRINT+10 |
LCT | DATA+1~, DATA+10~, DATA+12*, DATA+14*, DATA+19*, DATA+20, DATA+23*, DATA+24, DATA+25, DATA+26 , DATA+27, DATA+31*, DATA+32, DATA+37*, DATA+44, DATA+45, DATA+46, DATA+48* |
LE | CENTER+2~, CENTER+3* |
LIN | PRINT+13*, HEADER+1~, HEADER+3* |
LINE | CENTER~, CENTER+3 |
LNCT | LINE+1~, LINE+4*, LINE+7 |
LNTOT | LINE+1~, LINE+2*, LINE+4 |
LOCENB | GETDATA1+2~ |
LOCENB( | SAVDATA+2 |
LOCENB("EIV" | GETDATA1+21*, SORTIT+4, SORTIT+13, SORTIT+22, SORTIT+31, SORTIT+40, SAVDATA+4 |
LOCENB("IIU" | GETDATA1+22*, SORTIT+7, SORTIT+16, SORTIT+25, SORTIT+34, SORTIT+43, SAVDATA+4 |
MAXCNT | PRINT+1~, PRINT+9*, PRINT+10*, PRINT+13, PRINT2+4, HEADER+3, LINE+6 |
NATENB | GETDATA1+2~ |
NATENB( | SAVDATA+2 |
NATENB("EIV" | GETDATA1+19*, SORTIT+4, SORTIT+13, SORTIT+22, SORTIT+31, SORTIT+40, SAVDATA+4 |
NATENB("IIU" | GETDATA1+20*, SORTIT+7, SORTIT+16, SORTIT+25, SORTIT+34, SORTIT+43, SAVDATA+4 |
NOLNKCOS | GETDATA1+2~ |
NONEMSG | PRINT+1~, PRINT+3*, PRINT1+7, PRINT1+24, PRINT1+35 |
NWPG | LINE+1~, LINE+3*, LINE+6* |
OF | CENTER+2~, CENTER+3*, CENTER+4 |
OFFSET1 | HEADER+1~, HEADER+14*, HEADER+16 |
OFFSET2 | HEADER+1~, HEADER+15*, HEADER+16 |
PAPP | COMPILE+3~, COMPILE+7*, GETDATA+6, GETDATA+7, GETDATA1+10, GETDATA1+11, SORTIT+3, SORTIT+6, SORTIT+12, SORTIT+15 , SORTIT+21, SORTIT+24, SORTIT+30, SORTIT+33, SORTIT+39, SORTIT+42, PRINT1+21, PRINT1+22 |
PAPPARY | GETDATA1+2~, GETDATA1+4 |
PAPPARY( | GETDATA1+13, GETDATA1+14, GETDATA1+15, GETDATA1+16, GETDATA1+17, GETDATA1+18, GETDATA1+19, GETDATA1+20, GETDATA1+21, GETDATA1+22 |
PDEACT | COMPILE+3~, COMPILE+8*, GETDATA+21 |
PDET | COMPILE+3~, COMPILE+9*, GETDATA1+32, HEADER+12, DATA+12, DATA+29, EHDR+7, EHDR+14 |
PEINEIV | GETDATA1+2~, GETDATA1+5*, GETDATA1+7*, GETDATA1+10, GETDATA1+15, GETDATA1+17, GETDATA1+19, GETDATA1+21, SORTIT+3, SORTIT+12 , SORTIT+21, SORTIT+30, SORTIT+39 |
PEINIIU | GETDATA1+2~, GETDATA1+5*, GETDATA1+8*, GETDATA1+11, GETDATA1+16, GETDATA1+18, GETDATA1+20, GETDATA1+22, SORTIT+6, SORTIT+15 , SORTIT+24, SORTIT+33, SORTIT+42 |
POUT | COMPILE+3~, COMPILE+10*, GETDATA+9, SAVDATA+1, PRINT+8*, PRINT+15, PRINT1+3, PRINT1+32, PRINT2+3, DATA+4 , DATA+5, DATA+9, LINE+5 |
PPYR | COMPILE+3~, COMPILE+11*, GETDATA+12, GETDATA+13, GETDATA+14, HEADER+8, HEADER+18, EHDR+5, EHDR+11 |
PREVAPP | PRINT+1~, PRINT1+1*, PRINT1+29*, PRINT2+4 |
PSORT | COMPILE+3~, COMPILE+12*, SORTIT+1, SORTIT+10, SORTIT+19, SORTIT+28, SORTIT+37 |
PTYPE | COMPILE+3~, COMPILE+13*, GETDATA1+26, GETDATA1+27, HEADER+8, HEADER+9, EHDR+5, EHDR+7 |
PYRNO | DATA+1~ |
RCVIIU | GETDATA1+2~, GETDATA1+18*, SAVDATA+2, SAVDATA+4 |
RPT | DATA+1~, DATA+4*, DATA+5*, DATA+6, DATA+11, DATA+23, DATA+24, DATA+25, DATA+26, DATA+27 , DATA+46 |
SORT1 | SORTIT+2*, SORTIT+11*, SORTIT+22*, SORTIT+25*, SORTIT+31*, SORTIT+34*, SORTIT+38*, SAVDATA+2, SAVDATA+4, PRINT+1~ , PRINT+5*, PRINT1+10*, PRINT1+11, PRINT1+12, PRINT1+13, PRINT1+14, PRINT1+38*, PRINT1+39, PRINT1+40, PRINT1+41 , PRINT1+42, DATA+4, DATA+5 |
SORT2 | SORTIT+2*, SORTIT+11*, SORTIT+20*, SORTIT+29*, SORTIT+38*, SAVDATA+2, SAVDATA+4, PRINT+1~, PRINT+5*, PRINT1+11* , PRINT1+12, PRINT1+13, PRINT1+14, PRINT1+39*, PRINT1+40, PRINT1+41, PRINT1+42, DATA+4, DATA+5 |
SORT3 | SORTIT+4*, SORTIT+7*, SORTIT+13*, SORTIT+16*, SORTIT+20*, SORTIT+29*, SORTIT+38*, SAVDATA+2, SAVDATA+4, PRINT+1~ , PRINT+5*, PRINT1+12*, PRINT1+13, PRINT1+14, PRINT1+40*, PRINT1+41, PRINT1+42, DATA+4, DATA+5 |
SORT4 | SORTIT+4*, SORTIT+7*, SORTIT+13*, SORTIT+16*, SORTIT+22*, SORTIT+25*, SORTIT+31*, SORTIT+34*, SORTIT+40*, SORTIT+43* , SAVDATA+2, SAVDATA+4, PRINT+1~, PRINT+5*, PRINT1+13*, PRINT1+14, PRINT1+41*, PRINT1+42, DATA+4, DATA+5 |
SORT5 | SORTIT+2*, SORTIT+11*, SORTIT+20*, SORTIT+29*, SORTIT+40*, SORTIT+43*, SAVDATA+2, SAVDATA+4, PRINT+1~, PRINT+5* , PRINT1+14*, PRINT1+42*, DATA+4, DATA+5 |
SPACES | DATA+1~, DATA+3*, DATA+26, DATA+32, DATA+46 |
STATECD | GETDATA1+2~, GETDATA1+33*, GETDATA1+34 |
STZIP | DATA+1~, DATA+40*, DATA+41*, DATA+42*, DATA+43 |
U | GETDATA+14, GETDATA1+7, GETDATA1+8, GETDATA1+15, GETDATA1+16, GETDATA1+17, GETDATA1+18, GETDATA1+19, GETDATA1+20, GETDATA1+21 , GETDATA1+22, GETDATA1+29, GETDATA1+34, GETDATA1+35, SORTIT+3, SORTIT+6, SORTIT+12, SORTIT+15, SORTIT+21, SORTIT+24 , SORTIT+30, SORTIT+33, SORTIT+39, SORTIT+42, SAVDATA+2, SAVDATA+4, PRINT+8, DATA+6, DATA+11, DATA+20 , DATA+23, DATA+24, DATA+25, DATA+26, DATA+27, DATA+37, DATA+38, DATA+41, DATA+42, DATA+45 , DATA+46 |
VAID | GETDATA1+2~, GETDATA1+13*, SORTIT+2, SORTIT+11, SORTIT+20, SORTIT+29, SORTIT+38, SAVDATA+2, SAVDATA+4 |
X | HEADER+1~, EHDR+1~, EHDR+2*, EHDR+3, EHDR+13*, EHDR+14*, EHDR+15 |
XWIDTH | CENTER~, CENTER+3 |
XX | DATA+10~, DATA+14* |
Y | HEADER+1~ |
>> ZTQUEUED | COMPILEX+3, GETDATA+9, PRINT+12, PRINT+15, HEADER+2, HEADER+6 |
>> ZTREQ | COMPILEX+3* |
ZTSTOP | GETDATA+20, PRINT+1~, PRINT+11, PRINT1+10, PRINT1+11, PRINT1+12, PRINT1+13, PRINT1+14, PRINT1+28, PRINT1+37 , PRINT1+38, PRINT1+39, PRINT1+40, PRINT1+41, PRINT1+42, PRINT2+1, PRINT2+3, HEADER+6*, LINE+4, LINE+5 , LINE+6 |