Call Graph
IBAECN1 ;WOIFO/SS-LTC PHASE 2 NIGHTLY JOB ; 20-FEB-02
Source file <IBAECN1.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 |
|---|---|---|
| BILDATE() | ;billing start date for Long Term Care Billing
; Means Test for LTC care billing stopped on JUNE 17,2002 /see ; STDATE^IBAECU1()/ . LTC billing for LTC care must start on ; JULY 26,2002. There is no billing for LTC care in period ; between JUNE 17,2002 and JULY 26,2002. That means LTC clock ; will start on JULY 5,2002 (because of 21 "free" days) |
|
| NJ | ;LTC Nightly job
|
|
| ERR | ;Error trap for NJ
|
|
| ISLTCADM(IBDFN,IB405) | ;
|
|
| FIND350(IBDFN,IBDATE,IBADM,IBSTAT) | ;
|
|
| STAT350(IBIENCL,IBLSTDT,IBADM) | ;
|
|
| CREV350(DFN,IBADMIEN,IBEVDT,IBNH) | ;
|
|
| ORIGADM(IBA) | ;
|
|
| LASTTS(IBDFN,IB405ADM) | ;
|
|
| TODAY() | ;
|
|
| YESTRDAY() | ;
|
|
| ASIHORG(DFN,IBEVDA,IBDT) | ;
|
|
| ISLTC4DT(IBDFN,IB405ADM,IBDT) | ;
|
|
| RESET | ; this will reset the ^xtmp global
|
| Name | Field # of Occurrence |
|---|---|
| C^%DTC | YESTRDAY+4 |
| NOW^%DTC | ERR+6, STAT350+8, TODAY+2 |
| FILE^DIE | STAT350+10 |
| $$GET1^DIQ | ERR+2 |
| $$PREVMNTH^IBAECM1 | NJ+2 |
| MJT^IBAECM1 | NJ+18 |
| MJ1ST^IBAECM3 | NJ+7 |
| $$CLOCK^IBAECU | ISLTCADM+10 |
| $$LASTMJ^IBAECU | NJ+5 |
| $$TREATSP^IBAECU2 | ISLTCADM+7, ISLTC4DT+9 |
| ERRLOG^IBAECU5 | STAT350+12 |
| SITE^IBAUTL | CREV350+5 |
| SERV^IBAUTL2 | CREV350+4 |
| EVADD^IBAUTL3 | CREV350+9 |
| DEM^VADPT | ERR+9 |
| $$FMADD^XLFDT | RESET+2 |
| ^XMD | ERR+28 |
| FileNo | Call Tags |
|---|---|
| ^IBE(350.9 - [#350.9] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TRAP" | NJ+1 |
| ^DD("DD" | ERR+6 |
| ^DGPM - [#405] | STAT350+6, ORIGADM+2 |
| ^DGPM("ATS" | LASTTS+3, LASTTS+5, ISLTC4DT+3, ISLTC4DT+5 |
| ^DIC(45.7 - [#45.7] | LASTTS+8, ISLTC4DT+8 |
| ^IB - [#350] | FIND350+6, STAT350+2, STAT350+6, ASIHORG+1 |
| ^IB("AC" | FIND350+5 |
| ^IB("AFDT" | FIND350+3, FIND350+4 |
| ^XTMP("IB1010EC" | RESET+1!, RESET+2* |
| Name | Field # of Occurrence |
|---|---|
| ^("TRAP" | NJ+1 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> % | ERR+6, STAT350+8 |
| DFN | ERR+7, CREV350~, ASIHORG~, ASIHORG+3 |
| DT | RESET+2 |
| DUZ | STAT350+5 |
| IB350 | FIND350+1~, FIND350+4*, FIND350+5, FIND350+6, FIND350+7, FIND350+9 |
| IB405 | ISLTCADM~, ISLTCADM+6, ASIHORG+1~*, ASIHORG+2, ASIHORG+3 |
| IB405ADM | LASTTS~, LASTTS+3, LASTTS+5, ISLTC4DT~, ISLTC4DT+3, ISLTC4DT+5 |
| IBA | ORIGADM~, ORIGADM+1 |
| IBADM | FIND350~, FIND350+9, STAT350~, STAT350+6 |
| IBADMIEN | CREV350~, CREV350+6 |
| >> IBD | STAT350+8*, STAT350+9 |
| IBDATE | FIND350~, FIND350+3 |
| IBDFN | ISLTCADM~, ISLTCADM+6, ISLTCADM+10, FIND350~, FIND350+3, FIND350+4, LASTTS~, LASTTS+3, LASTTS+5, ISLTC4DT~ , ISLTC4DT+3, ISLTC4DT+5 |
| IBDFN1 | STAT350+1~, STAT350+2*, STAT350+3, STAT350+12 |
| IBDT | FIND350+1~, FIND350+3*, FIND350+4, ASIHORG~, ASIHORG+3, ISLTC4DT~, ISLTC4DT+2 |
| IBDT6 | LASTTS+1~, LASTTS+2*, LASTTS+3*, LASTTS+4, LASTTS+5, ISLTC4DT+1~, ISLTC4DT+2*, ISLTC4DT+3*, ISLTC4DT+4, ISLTC4DT+5 |
| IBERR | STAT350+1~, STAT350+11 |
| IBERR("DIERR" | STAT350+12 |
| IBEVDA | CREV350+2~, CREV350+3*, CREV350+10, ASIHORG~, ASIHORG+1 |
| IBEVDT | CREV350~, CREV350+1 |
| >> IBFAC | CREV350+5 |
| IBFDA | STAT350+1~ |
| IBFDA(350 | STAT350+5*, STAT350+6*, STAT350+7*, STAT350+9* |
| IBFL | FIND350+1~, FIND350+2*, FIND350+3, FIND350+9*, FIND350+10 |
| IBIENCL | STAT350~, STAT350+2, STAT350+4, STAT350+6, STAT350+12 |
| IBIENS | STAT350+1~, STAT350+4*, STAT350+5, STAT350+6, STAT350+7, STAT350+9 |
| IBINF | FIND350+1~, FIND350+2*, FIND350+6*, FIND350+7, FIND350+8, FIND350+9, FIND350+10 |
| IBL | ERR+1~ |
| IBLSTDT | STAT350~, STAT350+7 |
| IBLSTMJ | NJ+5~*, NJ+7, NJ+9 |
| IBMDS1 | NJ+13~*, NJ+17* |
| IBMDS1(0 | NJ+17* |
| IBMDS1(1 | NJ+16*, NJ+17 |
| IBMDS1(2 | NJ+16*, NJ+17 |
| IBNH | CREV350~, CREV350+8 |
| IBNHLTC | CREV350+8~* |
| IBPAT | ERR+1~, ERR+5*, ERR+10*, ERR+11*, ERR+17 |
| IBPRMNTH | NJ+2~*, NJ+3, NJ+16 |
| IBSERV | CREV350+2~ |
| >> IBSITE | CREV350+5 |
| IBSL | CREV350+2~, CREV350+6* |
| IBSPEC | ISLTCADM+3~, ISLTCADM+6*, ISLTCADM+7, ISLTCADM+8, LASTTS+1~, LASTTS+5*, LASTTS+6, LASTTS+8*, LASTTS+9, LASTTS+10 , ISLTC4DT+1~, ISLTC4DT+5*, ISLTC4DT+6, ISLTC4DT+8*, ISLTC4DT+9, ISLTC4DT+10 |
| IBSTAT | FIND350~, FIND350+5 |
| IBT | ERR+1~ |
| IBT(1 | ERR+14* |
| IBT(10 | ERR+23* |
| IBT(11 | ERR+24* |
| IBT(12 | ERR+25* |
| IBT(13 | ERR+26* |
| IBT(14 | ERR+27* |
| IBT(2 | ERR+15* |
| IBT(3 | ERR+16* |
| IBT(4 | ERR+17* |
| IBT(5 | ERR+18* |
| IBT(6 | ERR+19* |
| IBT(7 | ERR+20* |
| IBT(8 | ERR+21* |
| IBT(9 | ERR+22* |
| IBTODAY | ERR+1~, ERR+5*, ERR+6*, ERR+15 |
| IBTS | ISLTCADM+3~, ISLTCADM+4*, ISLTCADM+7*, ISLTCADM+8*, ISLTCADM+9, ISLTC4DT+1~, ISLTC4DT+9*, ISLTC4DT+10*, ISLTC4DT+11 |
| VA | ERR+8~ |
| VADM | ERR+8~ |
| VADM(1 | ERR+10 |
| VADM(2 | ERR+10 |
| VAERR | ERR+8~ |
| X | NJ+1~*, ORIGADM+1~, ORIGADM+2*, TODAY+1~, TODAY+3, YESTRDAY+1~, YESTRDAY+5 |
| X1 | YESTRDAY+1~, YESTRDAY+2* |
| X2 | YESTRDAY+1~, YESTRDAY+3* |
| XMDUZ | ERR+1~, ERR+13* |
| XMGROUP | ERR+2~*, ERR+3, ERR+4*, ERR+12 |
| XMMG | ERR+1~ |
| XMSUB | ERR+1~, ERR+12* |
| XMTEXT | ERR+1~, ERR+13* |
| XMY | ERR+1~ |
| XMY( | ERR+12* |
| XMZ | ERR+1~ |
| Y | ERR+6~*, ORIGADM+1~, ORIGADM+2* |
| Z | ORIGADM+1~*, ORIGADM+2*, ORIGADM+3 |
