IBCNESI2 ;ALB/TAZ - MEDICARE PATIENTS WITH SUBSEQUENT INSURANCE ;15 Jan 13
Source file <IBCNESI2.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Integrated Billing | 5 | IBCNE MEDICARE COB AC IBCNE MEDICARE COB CS IBCNE MEDICARE COB DISPLAY IBCNERPI IBCNESI1 |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN(IBRIEN) | ; Main Entry Point
|
|
| ENQ | ;Exit
|
|
| INIT | ; Initialize Variables
|
|
| GETREV(IBRIEN) | ;Set Review IEN if not already defined.
|
|
| BLD | ; Build Screen
|
|
| SET(IBX) | ; Set up Build Array
|
|
| WRAP(STR,LEN) | ; Wrap Lines
|
|
| HDR | ; -- header code
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| EXPND | ; -- expand code
|
|
| CMNT | ; Enter Comments
|
|
| CMNTQ | ;
|
|
| STATUS | ; change review status
|
|
| STATUSX | ;
|
|
| STATUS1 | ; Entry point from comments section
|
|
| STATUS1X | ;
|
| Name | Field # of Occurrence |
|---|---|
| ^DIC | GETREV+8 |
| FILE^DICN | CMNT+7, STATUS1+18 |
| ^DIE | STATUS1+22 |
| WP^DIE | STATUS1+20 |
| ^DIK | CMNT+10 |
| CLEAN^DILF | STATUS1+22 |
| $$GET1^DIQ | GETREV+4, BLD+35, BLD+36, HDR+2 |
| ^DIR | STATUS1+6, STATUS1+12 |
| ^DIWP | BLD+40 |
| EN^VALM | EN+2 |
| $$SETSTR^VALM1 | BLD+5, BLD+6, BLD+8, BLD+12, BLD+13, BLD+14, BLD+18, BLD+24, BLD+26, BLD+28 , BLD+35, BLD+36, BLD+42, HDR+5, HDR+6 |
| FULL^VALM1 | HELP+1 |
| PAUSE^VALM1 | HELP+5, CMNT+4, STATUS+1 |
| CLEAN^VALM10 | EXIT+2 |
| SET^VALM10 | SET+2 |
| $$FMTE^XLFDT | BLD+35 |
| $$NOW^XLFDT | CMNT+6, STATUS1+17 |
| Name | Line Occurrences |
|---|---|
| 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 |
|
| Routine Call |
|
| Routine Call |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^IBCN(365 - [#365] | GET1^DIQ |
| ^IBCN(365.2 - [#365.2] | GET1^DIQ |
| 365.21 | GET1^DIQ, WP^DIE |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^IBCN(365.2 - [#365.2] | BLD+28, BLD+31, BLD+33, BLD+39, BLD+40, BLD+44, CMNT+4, CMNT+10, CMNT+14, STATUS+1 , STATUSX+2 |
| ^TMP("IBCNCE" | EXIT+1! |
| ^TMP($J | GETREV+2, GETREV+9*, BLD+4, BLD+5, BLD+6, BLD+7, BLD+10, BLD+11, BLD+13, BLD+14 , BLD+15, BLD+16, BLD+17, BLD+21, BLD+23, HDR+3, STATUS1+24, STATUS1+25* |
| ^UTILITY($J | BLD+22!, BLD+38!, BLD+41, BLD+42 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | WRAP+1~, WRAP+2*, WRAP+6*, WRAP+7*, WRAP+8 |
| DA | CMNT+1~, CMNT+8*, CMNT+10, STATUS1+19*, STATUS1+20, STATUS1+22* |
| DA(1 | CMNT+5*, CMNT+6, CMNT+10, STATUS1+16*, STATUS1+17, STATUS1+20 |
| DATA | WRAP+1~, WRAP+4*, WRAP+5, WRAP+6*, WRAP+7, WRAP+8 |
| DD | CMNT+1~ |
| DFNSS | STATUS1+1~, STATUS1+24*, STATUS1+25 |
| DIC | GETREV+5*, CMNT+1~, CMNT+6*, CMNT+10, CMNT+12!, STATUS1+17*, STATUS1+21! |
| DIC("DR" | GETREV+7*, CMNT+6* |
| DIC(0 | GETREV+5*, CMNT+6*, STATUS1+17* |
| DIE | STATUS1+22*! |
| DIK | CMNT+1~, CMNT+10* |
| DIR | STATUS1+6!, STATUS1+12! |
| DIR("A" | STATUS1+11* |
| DIR("B" | STATUS1+5*, STATUS1+11* |
| DIR(0 | STATUS1+5*, STATUS1+11* |
| DIWF | BLD+1~, BLD+40* |
| DIWL | BLD+1~, BLD+40* |
| DIWR | BLD+1~, BLD+40* |
| DLAYGO | GETREV+5*, CMNT+1~, CMNT+6*, STATUS1+17* |
| DO | CMNT+6!, STATUS1+17! |
| DR | STATUS1+1~, STATUS1+22* |
| DTOUT | STATUS1+1~, STATUS1+7, STATUS1+13 |
| DTSS | STATUS1+1~, STATUS1+24*, STATUS1+25 |
| DUOUT | STATUS1+1~, STATUS1+7, STATUS1+13 |
| IBCMDT | BLD+1~, BLD+30*, BLD+31*, BLD+33, BLD+44 |
| IBCMIEN | BLD+1~, BLD+33*, BLD+34, BLD+39, BLD+40 |
| IBCNT | BLD+1~, BLD+8*, BLD+12*, BLD+24*, BLD+29* |
| IBEIEN | BLD+1~, BLD+3*, BLD+4*, BLD+5, BLD+6, BLD+7, BLD+10, BLD+11, BLD+13, BLD+14 , BLD+15, BLD+16, BLD+17, BLD+21, BLD+23 |
| IBLN | BLD+1~, BLD+39*, BLD+40, BLD+41*, BLD+42 |
| IBPNAM | HDR+1~, HDR+3*, HDR+5 |
| IBRIEN | EN~, INIT+2, GETREV~, GETREV+2, GETREV+4, GETREV+9, BLD+4, BLD+5, BLD+6, BLD+7 , BLD+10, BLD+11, BLD+13, BLD+14, BLD+15, BLD+16, BLD+17, BLD+21, BLD+23, HDR+3 , STATUS1+24, STATUS1+25 |
| IBRVIEN | EN+1~, INIT+2*, BLD+28, BLD+31, BLD+33, BLD+34, BLD+39, BLD+40, BLD+44, HDR+2 , CMNT+4, CMNT+5, CMNT+14, STATUS+1, STATUSX+2, STATUS1+16, STATUS1+22 |
| IBRVST | EN+1~, INIT+1*, HDR+1~, HDR+2*, HDR+5, HDR+6, STATUS1+22* |
| IBSEQ | BLD+1~, BLD+20*, BLD+21*, BLD+23, BLD+29* |
| IBSTAT | STATUS1+1~, STATUS1+8*, STATUS1+9, STATUS1+13*, STATUS1+22, STATUS1+25 |
| IBSTAT(0 | STATUS1+22 |
| IBSTR | BLD+1~, BLD+5*, BLD+6*, BLD+8*, BLD+9*, BLD+12*, BLD+13*, BLD+14*, BLD+15*, BLD+16* , BLD+17*, BLD+18*, BLD+24*, BLD+25*, BLD+26*, BLD+27*, BLD+28*, BLD+34*, BLD+35*, BLD+36* , BLD+37, BLD+42*, BLD+43 |
| IBSTR1 | BLD+1~, BLD+7!*, BLD+10!*, BLD+11*, BLD+13*, BLD+14*, BLD+15*, BLD+16*, BLD+17*, BLD+18 , BLD+23!* |
| IBSTR1( | BLD+8, BLD+12, BLD+24 |
| IBSTR1("" | BLD+8, BLD+12, BLD+24 |
| IBTEXT | STATUS1+1~ |
| IBTEXT(1 | STATUS1+15* |
| IBURTE | BLD+1~, BLD+19*, BLD+21, BLD+23 |
| IBX | BLD+32~, SET~, SET+2 |
| IEN | GETREV+1~, GETREV+2*, GETREV+3, GETREV+9*, GETREV+10 |
| IENS | BLD+1~, BLD+34*, BLD+35, BLD+36 |
| IOF | HELP+3 |
| LEN | WRAP~, WRAP+5, WRAP+6, WRAP+7, WRAP+8 |
| LINEVAR | BLD+1~ |
| MSGID | GETREV+1~, GETREV+4*, GETREV+5, GETREV+7 |
| PCE | WRAP+1~, WRAP+3*, WRAP+4 |
| STR | WRAP~, WRAP+3, WRAP+4 |
| STR( | WRAP+2*, WRAP+6*, WRAP+7*, WRAP+8* |
| U | BLD+39, STATUS1+24, STATUS1+25 |
| >> VALM("TITLE" | HDR+7* |
| >> VALMAR | BLD+2 |
| >> VALMBCK | ENQ+1*, HELP+2*, CMNTQ+1*, STATUSX+4* |
| >> VALMCNT | BLD+3*, SET+1*, SET+2 |
| >> VALMHDR(1 | HDR+4* |
| >> VALMHDR(2 | HDR+4*, HDR+5*, HDR+6* |
| >> VALMSG | HDR+7* |
| X | GETREV+5*, BLD+40*, CMNT+1~, CMNT+6*, STATUS1+17* |
| Y | GETREV+9, CMNT+1~, CMNT+8, STATUS1+8, STATUS1+13, STATUS1+19 |