IBCNESI1 ;ALB/TAZ - MEDICARE POTENTIAL COB Patient Selection ;15 Jan 13
Source file <IBCNESI1.m>
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 | 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 |
|
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 |