©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
IBCNS2 ;ALB/AAS - INSURANCE POLICY CALLS FROM FILE 399 DD ; 22-JULY-91
Source file <IBCNS2.m>
| Package | Total | Call Graph |
|---|---|---|
| Integrated Billing | 2 | (D1,HDR)^IBCNS $$ZND^IBCNS1 |
| Kernel | 1 | HOME^%ZIS |
| VA Fileman | 1 | ^DIC |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DDHQ | ||
| IX(DA,XREF) | ; -- create i1, aic xrefs for fields 112, 113, 114
|
|
| TRANS(IBDA,Y) | ; -- output transform
|
|
| DDQ | ||
| CHKQ | ||
| SEL(IBX,DFN,INSDT,ACTIVE) | ; -- Select insurance policy
|
|
| DDHELP(IBDA,LEVEL) | ; -- Executable help
|
|
| INSCO(IBDA,IBCDFN) | ; -- return pointer value of 36 from pt. file
|
|
| DD(IBX,IBDA,LEVEL) | ; - called from input transform for field 111,112,113
|
|
| KIX(DA,XREF) | ; -- kill logic for above xref
|
|
| VAR | ||
| BLD | ||
| CQ | ||
| SELQ | ||
| CHK(IBCDFN,ACTIVE,INSDT) | ; -- see if active
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| Routine Call |
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGCR(399 - [#399] | VAR, IX+2*, IX+3*, KIX+1!, KIX+2! |
| ^DIC(36 - [#36] | CHK+5, TRANS+3, INSCO+4 |
| ^DPT - [#2] | BLD+1, CHK+2, DDHELP+10, TRANS+3, INSCO+3, IX+3, KIX+2 |
| Name | Line Occurrences |
|---|---|
| $$SEL | DD+8 |
| BLD | SEL+14, DDHELP+3 |
| CHK | BLD+1 |
| CHKQ | CHK+4, CHK+10 |
| CQ | CHK+5, CHK+6, CHK+7, CHK+8, CHK+9 |
| DDHQ | DDHELP+5 |
| SELQ | SEL+13 |
| VAR | DD+7, DDHELP+3, TRANS+2, INSCO+2 |
| Name | Field # of Occurrence |
|---|---|
| ^("U" | VAR |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACTIVE | DD+6~, DD+8, VAR*, SEL~, SEL+11*, BLD+1, CHK~, CHK+4, DDHELP+2~, TRANS+1~ , INSCO+1~ |
| DA | SEL+9~, IX~, IX+2, IX+3, KIX~, KIX+1, KIX+2 |
| DE | SEL+9~ |
| DFN | DD+6~, DD+8, VAR*, SEL~, SEL+13, SEL+18, BLD+1, CHK+2, DDHELP+2~, DDHELP+10 , TRANS+1~, TRANS+3, INSCO+1~, INSCO+3 |
| DIC | SEL+9~, SEL+18* |
| DIC("S" | SEL+19* |
| DIC("W" | SEL+20* |
| DIC(0 | SEL+18* |
| DIE | SEL+9~ |
| DIR | SEL+9~ |
| DIV | SEL+9~ |
| DQ | SEL+9~ |
| DR | SEL+9~ |
| DT | VAR, SEL+12 |
| I | SEL+9~, DDHELP+2~, DDHELP+9*, DDHELP+10 |
| IBCDFN | BLD+1*, CHK~, CHK+2, CHK+3, CQ, CHKQ, INSCO~, INSCO+3 |
| IBD | SEL+9~, BLD! |
| IBD( | CHKQ*, DDHELP+9, DDHELP+10 |
| IBDA | DD~, VAR, DDHELP~, TRANS~, INSCO~ |
| IBDD | SEL+9~, BLD!, BLD+1*, CHKQ*, DDHELP+5 |
| IBDD( | CHK+3*, CQ!, CHKQ |
| IBINS | DDHELP+2~, DDHELP+10* |
| IBSEL | SEL+9~, SEL+10* |
| IBX | DD~, DD+8, SEL~, SEL+17 |
| INSDT | DD+6~, DD+8, VAR*, SEL~, SEL+12*, BLD+1, CHK~, CHK+6, CHK+7, DDHELP+2~ , TRANS+1~, INSCO+1~ |
| IOM | DDHELP+7 |
| J | SEL+9~ |
| LEVEL | DD~, DDHELP~ |
| U | TRANS+3 |
| X | DD+8*, DD+9!, SEL+17*, CHK+1~, CHK+2*, CHK+3, CHK+5, CHK+6, CHK+7, IX+2 , IX+3, KIX+2 |
| X1 | CHK+1~, CHK+5*, CHK+8, CHK+9 |
| XREF | IX~, IX+2, KIX~, KIX+1 |
| Y | SEL+9~, SEL+10*, SELQ, TRANS~, TRANS+3*, TRANS+4, INSCO+3*, INSCO+4 |