Name | Value |
---|---|
FORM FIELD REFERENCE | IB 837 TRANSMISSION |
SECURITY LEVEL | NATIONAL,NO EDIT |
DATA ELEMENT | N-GET FROM PREVIOUS EXTRACT |
PAD CHARACTER | NO PAD REQUIRED |
FORMAT CODE | N IBZ,W,DEFPOS,POS,HOF D F^IBCEF("N-HCFA SERVICE LINE CALLABLE","IBZ",,IBXIEN) S DEFPOS="",W=0 X "F S W=$O(IBZ(W)) Q:'W S POS=$P($G(IBZ(W)),U,3),HOF=(POS=11!(POS=12)) S:DEFPOS=""""!HOF DEFPOS=POS Q:HOF" S IBXDATA=DEFPOS |
FORMAT CODE DESCRIPTION | For professional claims only, this is the claim level place of service Previous to IB patch 400, this field was the admitting DX. The admitting DX and qualifier is now sent in CL1A-15 (Qualifier) and CL1A-16 (Admitting DX code). code. IB patch 400 changes. Build the array with all professional line items (IBZ array). Loop through the line items looking for POS code of 11 or 12 (home or office). If either 11 or 12 is found, then use that POS code as the claim level POS code. If neither 11 nor 12 is found in the line level POS codes, then use the first POS code found in the line items as the claim level POS code. |