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,Z0,Q S IBXNOREQ=$$NFT^IBCEF1(2,IBXIEN),Z=0 F S Z=$O(IBXSAVE("OUTPT",Z)) Q:'Z S Z0=$P(IBXSAVE("OUTPT",Z),U,4),Q=$S(Z0'=7:9,1:12) S:$P(IBXSAVE("OUTPT",Z),U,Q)'="" IBXDATA(Z)=$P(IBXSAVE("OUTPT",Z),U,Q) S:IBXDATA(Z)<1 IBXDATA(Z)=1 |
FORMAT CODE DESCRIPTION | This is a group data element so more than 1 occurrence of a value is possible for the data element in the previously extracted IBXSAVE array. If any service line data is found, the data is output. If the type of service is not 7 (anesthesia), the units are output. If the type of service is anesthesia, the anesthesia minutes are output. If the # of units is less than 1, 1 is the default. |