399 (984)    INDEX (.11)

Name Value
FILE 399
NAME AK
DESCRIPTION
For Patch IB*2.0*432:
 
Logic:
 
(1) IF $$LNPRVFT^IBCEU7(X,.IBLNPRV) is TRUE, then we have line providers
    in the IBLNPRV array to be deleted.
    Note: IBLNPRV array holds the procedure IENs (Sub-file 399.0304), and
    line provider IENs and .01 field (Sub-file 399.0404,.01) equal to the 
    delete indicator "@" in FDA format 
    (FDA_ROOT(FILE#,"IENS",FIELD#)="VALUE".
 
 
(2) IF (1) TRUE, then we call FILE^DIE("E","IBLNPRV") to delete the line
level providers in the IBLNPRV array.
 
Allowable line provider types by FORM TYPE:
 
Allowable line provider functions for UB04 (FORM TYPE = 3)
  Inpatient and UB04 Outpatient:
   - Rendering Provider(VAL=3).
   - Referring Provider(VAL=1).
   - Operating Physician(VAL=2).
The patch introduces line providers to the Bill/Claims process. Line 
   - Other Operating Physician(VAL=9).
 
Allowable line provider functions for CMS 1500 (FORM TYPE = 2)
  Inpatient and CMS 1500 Outpatient:
   - Rendering Provider(VAL=3).
   - Referring Provider(VAL=1).
   - Supervising Provider(VAL=5).
providers (Sub-file 399.0404) are based on the claim FORM TYPE. So, when
there is a change in claim FORM TYPE, then we want to update the line
level providers to be in agreement with the claim FORM TYPE (see below for
FORM TYPE and allowable line provider types). In the case when the FORM
TYPE field is changed, then the line provider types are checked to see if
any, or all, line providers need to be deleted from the claim.
SHORT DESCRIPTION Update the line level providers for claim FORM TYPE change.
TYPE MUMPS
EXECUTION FIELD
ACTIVITY IR
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 399
SET LOGIC N IBLNPRV I $$LNPRVFT^IBCEU7(X,.IBLNPRV) D FILE^DIE("E","IBLNPRV") Q
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   399
    FIELD:   .19
    MAXIMUM LENGTH:   20
    COLLATION:   forwards
KILL LOGIC Q