IBCMDT ;ALB/VD - INSURANCE PLANS MISSING DATA REPORT (DRIVER) ; 10-APR-15
Source file <IBCMDT.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 | 1 | IBCN GRP PLAN MISSING DATA |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Main Entry point.
; Initialize variables. |
|
C0 | ; Start the Insurance Company Prompts.
|
|
C10 | ||
FILTERS | ; Begin the Filtering Questions.
|
|
F0 | ; Start of Filters.
|
|
F10 | ||
F20 | ||
F30 | ||
F40 | ||
F50 | ||
F60 | ||
F70 | ||
F100 | ||
EXIT | ; Exit point
|
|
STOP() | ; Determine if user wants to exit out of the whole option
; Initialize Variables |
|
STOPX | ; STOP Exit Point
|
|
START | ; Gather the Insurance Companies and respective Plans
|
|
GTSEL | ; Gather plans for all selected companies.
|
|
GTALL | ; - gather all companies if required
|
|
GTPLNS | ; - gather plans for selected companies
|
|
STARTQ | ;
|
|
DEVICE(IBMDTSPC) | ; Device Handler and possible TaskManager calls
; Input: IBMDTSPC - Array passed by reference of the report parameters ; See top of routine for a detailed explanation |
|
DEVICEX | ; DEVICE Exit Point
|
|
COMPILE(IBMDTSPC) | ;
; Entry point called from EN^XUTMDEVQ in either direct or queued mode. ; Input: IBMDTSPC - Array passed by reference of the report parameters ; See top of routine for a detailed explanation |
|
COMPILX | ; COMPILE Exit Point
|
Name | Field # of Occurrence |
---|---|
$$GET1^DIQ | GTSEL+11, GTALL+7 |
^DIR | STOP+10 |
SLAI^IBCMDT1 | C10 |
SLBIN^IBCMDT1 | F60 |
SLCLM^IBCMDT1 | F50 |
SLEPT^IBCMDT1 | F40 |
SLGRN^IBCMDT1 | F10 |
SLPCN^IBCMDT1 | F70 |
SLPTY^IBCMDT1 | F20 |
SLTFT^IBCMDT1 | F30 |
EN^IBCMDT2 | COMPILE+20 |
EN^IBCMDT3 | COMPILE+22 |
EN^IBCNILK | GTSEL+6 |
PAUSE^VALM1 | F70+8 |
EN^XUTMDEVQ | DEVICE+13 |
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 |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | GET1^DIQ |
Name | Line Occurrences |
---|---|
$$STOP | C10, F10+1, F20+1, F30+1, F40+1, F50+1, F60+1, F70+1 |
C0 | C10, F10+1 |
DEVICE | F100 |
EXIT | C10, C10+4, C10+5, F10+1, F20+1, F30+1, F40+1, F50+1, F60+1, F70+1 , F70+6, F100+1 |
F10 | F20+1 |
F20 | F30+1 |
F30 | F40+1 |
F40 | F50+1 |
F50 | F60+1 |
F60 | F70+1 |
FILTERS | F70+6 |
GTALL | START+2 |
GTPLNS | START+1, START+2 |
GTSEL | START+1 |
START | C10+3 |
STARTQ | START+1, START+3 |
STOPX | STOP+11 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DIR | STOP+2~, STOP+10! |
DIR("?" | STOP+8*, STOP+9* |
DIR("A" | STOP+6* |
DIR("B" | STOP+7* |
DIR(0 | STOP+5* |
DIRUT | STOP+2~, STOP+11 |
>> DUOUT | F70+6 |
FLTRS | COMPILE+5~, COMPILE+6* |
I | DEVICE+4~ |
IBAI | EN+2~, C10+2*, START+1, COMPILE+5~, COMPILE+7* |
IBAPL | COMPILE+5~, COMPILE+8* |
IBBIN | COMPILE+5~, COMPILE+14* |
IBCLM | COMPILE+5~, COMPILE+13* |
IBCNS | GTSEL+1~, GTSEL+8*, GTSEL+9*, GTSEL+11, GTSEL+12, GTALL+1~, GTALL+5*, GTALL+6*, GTALL+7, GTALL+8 , GTPLNS+1~, GTPLNS+4*, GTPLNS+5*, GTPLNS+7, GTPLNS+8, STARTQ+1! |
IBCT | GTSEL+2*, STARTQ+1! |
IBEPT | COMPILE+5~, COMPILE+12* |
IBGRN | COMPILE+5~, COMPILE+9* |
IBIC | GTSEL+1~, GTSEL+11*, GTSEL+12, GTPLNS+1~, GTPLNS+2*, GTPLNS+3*, GTPLNS+5, GTPLNS+8, STARTQ+1! |
IBIC1 | GTALL+1~, GTALL+3*, GTALL+4*, GTALL+6, GTALL+8 |
IBMDTSPC | EN+2~, C0+1!, F100, DEVICE~, COMPILE~ |
IBMDTSPC("FLTRS" | F0+1*, F10+4*, F20+3, F20+4*, F30+3, F30+4*, F40+3, F40+4*, F50+2*, F60+3 , F60+4*, F70+3, F70+4*, F70+6, F70+10, COMPILE+6 |
IBMDTSPC("IBAI" | C10+2, COMPILE+7 |
IBMDTSPC("IBAPL" | COMPILE+8 |
IBMDTSPC("IBBIN" | F60+2, COMPILE+14 |
IBMDTSPC("IBCLM" | F50+2, F70+9, COMPILE+13 |
IBMDTSPC("IBEPT" | F40+2, COMPILE+12 |
IBMDTSPC("IBGRN" | F10+2, COMPILE+9 |
IBMDTSPC("IBNMSPC" | C0+2*, COMPILE+15 |
IBMDTSPC("IBPCN" | F70+2, COMPILE+16 |
IBMDTSPC("IBPTY" | F20+2, COMPILE+10 |
IBMDTSPC("IBTFT" | F30+2, COMPILE+11 |
IBMDTSPC("SUBHD" | F0+2*, F10+3*, F20+3*, F30+3*, F40+3*, F60+3*, F70+3*, F70+10*, F70+11*, COMPILE+17 |
IBNMSPC | COMPILE+5~, COMPILE+15* |
IBP | GTPLNS+1~, GTPLNS+6*, GTPLNS+7*, GTPLNS+8, STARTQ+1! |
IBPCN | COMPILE+5~, COMPILE+16* |
IBPTY | COMPILE+5~, COMPILE+10* |
IBQUIT | C10+1~*, C10+4, GTSEL+2*, GTSEL+7*, GTPLNS+3, GTPLNS+5 |
IBSEL | STARTQ+1! |
IBTFT | COMPILE+5~, COMPILE+11* |
IOF | C0+4 |
POP | EN+2~, DEVICE+4~, DEVICE+14 |
STOP | EN+2~, C0+2*, C10, FILTERS+2~, F0+1*, F10+1, F20+1, F30+1, F40+1, F50+1 , F60+1, F70+1, F100+1, STOP+11*, STOP+12*, DEVICE+14* |
SUBHD | COMPILE+5~, COMPILE+17* |
X | STOP+2~ |
Y | STOP+2~, STOP+11*, STOP+12, STOPX+1 |
ZTDESC | DEVICE+4~, DEVICE+10*, DEVICE+13 |
ZTRTN | DEVICE+4~, DEVICE+9*, DEVICE+13 |
ZTSAVE | DEVICE+4~, DEVICE+13 |
ZTSAVE("IBMDTSPC(" | DEVICE+11* |
ZTSAVE("^TMP(""IBCMDT"",$J," | DEVICE+12* |