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 | K IBXSAVE("REM") I $$FT^IBCEF(IBXIEN)=3 N Z S Z=$P($G(^DGCR(399,IBXIEN,"UF2")),U,3),IBXDATA="" S:Z'="" IBXDATA="ADD",IBXSAVE("REM")=Z |
FORMAT CODE DESCRIPTION | Get bill remarks from field 399/402, if non-empty save value in IBXSAVE("REM"), and set IBXDATA to "ADD" (qualifier). |