LEGACY UB-92 (695)    IB FORM FIELD CONTENT (364.7)

Name Value
FORM FIELD REFERENCE LEGACY UB-92
SECURITY LEVEL NATIONAL,NO EDIT
DATA ELEMENT N-GET FROM PREVIOUS EXTRACT
PAD CHARACTER NO PAD REQUIRED
FORMAT CODE N Z,Q K IBXDATA F Z=1:1 Q:$G(IBXSAVE("OCCS",Z))="" S Q=$$DATE^IBCF2($P(IBXSAVE("OCCS",Z),U,3),,1) S:Z'>2 IBXDATA(Z)=Q D:Z>2 XOCCS^IBCEF3($P(IBXSAVE("OCCS",Z),U)_U_$$DATE^IBCF2($P(IBXSAVE("OCCS",Z),U,2),,1)_U_Q,Z) K IBXSAVE("OCCS",Z)
FORMAT CODE DESCRIPTION
This data element is a group data element where more than one occurrence
might be expected.  It relies on the presence of data in array
IBXSAVE("OCCS") extracted previously.  This field outputs the 1st and 2nd
occurrences of occurrence span code 'to date' formatted as MMDDYY found
in the third '^' piece of the IBXSAVE("OCCS",n) array data element.