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 |
