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 IBXDATA N Z,IBZ S Z=0 F S Z=$O(IBXSAVE("OUTPT",Z)) Q:'Z I $P($G(IBXSAVE("OUTPT",Z,"AUX")),U,8)'="" S IBXDATA(Z)=$P(IBXSAVE("OUTPT",Z,"AUX"),U,8),IBZ=$P(IBXSAVE("OUTPT",Z,"AUX"),U,9) S:IBZ="" IBZ=" " S IBXDATA(Z)=IBZ_IBXDATA(Z) |
FORMAT CODE DESCRIPTION | This is a group data element so more than 1 occurrence of a value is Length was also reduced from 80 chars to 61 chars in the field since that is all the Box 24 shaded area allows for the comment per line item. possible for the data element in the previously extracted IBXSAVE array. Only output the data for service lines that have data. esg - 8/18/06 - IB patch 348 - new CMS 1500 claim form If the service line comment qualifier doesn't exist, then add 2 blank spaces in front of the service line comment. If it does exist, then add it to the front of the comment. |