/* RECORD LAYOUT - CYCLE 10 - UNION FILE */ INFILE ??? LRECL = 48 INPUT RECID 1- 5 UNIONTYP 6- 6 UNIONRNK 7- 7 DVCURUNN 8- 8 DVAGEDCC 9- 11 .1 DVSEX 12- 12 DVUNAGE 13- 15 .1 DVMSBEUN 16- 16 DVSPMSBE 17- 17 DVSPCOML 18- 18 DVAGEDIF 19- 20 DVCLMAR 21- 21 DVAGEMAR 22- 24 .1 DVENDUNN 25- 26 DVAGESEP 27- 29 .1 DVAGDTHC 30- 32 .1 DVAGEDIV 33- 35 .1 DVCHDEFF 36- 36 DVDURSEP 37- 39 .1 DVDURDTH 40- 42 .1 DVDURDIV 43- 45 .1 DVDUREND 46- 48 .1 ;