IBCMDT2 ;ALB/VD - INSURANCE PLANS MISSING DATA REPORT (COMPILE) ; 10-APR-15
Source file <IBCMDT2.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | $$FTFGP^IBCNEUT7 $$DAT1^IBOUTL |
VA FileMan | 1 | $$GET1^DIQ |
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 | 1 | IBCMDT |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; Queued Entry Point for Report.
; Required variable input: FLTRS,IBAI, IBAPL, IBGRN, IBPTY, IBTFT, IBEPT, ; IBCLM, IBBIN, IBNMSPC,IBPCN ; ^TMP("IBCMDT",IBNMSPC) required if all companies and plans not selected |
|
GATH | ; Gather all data for a company.
|
|
PLAN | ; Gather Insurance Plan information, if necessary
; Input: IBCNS -- Pointer to the insurance company in file #36 ; initialized counters, plus the 'Plan' array (^TMP("IBINC",$J)) |
|
COMPINF(IBCNS) | ; Return formatted Insurance Company information
; Input: IBCNS -- Pointer to the insurance company in file #36 ; Output: company name ^ addr ^ city/st/zip |
|
PLANINF(PLAN,POSWT) | ; Return formatted Insurance Plan information.
; Input: PLAN - Pointer to the plan in file #355.3 ; POSWT - PRESCRIPTION ONLY indicator ; Returns: A1^A2^A3^...^A8 Where ; A1 - -2 if inactive plan, -1 if no missing data found, else 0 ; A2 - Plan Number ; A3 - Plan Name ; A4 - Type of Plan (Group or Individual ; A5 - Electronic Plan Type ; A6 - Timely filing Time Frame ; A7 - Banking Identification Number ; A8 - Process Control Number |
|
GCVLIMS(IBI,PLAN,RECIND) | ; Obtain Plans that may have Coverage Limits missing.
; Input: IBI -- Line counter ; IBCNS -- Pointer to the insurance company in file #36 ; RECIND -- Indicator to determine if header record for plan is already set ; 0 means ^TMP($J,"PR",IBI,IBPTR) is already set. ; 1 means ^TMP($J,"PR",IBI,IBPTR) is not set yet. ; Output: This will create the ^TMP($J,"PR",IBI,IBPTR,IBCVLM) node ; FOUND -- 0 means a missing data coverage limitation was not found. ; 1 means a missing data coverage limitation was found. |
FileNo | Call Tags |
---|---|
^IBA(355.3 - [#355.3] | GET1^DIQ |
^IBE(355.31 - [#355.31] | GET1^DIQ |
^IBA(355.32 - [#355.32] | GET1^DIQ |
^DIC(36 - [#36] | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(5 - [#5] | COMPINF+6 |
^IBA(355.3 - [#355.3] | PLAN+7 |
^IBA(355.32 - [#355.32] | GCVLIMS+12, GCVLIMS+18, GCVLIMS+24, GCVLIMS+26, GCVLIMS+28 |
^IBE(355.31 - [#355.31] | GCVLIMS+17 |
^TMP("IBCMDT" | EN+9, EN+11 |
^TMP($J | EN+7!, GATH+6*, PLAN+13*, PLAN+19!, GCVLIMS+15*, GCVLIMS+23*, GCVLIMS+38* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
BIN | PLANINF+13~, PLANINF+29*, PLANINF+32*, PLANINF+33, PLANINF+39 |
EPT | PLANINF+13~, PLANINF+24*, PLANINF+25*, PLANINF+26, PLANINF+39 |
FNDONE | PLAN+4~, PLAN+15*, PLAN+19 |
FOUND | GCVLIMS+10~, GCVLIMS+11*, GCVLIMS+12, GCVLIMS+14*, GCVLIMS+21*, GCVLIMS+36*, GCVLIMS+38, GCVLIMS+39 |
IBCAT | GCVLIMS+10~, GCVLIMS+16*, GCVLIMS+17*, GCVLIMS+18, GCVLIMS+19, GCVLIMS+24*, GCVLIMS+26, GCVLIMS+28 |
IBCNS | EN+6~, EN+10*, EN+11*, GATH+6, PLAN+6, PLAN+7, COMPINF~, COMPINF+5, COMPINF+6, COMPINF+7 , COMPINF+8 |
IBCOV | GCVLIMS+10~, GCVLIMS+19*, GCVLIMS+21, GCVLIMS+31*, GCVLIMS+32*, GCVLIMS+35 |
IBCPS | GATH+1~, GATH+2*, GATH+6 |
IBCPT | GATH+1~, GATH+2*, GATH+6 |
IBCPTR | GCVLIMS+10~, GCVLIMS+11*, GCVLIMS+14*, GCVLIMS+15, GCVLIMS+22*, GCVLIMS+23, GCVLIMS+37*, GCVLIMS+38 |
IBCST | GATH+1~, GATH+2* |
IBCSTA | GCVLIMS+10~, GCVLIMS+20*, GCVLIMS+21, GCVLIMS+33*, GCVLIMS+34*, GCVLIMS+35 |
IBCVDAT | GCVLIMS+10~, GCVLIMS+21*, GCVLIMS+23, GCVLIMS+35*, GCVLIMS+36, GCVLIMS+38 |
IBEFDT | GCVLIMS+10~, GCVLIMS+20*, GCVLIMS+21, GCVLIMS+29*, GCVLIMS+30*, GCVLIMS+35 |
IBI | EN+6~, EN+7*, GATH+2*, GATH+6, PLAN+13, PLAN+15, PLAN+19, GCVLIMS~, GCVLIMS+15, GCVLIMS+23 , GCVLIMS+38 |
IBIC1 | EN+6~, EN+8*, EN+9*, EN+11 |
>> IBMDTSPC("IBBIN" | PLANINF+33 |
>> IBMDTSPC("IBCLM" | PLAN+12, PLAN+14, GCVLIMS+13, GCVLIMS+30, GCVLIMS+32, GCVLIMS+34 |
>> IBMDTSPC("IBEPT" | PLANINF+26 |
>> IBMDTSPC("IBGRN" | PLANINF+20 |
>> IBMDTSPC("IBPCN" | PLANINF+38 |
>> IBMDTSPC("IBPTY" | PLANINF+23 |
>> IBMDTSPC("IBTFT" | PLANINF+28 |
>> IBNMSPC | EN+9, EN+11 |
IBPTR | PLAN+4~, PLAN+5*, PLAN+7*, PLAN+8, PLAN+13, PLAN+15, PLAN+19, GCVLIMS+15, GCVLIMS+23, GCVLIMS+38 |
IBREC | GCVLIMS+10~ |
IBRECDT | GCVLIMS+10~, GCVLIMS+25*, GCVLIMS+26*, GCVLIMS+28 |
IBRECN | GCVLIMS+10~, GCVLIMS+27*, GCVLIMS+28*, GCVLIMS+29, GCVLIMS+31, GCVLIMS+33 |
NAME | PLANINF+13~, PLANINF+17*, PLANINF+39 |
NUM | PLANINF+13~, PLANINF+18*, PLANINF+19*, PLANINF+20, PLANINF+39 |
PCN | PLANINF+13~, PLANINF+34*, PLANINF+37*, PLANINF+38, PLANINF+39 |
PLAN | PLANINF~, PLANINF+15, PLANINF+17, PLANINF+18, PLANINF+21, PLANINF+24, PLANINF+27, PLANINF+29, PLANINF+34, GCVLIMS~ , GCVLIMS+12, GCVLIMS+18, GCVLIMS+24, GCVLIMS+26, GCVLIMS+28 |
PLNDATA | PLAN+4~, PLAN+8*, PLAN+9, PLAN+12, PLAN+13, PLAN+19 |
POSWT | PLAN+4~, PLAN+6*, PLAN+8, COMPINF+4~, COMPINF+5*, COMPINF+7, PLANINF~, PLANINF+32, PLANINF+33, PLANINF+37 , PLANINF+38 |
RECIND | GCVLIMS~ |
ST | COMPINF+4~, COMPINF+6*, COMPINF+8 |
TFTF | PLANINF+13~, PLANINF+27*, PLANINF+28, PLANINF+39 |
TYP | PLANINF+13~, PLANINF+21*, PLANINF+22*, PLANINF+23, PLANINF+39 |
U | COMPINF+6, COMPINF+7, COMPINF+8, PLANINF+39, GCVLIMS+21, GCVLIMS+35 |
VAL | PLANINF+13~, PLANINF+14*, PLANINF+15, PLANINF+16*, PLANINF+20*, PLANINF+23*, PLANINF+26*, PLANINF+28*, PLANINF+33*, PLANINF+38* , PLANINF+39, GCVLIMS+10~ |
X | COMPINF+4~, COMPINF+7*, COMPINF+8*, COMPINF+9 |