IBCNSC ;ALB/NLR - INSURANCE COMPANY EDIT ;6/1/05 9:42am
Source file <IBCNSC.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ; -- main entry point for IBCNS INSURANCE COMPANY, IBCNS VIEW INS CO
|
|
ENQ | ||
HDR | ; -- header code
|
|
INIT | ; -- init variables and list array
|
|
BLD | ; -- list builder
|
|
APPEALS | ;
|
|
APPEALAD | ; KDM US2487 IB*2.0*592 call in tag from IBCNSI
|
|
INQUIRY | ;
|
|
INQAD | ; KDM US2487 IB*2.0*592 call in tag from IBCNSI
|
|
DENTAL | ; Display Dental Claims office information
|
|
DENTALAD | ; KDM US2487 IB*2.0*592 call in tag from IBCNSI
|
|
HELP | ; -- help code
|
|
EXIT | ; -- exit code
|
|
INSCO | ; -- select insurance company
|
|
INSCOQ | ;
|
|
BLANK(LINE) | ; -- Build blank line
|
|
EDIKEY() | ; input transform code to determine if user is allowed to edit
; certain fields in the insurance company file |
|
EDIKEYX | ;
|
|
DUPQUAL(IBCNS,QUAL,FIELD) | ; input transform to make sure that the same qualifier is not used twice for
; payer secondary IDs. There are two sets of fields in file 36 that can not be duplicated. ; 6.01 EDI INST SECONDARY ID QUAL(1) can not be the same as 6.03 EDI INST SECONDARY ID QUAL(2) ; 6.05 EDI PROF SECONDARY ID QUAL(1) can not be the same as 6.07 EDI PROF SECONDARY ID QUAL(2) ; ; Input: ; IBCNS is the insurance company internal number ; QUAL is the internal code of the value being input. ; FIELD is the field it is being compare with. |
|
ALLOWED(IBAC) | ; input transform to make sure that Administrative Contractor is set up in the site parameters.
; it will be set up for either commercial or medicare. Since the type is defined my the plan and we are at a higher ; level in the Insurance Company, we have to allow both. ; called from ^DD(36.015,.01,0) and ^DD(36.016,.01,0) |
|
CLEANIDS(INSIEN) | ;
; INSIEN=Insurance Company IEN |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
FileNo | Call Tags |
---|---|
^DIC(36 - [#36] | Classic Fileman Calls, GET1^DIQ |