IBCNERPD ;DAOU/RO - INSURANCE COMPANY LINK REPORT ;AUG-2003
Source file <IBCNERPD.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Main entry pt
; Init vars |
|
R10 | ; Prompt to select linked vs unlinked insurance companies report option
|
|
R15 | ;Prompt for All, Keyword search or Select Ins Co.
|
|
R20 | ; Prompt for Insurance Company Search
|
|
R25 | ;Initialize Prompt for insurance companies.
|
|
R26 | ; Prompt for multiple insurance companies
|
|
R30 | ; Prompt to allow users to select output format
|
|
R40 | ; Prompt to allow users to select primary sort
|
|
R50 | ; Proceed to compilation of the data and then generate the output of the report.
|
|
EXIT | ; Exit pt
|
|
DEVICE(IBCNERTN,IBCNESPD) | ; Device Handler and possible TaskManager calls
; Input params: ; IBCNERTN = Routine name for ^TMP($J,... ; IBCNESPD = Array passed by ref of the report params ; IBOUT = "R" for Report format or "E" for Excel format |
|
COMPILE(IBCNERTN,IBCNESPD) | ;
; Entry point called from EN^XUTMDEVQ in either direct or queued mode. ; Input params: ; IBCNERTN = Routine name for ^TMP($J,... ; IBCNESPD = Array passed by ref of the report params |
|
COMPDATA(IBCNERTN,IBCNESPD) | ; Compile data
|
|
OUTPUT(IBCNERTN,IBCNESPD) | ; Sets IO params for printing
|
|
OUTPUTX | ; Exit pt
|
|
PRINT(RTN,IBTYP,SRT,PGC,PXT,MAX,CRT,IBOUT) | ; Print data
; Input: RTN="IBCENRPB", PGC=page ct, ; PXT=exit flg, MAX=max line ct/pg, ; CRT=1/0, IBOUT="R"/"E" |
|
PRINTEX | ;
|
|
DATA(DISPDATA) | ; Build display lines
|
|
LINE(DISPDATA) | ; Print data
|
|
HEADER | ; Report format Header
|
|
HEADERX | ;
|
|
EHDR | ; - Excel format Header
|
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 |
|
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 |
|
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 |
|
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 |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBA(355.3 - [#355.3] | GET1^DIQ |
^DIC(36 - [#36] | GET1^DIQ |
^IBE(365.12 - [#365.12] | GET1^DIQ |
^DIC(5 - [#5] | GET1^DIQ |