CMS-1500 (1101)    IB FORM FIELD CONTENT (364.7)

Name Value
FORM FIELD REFERENCE CMS-1500
SECURITY LEVEL NATIONAL,NO EDIT
DATA ELEMENT N-CURR INSURANCE MAILING NAME
PAD CHARACTER NO PAD REQUIRED
FORMAT CODE N Z S:$$WNRBILL^IBEFUNC(IBXIEN) IBXDATA="MEDICARE" S Z="",$P(Z," ",+$P($G(^IBE(350.9,1,1)),U,27)+1)="" S IBXSAVE("INDENT")=Z S:IBXDATA'="" IBXDATA=Z_IBXDATA
FORMAT CODE DESCRIPTION
If the 1500 ADDRESS COLUMN parameter exists, move the text over to
this column by adding spaces at the start of it.  Save the indent parameter
in IBXSAVE("INDENT") for future use.  If the current insurance is MEDICARE
WNR, output 'MEDICARE'.