IBCNESI1 ;ALB/TAZ - MEDICARE POTENTIAL COB Patient Selection ;15 Jan 13
Source file <IBCNESI1.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 | 3 | IBCNE MEDICARE COB EE IBCNE MEDICARE COB LIST IBCNESI |
| Kernel | 1 | ^ORD(101 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| LIST | ; Entry Point from IBCNESI
; IBSDT - Start Date ; IBEDT - End Date ; IBSORT - Sort Direction ; IBREP - Report or Screen ; IBCOMP - ; 1 = include completed entries only ; 2 = include completed entries only with comments ; 3 = exclude completed entries ; 4 = exclude completed entries with comments |
|
| BLDTMP | ; construct the temporary global array according to filter and sort criteria selected by user
|
|
| MATCH(IBDFN,INSCONM) | ;Match Insurance Companies with Insurance Type subfile.
|
|
| MATCHQ | ;
|
|
| HDR | ; -- header code
|
|
| INIT | ; -- init variables and list array
|
|
| HELP | ; -- help code
|
|
| EXIT | ; -- exit code
|
|
| EXPND | ; -- expand code
|
|
| EXPNDQ | ;
|
|
| BLDSCRN | ;build screen of worklist entries
|
|
| SET(X,CNT,IBIEN) | ;set up list manager screen array
|
|
| SEL(IBDA,ONE) | ; Select entry(s) from list
; IBDA = array returned if selections made ; IBDA(n)=ien of entry selected (file 365) ; ONE = if set to 1, only one selection can be made at a time |
| Name | Field # of Occurrence |
|---|---|
| $$GET1^DIQ | BLDTMP+7, BLDTMP+9, BLDTMP+19, BLDTMP+20, BLDTMP+21, BLDTMP+24, BLDTMP+25, BLDTMP+26, BLDTMP+27, BLDTMP+28 , BLDTMP+29, BLDTMP+30, BLDTMP+35, BLDTMP+36, BLDTMP+37, MATCH+6, MATCH+7 |
| EN^IBCNERPI | LIST+16 |
| EN^IBCNESI2 | EXPND+3 |
| DEM^VADPT | BLDTMP+41 |
| EN^VALM | BLDTMP+52 |
| $$SETFLD^VALM1 | BLDSCRN+15, BLDSCRN+16, BLDSCRN+17, BLDSCRN+18, BLDSCRN+19, BLDSCRN+23, BLDSCRN+26, BLDSCRN+30, BLDSCRN+33 |
| $$SETSTR^VALM1 | BLDSCRN+13 |
| FULL^VALM1 | HELP+1, SEL+8 |
| PAUSE^VALM1 | HELP+11 |
| EN^VALM2 | SEL+10 |
| $$FMTE^XLFDT | BLDSCRN+13, BLDSCRN+18 |
| 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 |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| 2.312 | GET1^DIQ |
| ^IBCN(365 - [#365] | GET1^DIQ |
| 365.02 | GET1^DIQ |
| ^IBCN(365.2 - [#365.2] | GET1^DIQ |
| 365.26 | GET1^DIQ |
| ^DIC(5 - [#5] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | MATCH+4 |
| ^IBCN(365 - [#365] | BLDTMP+1, BLDTMP+3, BLDTMP+5, BLDTMP+16, BLDTMP+33 |
| ^IBCN(365.2 - [#365.2] | BLDTMP+9 |
| ^IBE(350.9 - [#350.9] | LIST+13 |
| ^IBE(365.023 - [#365.023] | BLDTMP+25 |
| ^IBE(365.14 - [#365.14] | BLDTMP+7 |
| ^TMP("IBCNESI1" | LIST+12!, EXIT+1! |
| ^TMP($J | LIST+12!, BLDTMP+21*, BLDTMP+22*, BLDTMP+23*, BLDTMP+24*, BLDTMP+25*, BLDTMP+26*, BLDTMP+27*, BLDTMP+28*, BLDTMP+29* , BLDTMP+30*, BLDTMP+37*, BLDTMP+39, BLDTMP+42*, BLDTMP+43*, BLDTMP+44*, BLDTMP+45*, BLDTMP+47*, BLDTMP+48*, BLDTMP+51* , EXIT+1!, BLDSCRN+4, BLDSCRN+7, BLDSCRN+9, BLDSCRN+10, BLDSCRN+16, BLDSCRN+17, BLDSCRN+18, BLDSCRN+22, BLDSCRN+23 , BLDSCRN+24, BLDSCRN+25, BLDSCRN+28, BLDSCRN+30, BLDSCRN+31, BLDSCRN+32 |
| ^UTILITY("VADM" | LIST+12!, BLDTMP+42, BLDTMP+43, BLDTMP+44, BLDTMP+49!, EXIT+1! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| CNT | SET~, SET+3, SET+4 |
| DA | EXPND+1~ |
| DD | EXPND+1~ |
| DFN | BLDTMP+40~, BLDTMP+41* |
| DIC | EXPND+1~ |
| DIK | EXPND+1~ |
| DISPDATE | BLDSCRN+1~, BLDSCRN+5*, BLDSCRN+13* |
| DLAYGO | EXPND+1~ |
| DT | MATCH+6 |
| EXPDT | MATCH+1~, MATCH+6* |
| IBCIEN | LIST+11~, BLDTMP+31*, BLDTMP+33*, BLDTMP+34 |
| IBCNT | LIST+11~, LIST+14*, BLDTMP+50* |
| >> IBCOMP | BLDTMP+10, BLDTMP+11, BLDTMP+12 |
| IBDA | EXPND+1~, EXPND+2, SEL~, SEL+7!, SEL+11* |
| IBDA( | EXPND+2, SEL+11* |
| IBDA(0 | EXPND+2 |
| IBDATA | LIST+11~, BLDTMP+21*, BLDTMP+23, BLDTMP+24*, BLDTMP+25*, BLDTMP+26*, BLDTMP+27*, BLDTMP+28*, BLDTMP+29*, BLDTMP+30* , BLDTMP+35*, BLDTMP+37, BLDSCRN+24*, BLDSCRN+25*, BLDSCRN+26, BLDSCRN+31*, BLDSCRN+32*, BLDSCRN+33 |
| IBDFN | LIST+11~, BLDTMP+2*, BLDTMP+3*, BLDTMP+5, BLDTMP+21, BLDTMP+22, BLDTMP+23, BLDTMP+24, BLDTMP+25, BLDTMP+26 , BLDTMP+27, BLDTMP+28, BLDTMP+29, BLDTMP+30, BLDTMP+37, BLDTMP+39, BLDTMP+41, BLDTMP+42, BLDTMP+43, BLDTMP+44 , BLDTMP+45, BLDTMP+47, BLDTMP+48, BLDTMP+51, MATCH~, MATCH+4, MATCH+5, BLDSCRN+6*, BLDSCRN+7*, BLDSCRN+9 , BLDSCRN+10, BLDSCRN+22 |
| IBDT | LIST+11~, LIST+14*, BLDTMP+1*, BLDTMP+3, BLDTMP+5, BLDTMP+14, BLDSCRN+3*, BLDSCRN+4*, BLDSCRN+7, BLDSCRN+9 , BLDSCRN+10, BLDSCRN+13, BLDSCRN+22 |
| IBDT1 | LIST+11~, BLDTMP+14*, BLDTMP+21, BLDTMP+22, BLDTMP+23, BLDTMP+24, BLDTMP+25, BLDTMP+26, BLDTMP+27, BLDTMP+28 , BLDTMP+29, BLDTMP+30, BLDTMP+37, BLDTMP+39, BLDTMP+42, BLDTMP+43, BLDTMP+44, BLDTMP+45, BLDTMP+47, BLDTMP+48 , BLDTMP+51 |
| >> IBEDT | BLDTMP+1 |
| IBEIDCD | LIST+11~, BLDTMP+20*, BLDTMP+22 |
| IBEIEN | LIST+11~, BLDTMP+15*, BLDTMP+16*, BLDTMP+18, BLDTMP+21, BLDTMP+22, BLDTMP+23, BLDTMP+24, BLDTMP+25, BLDTMP+26 , BLDTMP+27, BLDTMP+28, BLDTMP+29, BLDTMP+30, BLDTMP+33, BLDTMP+34, BLDTMP+37, BLDSCRN+21*, BLDSCRN+22*, BLDSCRN+23 , BLDSCRN+24, BLDSCRN+25, BLDSCRN+28*, BLDSCRN+30, BLDSCRN+31, BLDSCRN+32 |
| IBELIG | LIST+11~, BLDTMP+19* |
| IBIEN | EXPND+1~, SET~, SET+4 |
| IBITYP | MATCH+1~, MATCH+3*, MATCH+4*, MATCH+5 |
| IBLN | BLDSCRN+1~, BLDSCRN+3*, BLDSCRN+13, BLDSCRN+14*, BLDSCRN+15, BLDSCRN+27, BLDSCRN+34, BLDSCRN+35 |
| IBMPYR | LIST+11~ |
| IBNOCMT | LIST+11~, BLDTMP+10*, BLDTMP+48 |
| IBPYR | LIST+11~, LIST+13*, BLDTMP+3, BLDTMP+5 |
| >> IBREP | LIST+16, BLDTMP+52 |
| IBRIEN | LIST+11~, BLDTMP+4*, BLDTMP+5*, BLDTMP+7, BLDTMP+9, BLDTMP+16, BLDTMP+18, BLDTMP+21, BLDTMP+22, BLDTMP+23 , BLDTMP+24, BLDTMP+25, BLDTMP+26, BLDTMP+27, BLDTMP+28, BLDTMP+29, BLDTMP+30, BLDTMP+33, BLDTMP+34, BLDTMP+37 , BLDTMP+39, BLDTMP+42, BLDTMP+43, BLDTMP+44, BLDTMP+45, BLDTMP+47, BLDTMP+48, BLDTMP+51, EXPND+2*, EXPND+3 , BLDSCRN+8*, BLDSCRN+9*, BLDSCRN+10, BLDSCRN+16, BLDSCRN+17, BLDSCRN+18, BLDSCRN+22, BLDSCRN+23, BLDSCRN+24, BLDSCRN+25 , BLDSCRN+27, BLDSCRN+28, BLDSCRN+30, BLDSCRN+31, BLDSCRN+32, BLDSCRN+34 |
| IBRVIEN | LIST+11~, BLDTMP+9*, BLDTMP+45 |
| IBRVST | LIST+11~, BLDTMP+9*, BLDTMP+11, BLDTMP+12, BLDTMP+47 |
| IBRVSTAT | BLDSCRN+1~, BLDSCRN+10*, BLDSCRN+11, BLDSCRN+19 |
| >> IBSDT | LIST+14 |
| IBSEQ | LIST+11~, BLDTMP+36*, BLDTMP+37 |
| >> IBSORT | BLDTMP+14, HDR+2, BLDSCRN+13 |
| IENS | LIST+11~, BLDTMP+18*, BLDTMP+19, BLDTMP+20, BLDTMP+21, BLDTMP+24, BLDTMP+25, BLDTMP+26, BLDTMP+27, BLDTMP+28 , BLDTMP+29, BLDTMP+30, BLDTMP+34*, BLDTMP+35, BLDTMP+36, BLDTMP+37, MATCH+1~, MATCH+5*, MATCH+6, MATCH+7 |
| INSCONM | MATCH~, MATCH+8 |
| IOF | HELP+3 |
| LINEVAR | BLDSCRN+1~, BLDSCRN+13*, BLDSCRN+14*, BLDSCRN+15*, BLDSCRN+16*, BLDSCRN+17*, BLDSCRN+18*, BLDSCRN+19*, BLDSCRN+23*, BLDSCRN+26* , BLDSCRN+27, BLDSCRN+29*, BLDSCRN+30*, BLDSCRN+33*, BLDSCRN+34 |
| MATCH | MATCH+1~, MATCH+2*, MATCH+4, MATCH+8*, MATCHQ+1 |
| NAME | MATCH+1~, MATCH+7*, MATCH+8 |
| ONE | SEL~, SEL+10 |
| U | LIST+13, BLDTMP+11, BLDTMP+12, BLDTMP+25, BLDTMP+42, BLDTMP+43, BLDTMP+44, BLDTMP+47, BLDSCRN+10, SET+4 , SEL+11 |
| VADM | BLDTMP+40~ |
| VAHOW | BLDTMP+40~, BLDTMP+41* |
| >> VALM("TITLE" | HDR+3* |
| >> VALMAR | BLDSCRN+2, SET+2, SET+3, SET+4, SEL+5, SEL+6, SEL+11 |
| >> VALMBCK | HELP+2*, EXPNDQ+2* |
| VALMBG | SEL+4~, SEL+6* |
| >> VALMCNT | BLDSCRN+3*, BLDSCRN+35, SET+1*, SET+2, SET+3, SET+4 |
| >> VALMHDR(1 | HDR+1* |
| >> VALMHDR(2 | HDR+2* |
| VALMLST | SEL+4~, SEL+6* |
| >> VALMSG | HDR+3* |
| VALMY | SEL+4~ |
| VALMY( | SEL+11 |
| X | EXPND+1~, SET~, SET+2 |
| >> XQORNOD(0 | SEL+10 |
| Y | EXPND+1~ |
| >> ZTQUEUED | BLDTMP+50 |