IBCNAU2 ;ALB/KML/AWC - USER EDIT REPORT (COMPILE) ;6-APRIL-2015
Source file <IBCNAU2.m>
Package | Total | Call Graph |
---|---|---|
Integrated Billing | 2 | EN^IBCNAU3 $$PYRAPP^IBCNEUT5 |
Kernel | 1 | ^%ZISC |
VA FileMan | 1 | $$GET1^DIQ |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN(ALLINS,ALLPLANS,PLANS,ALLPYRS,REPTYP,DATE) | ;
|
|
; - print report
|
||
PLANS(ALLUSERS,LN,DATE) | ;
; report will include edits to files 36 and 355.3 |
|
NOPLANS(ALLUSERS,LN,DATE) | ; only report edits made to INSURANCE COMPANY file (36)
|
|
ALLUSERS(INSNAME,INSIEN,PLIEN,PLANS,LN,DATE,Z) | ; procedure to gather edits for All Users within a date range
; INSNAME = name of insurance company (36, .01) ; INSIEN = ien of INSURANCE COMPANY (36) entry ; PLIEN = ien of GROUP iNSURANCE PLAN (355.3) entry ; OR equal to 0 if group plans or not to be reported ; DATE = date range for edits (DATE("START") and DATE("END")) ; Z = input and output array |
|
SELUSERS(INSNAME,INSIEN,PLIEN,LN,DATE,Z) | ; procedure to gather edits for selected Users for a date range
|
|
PAYERS(ALLPLANS,ALLUSERS,LN,DATE) | ; PROCESS PAYERS
|
|
ADDLN(SUB,LN,Z,PAYERLN) | ;
; SUB = 0 if no group plans to be reported ; = 1 if group plans to be reported ; LN = passed by reference. Line subscript at ^TMP("IBPR",$J,PLANS,LN) ; PAYERLN=0 if not generating a payer's line ; =1 if a payer's line is being generated |
FileNo | Call Tags |
---|---|
^IBE(365.12 - [#365.12] | GET1^DIQ |
365.121 | GET1^DIQ |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DD(355.3 | ALLUSERS+34, SELUSERS+32 |
^DD(36 | ALLUSERS+17, SELUSERS+12 |
^DIA(355.3 | ALLUSERS+31, ALLUSERS+32, ALLUSERS+36, SELUSERS+28, SELUSERS+29, SELUSERS+35 |
^DIA(36 | ALLUSERS+14, ALLUSERS+15, ALLUSERS+19, SELUSERS+8, SELUSERS+9, SELUSERS+15 |
^DIA(365.12 | PAYERS+6, PAYERS+9, PAYERS+11, PAYERS+23 |
^IBA(355.3 - [#355.3] | ALLUSERS+11, ALLUSERS+20, SELUSERS+5, SELUSERS+16 |
^TMP("IBINC" | PLANS+3, PLANS+4, PLANS+5, NOPLANS+4, NOPLANS+5 |
^TMP("IBPR" | EN+4!, ADDLN+11*, ADDLN+12*, ADDLN+13* |
^TMP("IBPR2" | EN+4!, ADDLN+15*, ADDLN+16* |
^TMP("IBPRINS" | EN+5!, ALLUSERS+23, ALLUSERS+25*, SELUSERS+19, SELUSERS+21* |
^TMP("IBPYR" | PAYERS+16 |
^TMP("IBUSER" | SELUSERS+10, SELUSERS+30, PAYERS+24 |
Name | Line Occurrences |
---|---|
ADDLN | ALLUSERS+24, ALLUSERS+37, SELUSERS+20, SELUSERS+36, PAYERS+25 |
ALLUSERS | PLANS+6, NOPLANS+6 |
NOPLANS | EN+16 |
PAYERS | EN+17 |
PLANS | EN+15 |
SELUSERS | PLANS+7, NOPLANS+7 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ALLINS | EN~ |
ALLPLANS | EN~, EN+17, PRINT+3, PAYERS~ |
ALLPYRS | EN~, PRINT+3, PAYERS+16 |
ALLUSERS | EN+15, EN+16, EN+17, PLANS~, PLANS+6, PLANS+7, NOPLANS~, NOPLANS+6, NOPLANS+7, PAYERS~ , PAYERS+24 |
BDATE | PAYERS+1~, PAYERS+5*, PAYERS+6*, PAYERS+7, PAYERS+9 |
DATE | EN~, EN+15, EN+16, EN+17, PLANS~, PLANS+6, PLANS+7, NOPLANS~, NOPLANS+6, NOPLANS+7 , ALLUSERS~, ALLUSERS+15*, ALLUSERS+16, ALLUSERS+32*, ALLUSERS+33, SELUSERS~, SELUSERS+9*, SELUSERS+11, SELUSERS+29*, SELUSERS+31 , PAYERS~ |
DATE("END" | ALLUSERS+16, ALLUSERS+33, SELUSERS+11, SELUSERS+31, PAYERS+5 |
DATE("START" | ALLUSERS+16, ALLUSERS+33, SELUSERS+11, SELUSERS+31, PAYERS+5 |
DIA0 | ALLUSERS+8~, ALLUSERS+15*, ALLUSERS+17, ALLUSERS+18, ALLUSERS+32*, ALLUSERS+34, ALLUSERS+35, SELUSERS+2~, SELUSERS+9*, SELUSERS+12 , SELUSERS+14, SELUSERS+29*, SELUSERS+32, SELUSERS+34, PAYERS+1~, PAYERS+11*, PAYERS+12, PAYERS+20, PAYERS+22 |
DIAIEN | ALLUSERS+8~, ALLUSERS+10*, ALLUSERS+14*, ALLUSERS+15, ALLUSERS+19, ALLUSERS+23, ALLUSERS+25, ALLUSERS+30*, ALLUSERS+31*, ALLUSERS+32 , ALLUSERS+36, SELUSERS+2~, SELUSERS+4*, SELUSERS+8*, SELUSERS+9, SELUSERS+15, SELUSERS+19, SELUSERS+21, SELUSERS+27*, SELUSERS+28* , SELUSERS+29, SELUSERS+35, PAYERS+1~, PAYERS+8*, PAYERS+9*, PAYERS+11, PAYERS+23 |
EDATE | PAYERS+1~, PAYERS+5*, PAYERS+7 |
FIELD | ALLUSERS+8~, ALLUSERS+17*, ALLUSERS+18, ALLUSERS+34*, ALLUSERS+35, SELUSERS+2~, SELUSERS+12*, SELUSERS+14, SELUSERS+32*, SELUSERS+34 , PAYERS+1~, PAYERS+20*, PAYERS+21, PAYERS+22 |
INSIEN | PLANS+2~, PLANS+4*, PLANS+5, PLANS+6, PLANS+7, NOPLANS+1~, NOPLANS+5*, NOPLANS+6, NOPLANS+7, ALLUSERS~ , ALLUSERS+14, ALLUSERS+23, ALLUSERS+25, SELUSERS~, SELUSERS+8, SELUSERS+19, SELUSERS+21 |
INSNAME | PLANS+2~, PLANS+3*, PLANS+4, PLANS+5, PLANS+6, PLANS+7, NOPLANS+1~, NOPLANS+4*, NOPLANS+5, NOPLANS+6 , NOPLANS+7, ALLUSERS~, ALLUSERS+12, ALLUSERS+21, SELUSERS~, SELUSERS+6, SELUSERS+17 |
LN | EN+1~, EN+2*, EN+15, EN+16, EN+17, PLANS~, PLANS+6, PLANS+7, NOPLANS~, NOPLANS+6 , NOPLANS+7, ALLUSERS~, ALLUSERS+24, ALLUSERS+37, SELUSERS~, SELUSERS+20, SELUSERS+36, PAYERS~, PAYERS+25, ADDLN~ , ADDLN+6*, ADDLN+11, ADDLN+12, ADDLN+13, ADDLN+15, ADDLN+16 |
PAYERLN | PAYERS+1~, PAYERS+8*, PAYERS+25, ADDLN~, ADDLN+10 |
PLANS | EN~, EN+15, PRINT+3, PLANS+6, ALLUSERS~, ALLUSERS+29, SELUSERS+23 |
PLIEN | PLANS+2~, PLANS+5*, PLANS+6, PLANS+7, NOPLANS+1~, NOPLANS+2*, NOPLANS+7, ALLUSERS~, ALLUSERS+9, ALLUSERS+11 , ALLUSERS+20, ALLUSERS+31, SELUSERS~, SELUSERS+3, SELUSERS+5, SELUSERS+16, SELUSERS+28 |
PYRAPP | PAYERS+1~, PAYERS+12*, PAYERS+14 |
PYRIEN | PAYERS+1~, PAYERS+12*, PAYERS+14, PAYERS+15, PAYERS+16, PAYERS+19 |
PYRNAME | PAYERS+1~, PAYERS+15*, PAYERS+16, PAYERS+23 |
REPTYP | EN~, EN+14, EN+17, PRINT+3 |
SUB | ALLUSERS+8~, ALLUSERS+9*, ALLUSERS+24, ALLUSERS+37, SELUSERS+2~, SELUSERS+3*, SELUSERS+20, SELUSERS+36, PAYERS+1~, PAYERS+3* , PAYERS+25, ADDLN~, ADDLN+11, ADDLN+12, ADDLN+13, ADDLN+15, ADDLN+16 |
U | ALLUSERS+11, ALLUSERS+15, ALLUSERS+17, ALLUSERS+18, ALLUSERS+20, ALLUSERS+32, ALLUSERS+34, ALLUSERS+35, SELUSERS+5, SELUSERS+9 , SELUSERS+12, SELUSERS+14, SELUSERS+16, SELUSERS+29, SELUSERS+32, SELUSERS+34, PAYERS+12, PAYERS+20, PAYERS+22, ADDLN+11 , ADDLN+12, ADDLN+13, ADDLN+15, ADDLN+16 |
USER | SELUSERS+2~, SELUSERS+9*, SELUSERS+10, SELUSERS+14, SELUSERS+29*, SELUSERS+30, SELUSERS+34 |
Z | PLANS+2~, PLANS+6, PLANS+7, NOPLANS+6, NOPLANS+7, ALLUSERS~, ALLUSERS+7!, ALLUSERS+24, ALLUSERS+37, SELUSERS~ , SELUSERS+1!, SELUSERS+20, SELUSERS+36, PAYERS+10~, PAYERS+25, ADDLN~ |
Z("DATE" | ALLUSERS+18*, ALLUSERS+35*, SELUSERS+14*, SELUSERS+34*, PAYERS+22*, ADDLN+11, ADDLN+15 |
Z("FIELD" | ALLUSERS+18*, ALLUSERS+35*, SELUSERS+14*, SELUSERS+34*, PAYERS+22*, ADDLN+12, ADDLN+15 |
Z("INSNAME" | ALLUSERS+12*, ALLUSERS+21*, SELUSERS+6*, SELUSERS+17*, ADDLN+11 |
Z("ISINS" | ALLUSERS+22*, ALLUSERS+30*, SELUSERS+18*, SELUSERS+27*, PAYERS+4*, ADDLN+13, ADDLN+16 |
Z("NEWVAL" | ALLUSERS+19*, ALLUSERS+36*, SELUSERS+15*, SELUSERS+35*, PAYERS+23*, ADDLN+12, ADDLN+15 |
Z("OLDVAL" | ALLUSERS+19*, ALLUSERS+36*, SELUSERS+15*, SELUSERS+35*, PAYERS+23*, ADDLN+12, ADDLN+15 |
Z("PLAN" | ALLUSERS+11*, ALLUSERS+20*, SELUSERS+5*, SELUSERS+16*, ADDLN+11 |
Z("PYRNAME" | PAYERS+23*, ADDLN+15 |
Z("USER" | ALLUSERS+18*, ALLUSERS+35*, SELUSERS+14*, SELUSERS+34*, PAYERS+22*, PAYERS+24, ADDLN+11, ADDLN+15 |
>> ZTQUEUED | PRINT+5 |
>> ZTREQ | PRINT+5* |