IBCNAU2 ;ALB/KML/AWC - USER EDIT REPORT (COMPILE) ;6-APRIL-2015
Source file <IBCNAU2.m>
| 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 |
