SPOUSE ZIP (124)    1010EZ MAPPING (711)

Name Value
ASSIGNED DATA NAME SPOUSE ZIP
DATA KEY IIA;6.4
ACTIVE ACTIVE
VERSION # 2.5
TRANSFORM S EASRTR=$$ZIP^EASEZT2(EZDATA)
MAP-TO FILE 408.13
MAP-TO SUB-FILE 408.13
MAP-TO FIELD 1.7
DISPLAY NAME Sp. Zip
DIR(0) S DIR(0)="FO^5:10^S XX=$TR(X,""-"","""") I XX'?5N,(XX'?9N) K X"