IBCNSJ13 ;ALB/CPM - INACTIVATE AN INSURANCE PLAN (CON'T) ; 18-JAN-95
Source file <IBCNSJ13.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
REP(IBCNS,IBNEWP,IBOLDP,IBMER) | ; Repoint patient policies from old to new plan
; Input: IBCNS -- Pointer to the company in file #36 which ; offers the plans ; IBNEWP -- Pointer to the new plan in file #355.3 ; IBOLDP -- Pointer to the old plan in file #355.3 ; IBMER -- [optional]: set to 1 if benefits used should ; be merged instead of deleted |
|
REPQ | ||
SWPL(IBCPOL,DFN,IBCDFN) | ; Change plan in policy.
; Input: IBCPOL -- Pointer to the new plan in file #355.3 ; DFN -- Pointer to the patient in file #2 ; IBCDFN -- Pointer to the policy in file #2.312 |
|
SWPLQ | ||
MERG(IBCPOL,IBBU,IBD) | ; Merge previous benefits used into a new plan.
; Input: IBCPOL -- Pointer to the new plan in file #355.3 ; IBBU -- Pointer to the benefit to merged in file #355.5 ; IBD -- [optional] : new date for the benefit used |
|
MERGQ | ||
BU(IBQ) | ; Be sure user really wants to repoint policies with benefits used.
; Required variable input: ; IBCPOL -- Pointer to the new plan in file #355.3 |
|
BUQ |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^IBA(355.5 - [#355.5] | Classic Fileman Calls |