UB-04 (1312)    IB FORM FIELD CONTENT (364.7)

Name Value
FORM FIELD REFERENCE UB-04
SECURITY LEVEL NATIONAL,NO EDIT
DATA ELEMENT N-CURR INS CO FULL ADDRESS
PAD CHARACTER NO PAD REQUIRED
FORMAT CODE N Y,Z K IBXSAVE("CADR") I $O(IBXDATA(0)) S Y=$G(IBXDATA(6)) D ZIPOUT^VAFADDR S:Y'="" $P(IBXSAVE("CADR"),U,6)=Y F Z=1:1:5,7 S:$D(IBXDATA(Z)) $P(IBXSAVE("CADR"),U,Z)=IBXDATA(Z)
FORMAT CODE DESCRIPTION
Extract the current payer address and store the address components in the 
[7] claim office ID (not used)
IBXSAVE("CADR") pieced string variable with the following pieces:
 
[1] address line 1
[2] address line 2
[3] address line 3
[4] city
[5] pointer to the state file
[6] external zip code with dashes