This file contains all the corresponding X.12 codes for loop IDs. It is a dictionary to map X12 codes to their corresponding values. The codes are used to parse inbound type 271 messages, among others. HIPAA loop IDs come from FSC as part of 271 response message. Per VHA Directive 10-93-142, this file definition should not be modified.
HELP-PROMPT: Answer must be 1-90 characters in length.
DESCRIPTION:
This field is controlled by the Financial Service Center (FSC) and is associated with their table: X12_LOOP_ID.
CROSS-REFERENCE: ^^TRIGGER^365.027^.04
1)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.027,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.027,.02,1,1,1.4)
1.4)= S DIH=$G(^IBE(365.027,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.027,DIG=.04 D ^DICR
2)= K DIV S DIV=X,D0=DA,DIV(0)=D0 S Y(1)=$S($D(^IBE(365.027,D0,0)):^(0),1:"") S X=$P(Y(1),U,4),X=X S DIU=X K Y S X=DIV N %I,%H,% D NOW^%DTC S X=% X ^DD(365.027,.02,1,1,2.4)
2.4)= S DIH=$G(^IBE(365.027,DIV(0),0)),DIV=X S $P(^(0),U,4)=DIV,DIH=365.027,DIG=.04 D ^DICR
CREATE VALUE)= NOW
DELETE VALUE)= NOW
FIELD)= DATE LAST EDITED
Update the 'DATE LAST EDITED' whenever the Description is changed.