IBCORC ;ALB/CPM - RANK INSURANCE CARRIERS ; 30-JUN-93
Source file <IBCORC.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 | 6 | IB OUTPUT RANK CARRIERS IBCORC3 IBCRHBR1 IBY232PO IBY232PR IBYPPR |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Entry point to generate ranking of insurance carriers by amount billed
|
|
START | ||
END | ||
NUM | ||
DEVICE | ; Select device for queueing/printing report
|
|
ENQ | ; Cleanup
|
|
PROD() | ; Is this the production account? Output: 1 - YES, 0 - NO
|
|
HLPD1 | ; Help for Start date.
|
|
HLPD2 | ; Help for End date.
|
|
HLPN | ; Help for number of carriers to rank.
|
|
HLPCO | ; Help for sending report to Central Office.
|
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 |
|
Routine Call |
|
Routine Call |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^XMB("NETNAME" | PROD+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS | DEVICE+1* |
DIR | START+1!, END+1!, NUM+1! |
DIR("?" | START*, END*, NUM* |
DIR("A" | START*, END*, NUM* |
DIR("B" | END*, NUM* |
DIR(0 | START*, END*, NUM* |
DT | END |
I | DEVICE+4*, ENQ+1! |
IBABEG | START+1*, ENQ+1!, HLPD2+4 |
IBAEND | END+1*, ENQ+1! |
IBFLG | NUM+4*, ENQ+1! |
IBNR | NUM+1*, ENQ+1! |
IO | DEVICE+8 |
IO("Q" | DEVICE+2, DEVICE+5! |
>> POP | DEVICE+1 |
X | PROD+1~*, PROD+2 |
>> Y | START+1, END, END+1, NUM+1 |
>> ZTDESC | DEVICE+3* |
>> ZTRTN | DEVICE+3* |
>> ZTSAVE( | DEVICE+4* |
ZTSK | DEVICE+6, DEVICE+7! |