IBCNSP ;ALB/AAS - INSURANCE MANAGEMENT - EXPANDED POLICY ; 05-MAR-1993
Source file <IBCNSP.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 4 | (CONTACT,INS,POLICY)^IBCNSP0 ^IBCNSP01 $$DAT1^IBOUTL $$EXPAND^IBTRE |
Registration | 3 | EN^VALM ($$SETSTR,CLEAR)^VALM1 (CLEAN,CNTRL,KILL,SET)^VALM10 |
Kernel | 1 | DISP^XQORM1 |
VA Fileman | 1 | ^DIC |
Name | Comments | DBIA/ICR reference |
---|---|---|
COMMENT | ; -- Comment region
|
|
EN | ; -- main entry point for IBCNS EXPANDED POLICY
|
|
HDR | ; -- header code
|
|
PPOLQ | ||
EFFECT | ; -- Effective date region
|
|
UR | ; -- UR of insurance region
|
|
PPOL | ; -- select patient, select policy
|
|
SET(LINE,COL,TEXT,ON,OFF) | ; -- set display info in array
|
|
INIT | ; -- init variables and list array
|
|
EXIT | ; -- exit code
|
|
EMP | ; -- Insurance Employer Region
|
|
EMPQ | ||
BLD | ; -- list builder
|
|
BLANK(LINE) | ; -- Build blank line
|
|
EXPND | ; -- expand code
|
|
HELP | ; -- help code
|
Name | Field # of Occurrence |
---|---|
^DIC | PPOL+2, PPOL+9 |
CONTACT^IBCNSP0 | BLD+12 |
INS^IBCNSP0 | BLD+12 |
POLICY^IBCNSP0 | BLD+12 |
^IBCNSP01 | BLD+12 |
$$DAT1^IBOUTL | EFFECT+4, EFFECT+5 |
$$EXPAND^IBTRE | UR+4, UR+5, UR+6, UR+7 |
EN^VALM | EN+3 |
$$SETSTR^VALM1 | SET+2 |
CLEAR^VALM1 | EXIT+2 |
CLEAN^VALM10 | EXIT+2 |
CNTRL^VALM10 | SET+3 |
KILL^VALM10 | BLD+2 |
SET^VALM10 | BLANK+1, SET+2 |
DISP^XQORM1 | HELP+1 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(36 - [#36] | HDR+2 |
^DIC(5 - [#5] | EMP+11 |
^DPT - [#2] | HDR+1, BLD+6, BLD+7, BLD+8, PPOL+6, PPOL+11 |
^IBA(355.3 - [#355.3] | BLD+10, BLD+11, COMMENT+6, COMMENT+8 |
^TMP("IBCNSVP" | INIT+4!, BLD+1! |
^TMP("IBCNSVPDX" | BLD+1! |
Name | Line Occurrences |
---|---|
BLANK | BLD+3, SET+1 |
BLD | INIT+5 |
COMMENT | BLD+12 |
EFFECT | BLD+12 |
EMP | BLD+12 |
HDR | INIT+5 |
PPOL | INIT+3, PPOL+6 |
PPOLQ | PPOL+1, PPOL+4, PPOL+10 |
SET | COMMENT+3, COMMENT+4, COMMENT+5, COMMENT+8, COMMENT+9, EFFECT+3, EFFECT+4, EFFECT+5, UR+3, UR+4 , UR+5, UR+6, UR+7, EMP+3, EMP+4, EMP+7, EMP+8, EMP+9, EMP+10, EMP+11 , EMP+12 |
UR | BLD+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
COL | SET~, SET+2, SET+3 |
DFN | HDR+1, BLD+6, BLD+7, BLD+8, PPOL+1, PPOL+3*, PPOL+4, PPOL+6!, PPOL+8, PPOL+11 |
DIC | PPOL+2*, PPOL+8*, PPOLQ! |
DIC("A" | PPOL+8* |
DIC(0 | PPOL+2*, PPOL+8* |
>> I | BLD+3* |
IBADD | EMP+1~, EMP+8*, EMP+9*, EMP+10*, EMP+11, EMP+12 |
>> IBCDFN | BLD+9* |
IBCDFND | BLD+5~, BLD+6*, BLD+9, BLD+10, BLD+11, EFFECT+4, EFFECT+5, EXIT+1! |
IBCDFND1 | BLD+5~, BLD+7*, COMMENT+4, EXIT+1! |
IBCDFND2 | BLD+5~, BLD+8*, EMP+4, EMP+7, EMP+8, EMP+9, EMP+10, EMP+11, EMP+12, EXIT+1! |
IBCNS | BLD+6*, BLD+9*, EXIT+1! |
IBCPOL | BLD+9*, COMMENT+6, COMMENT+8, EXIT+1! |
IBCPOLD | BLD+10*, UR+4, UR+5, UR+6, UR+7, EXIT+1! |
IBCPOLD1 | BLD+11*, EXIT+1! |
>> IBI | COMMENT+6*, COMMENT+8 |
>> IBLCNT | COMMENT+6*, COMMENT+7*, COMMENT+8, COMMENT+9* |
IBPPOL | EN+1!, HDR+2, INIT+3, BLD+6, BLD+7, BLD+8, BLD+9, EXIT+1!, PPOL+11* |
>> IBTOP | EN+2* |
>> IORVOFF | COMMENT+3, COMMENT+5, EFFECT+3, UR+3, EMP+3 |
>> IORVON | COMMENT+3, COMMENT+5, EFFECT+3, UR+3, EMP+3 |
LINE | BLANK~, BLANK+1, SET~, SET+1, SET+2, SET+3, SET+4 |
OFF | SET~, SET+3 |
OFFSET | COMMENT+1~, COMMENT+2*, COMMENT+3, COMMENT+4, COMMENT+5, COMMENT+8, COMMENT+9, EFFECT+1~, EFFECT+2*, EFFECT+3 , EFFECT+4, EFFECT+5, UR+1~, UR+2*, UR+3, UR+4, UR+5, UR+6, UR+7, EMP+1~ , EMP+2*, EMP+3, EMP+4, EMP+7, EMP+8, EMP+9, EMP+10, EMP+11, EMP+12 |
ON | SET~, SET+3 |
START | COMMENT+1~, COMMENT+2*, COMMENT+3, COMMENT+4, COMMENT+5, COMMENT+8, COMMENT+9, EFFECT+1~, EFFECT+2*, EFFECT+3 , EFFECT+4, EFFECT+5, UR+1~, UR+2*, UR+3, UR+4, UR+5, UR+6, UR+7, EMP+1~ , EMP+2*, EMP+3, EMP+4, EMP+7, EMP+8, EMP+9, EMP+10, EMP+11, EMP+12 |
TEXT | SET~, SET+2, SET+3 |
>> VALMAR | SET+1, SET+2 |
>> VALMBG | INIT+2* |
>> VALMCNT | INIT+2*, BLD+4*, SET+1* |
>> VALMHDR(1 | HDR+1* |
>> VALMHDR(2 | HDR+2* |
VALMQUIT | EN+1!, INIT+1!, INIT+3, EXIT+1!, PPOL+1, PPOL+4*, PPOL+9*, PPOL+10 |
>> X | HELP+1* |
>> Y | PPOL+3, PPOL+9, PPOL+11 |