Here is the masterfile:
$$$ CREATED BY AUTODB2 ON 02/17/09 AT 14.23.39 BY A020150
FILENAME=AUVTVCS_PAXXF_JY,SUFFIX=SQLDS,$
$ MAIN RECORD SEGMENT
SEGNAME='AUVTVCS_PAXXF_JY',SEGTYPE=S0,$
FIELD=COMPANY_CODE ,COMPANY_CODE ,A3 ,A3 ,MISSING=ON ,$
FIELD=MASTER_ID ,MASTER_ID ,A15 ,A15 ,MISSING=ON ,$
$ FIELD=SEQUENCE_NUMBER ,SEQUENCE_NUMBER ,P9 ,P4 ,MISSING=ON ,$
FIELD=SEQUENCE_NUMBER ,SEQUENCE_NUMBER ,I4 ,I4 ,MISSING=ON ,$
FIELD=PRODUCT_CODE ,PRODUCT_CODE ,A2 ,A2 ,MISSING=ON ,$
FIELD=PLAN_CODE ,PLAN_CODE ,A6 ,A6 ,MISSING=ON ,$
FIELD=LINE_OF_BUS_CD ,LINE_OF_BUS_CD ,A3 ,A3 ,MISSING=ON ,$
FIELD=STATRY_CO_CD ,STATRY_CO_CD ,A3 ,A3 ,MISSING=ON ,$
FIELD=REVERSAL_TRX_DATE ,REVERSAL_TRX_DATE ,P10 ,P5 ,MISSING=ON ,$
FIELD=RVSL_ORGNATR_CD ,RVSL_ORGNATR_CD ,A8 ,A8 ,MISSING=ON ,$
FIELD=STAT_REQ_CD ,STAT_REQ_CD ,A1 ,A1 ,MISSING=ON ,$
$ FIELD=NUMBER_OF_PAYEES ,NUMBER_OF_PAYEES ,P3 ,P1 ,MISSING=ON ,$
FIELD=NUMBER_OF_PAYEES ,NUMBER_OF_PAYEES ,A1 ,A1 ,MISSING=ON ,$
FIELD=CAUSE_CODE ,CAUSE_CODE ,A2 ,A2 ,MISSING=ON ,$
FIELD=MEMO_CODE ,MEMO_CODE ,A2 ,A2 ,MISSING=ON ,$
FIELD=SOURCE_CODE ,SOURCE_CODE ,A2 ,A2 ,MISSING=ON ,$
FIELD=CLAIM_NUMBER ,CLAIM_NUMBER ,A15 ,A15 ,MISSING=ON ,$
FIELD=USER_AREA ,USER_AREA ,A8 ,A8 ,MISSING=ON ,$
FIELD=FUTURE_VAL_DATE ,FUTURE_VAL_DATE ,P10 ,P5 ,MISSING=ON ,$
FIELD=ACCM_CASH_VAL ,ACCM_CASH_VAL ,P12.2 ,P8 ,MISSING=ON ,$
FIELD=DEATH_PROCEEDS ,DEATH_PROCEEDS ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=MIN_DTH_BNFT ,MIN_DTH_BNFT ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=TOT_LOAN_PRNC ,TOT_LOAN_PRNC ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=LOAN_INT_EARND ,LOAN_INT_EARND ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=LOAN_INT_UNEARN ,LOAN_INT_UNEARN ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=TAMRA_403B_CONTR ,TAMRA_403B_CONTR ,A1 ,A1 ,MISSING=ON ,$
FIELD=CAN_TAX_AMT1 ,CAN_TAX_AMT1 ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=CAN_TAX_AMT2 ,CAN_TAX_AMT2 ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=CAN_TAX_AMT3 ,CAN_TAX_AMT3 ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=CAN_TAX_AMT4 ,CAN_TAX_AMT4 ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=CAN_TAX_AMT5 ,CAN_TAX_AMT5 ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=CANADIAN_GAIN_AMT ,CANADIAN_GAIN_AMT ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=TOTAL_MVA ,TOTAL_MVA ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=MVA_OVERRIDE_IND ,MVA_OVERRIDE_IND ,A1 ,A1 ,MISSING=ON ,$
FIELD=TAX_INCUR_403B ,TAX_INCUR_403B ,P12.2 ,P6 ,MISSING=ON ,$
FIELD=LOAN_FILE_CODE ,LOAN_FILE_CODE ,P7 ,P3 ,MISSING=ON ,$
FIELD=PAYEE_AREA ,PAYEE_AREA ,A1370 ,A1370 ,MISSING=ON ,$
FIELD=PAYEE_AMOUNTS ,PAYEE_AMOUNTS ,A300 ,A300 ,MISSING=ON ,$
FIELD=FUND_INFO ,FUND_INFO ,A1400 ,A1400 ,MISSING=ON ,$
FIELD=DEATH_PAYOUT_OPTN ,DEATH_PAYOUT_OPTN ,A1 ,A1 ,MISSING=ON ,$
$ DEFINED FIELDS FOR THIS SEGMENT
DEFINE SEQ_NUMBER/P9=CHKPCK(4,SEQUENCE_NUMBER,0,SEQ_NUMBER);$
DEFINE NUMBER_PAYEES/P3=CHKPCK(1,NUMBER_OF_PAYEES,0,NUMBER_PAYEES);$
$ PAY AREA SEGMENT
SEGMENT=PAYAREA ,PARENT=AUVTVCS_PAXXF_JY ,POS=PAYEE_AREA ,OCCURS=5 ,$
FIELD=DEP_TICK_1 ,DEP_TICK_1 ,A1 ,A1 ,MISSING=ON ,$
FIELD=DEP_TICK_2 ,DEP_TICK_2 ,A4 ,A4 ,MISSING=ON ,$
FIELD=PAYDIS_IND ,PAYDIS_IND ,A1 ,A1 ,MISSING=ON ,$
FIELD=PAYVER_SSEC ,PAYVER_SSEC ,A1 ,A1 ,MISSING=ON ,$
FIELD=PCENT_BEN ,PCENT_BEN ,I4 ,I4 ,MISSING=ON ,$
FIELD=PAYID_TYPE ,PAYID_TYPE ,A1 ,A1 ,MISSING=ON ,$
FIELD=PAY_SSEC ,PAY_SSEC ,A15 ,A15 ,MISSING=ON ,$
FIELD=PAY_SSECS ,PAY_SSECS ,A1 ,A1 ,MISSING=ON ,$
FIELD=PAYCTAX_EIND ,PAYCTAX_EIND ,A1 ,A1 ,MISSING=ON ,$
FIELD=PAYCWH_TAXI ,PAYCWH_TAXI ,A1 ,A1 ,MISSING=ON ,$
FIELD=WH_OVRRIDED ,WH_OVRRIDED ,A1 ,A1 ,MISSING=ON ,$
FIELD=WHAMTFED ,WHAMTFED ,A6 ,A6 ,MISSING=ON ,$
FIELD=WHPCNTFED ,WHPERCNTFED ,A3 ,A3 ,MISSING=ON ,$
FIELD=WHAMTSTATE ,WHAMTSTATE ,A6 ,A6 ,MISSING=ON ,$
FIELD=WHPCNTSTA ,WHPCNTSTA ,A3 ,A3 ,MISSING=ON ,$
FIELD=WHAMTLOCAL ,WHAMTLOCAL ,A6 ,A6 ,MISSING=ON ,$
FIELD=WHPCNTLOC ,WHPCNTLOC ,A3 ,A3 ,MISSING=ON ,$
FIELD=PAY_LST_NME ,PAY_LST_NME ,A15 ,A15 ,MISSING=ON ,$
FIELD=PAY_FST_NME ,PAY_FST_NME ,A20 ,A20 ,MISSING=ON ,$
FIELD=PAY_PREFIX ,PAY_PREFIX ,A4 ,A4 ,MISSING=ON ,$
FIELD=PAY_SUFFIX ,PAY_SUFFIX ,A4 ,A4 ,MISSING=ON ,$
FIELD=PAY_ADDR_1 ,PAY_ADDR_1 ,A30 ,A30 ,MISSING=ON ,$
FIELD=PAY_ADDR_L1 ,PAY_ADDR_L1 ,A30 ,A30 ,MISSING=ON ,$
FIELD=PAY_ADDR_L2 ,PAY_ADDR_L2 ,A30 ,A30 ,MISSING=ON ,$
FIELD=PAY_ADDR_L3 ,PAY_ADDR_L3 ,A30 ,A30 ,MISSING=ON ,$
FIELD=PAY_ADDR_L4 ,PAY_ADDR_L4 ,A30 ,A30 ,MISSING=ON ,$
FIELD=PAY_ZIPCODE ,PAY_ZIPCODE ,A9 ,A9 ,MISSING=ON ,$
FIELD=PAY_CNTY_CD ,PAY_CNTY_CD ,A2 ,A2 ,MISSING=ON ,$
FIELD=TAX_FRM_OVR ,TAX_FRM_OVR ,A1 ,A1 ,MISSING=ON ,$
FIELD=STATAX_OVRI ,STATAX_OVRI ,A1 ,A1 ,MISSING=ON ,$
FIELD=PAYRES_STA ,PAYRES_STA ,A3 ,A3 ,MISSING=ON ,$
FIELD=PAY_FILLER ,PAY_FILLER ,A7 ,A7 ,MISSING=ON ,$
FIELD=PAY_NMBR ,ORDER ,I2 ,I4 ,$
$ DEFINED FIELDS FOR THIS SEGMENT
DEFINE PERCENT_BEN/P7.3=CHKPCK(4,PCENT_BEN,.000,PERCENT_BEN);$
DEFINE WH_AMTFED/P13.2=CHKPCK(6,WHAMTFED,0.00,WH_AMTFED);$
DEFINE WH_PERCNTFED/P7.3=CHKPCK(3,WHPERCNTFED,0.000,WH_PERCNTFED);$
DEFINE WH_AMTSTATE/P13.2=CHKPCK(6,WHAMTSTATE,0.00,WH_AMTSTATE);$
DEFINE WH_PCNTSTA/P7.3=CHKPCK(3,WHPCNTSTA ,0.000,WH_PCNTSTA);$
DEFINE WH_AMTLOCAL/P13.2=CHKPCK(6,WHAMTLOCAL,0.00,WH_AMTLOCAL);$
DEFINE WH_PCNTLOC/P7.3=CHKPCK(3,WHPCNTLOC ,0.000,WH_PCNTLOC);$
$ PAY AMOUNTS SEGMENT
SEGMENT=PAYAMTS ,PARENT=AUVTVCS_PAXXF_JY ,POS=PAYEE_AMOUNTS ,OCCURS=5 ,$
FIELD=CHECK_AMOUNT ,CHECK_AMOUNT ,P12.2 ,P8 ,MISSING=ON ,$
FIELD=DISB_AMT ,DISB_AMT ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=PAY_PROCEEDS ,PAY_PROCEEDS ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=AMT_WH_FEDS ,AMT_WH_FEDS ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=AMT_WH_STATE ,AMT_WH_STATE ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=AMT_WH_LOCAL ,AMT_WH_LOCAL ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=BTEFRA_CAPS ,BTEFRA_CAPS ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=ATEFRA_CAPS ,ATEFRA_CAPS ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=TEFRA_GAINS ,TEFRA_GAINS ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=CONTRI_AMT ,CONTRIB_AMT ,P13.2 ,P6 ,MISSING=ON ,$
FIELD=AMT_NMBR ,ORDER ,I2 ,I4 ,MISSING=ON ,$
$ DEFINED FIELDS FOR THIS SEGMENT
DEFINE CHECK_AMOUNT1/P13.2=CHKPCK(8, CHECK_AMOUNT,.00, CHECK_AMOUNT1);$
$ FUNDS INFORMATION SEGMENT
SEGMENT=FUNDINFO ,PARENT=AUVTVCS_PAXXF_JY ,POS=FUND_INFO ,OCCURS=20 ,$
FIELD=F_TYPE ,F_TYPE ,A1 ,A1 ,MISSING=ON ,$
FIELD=FNUMBER ,FNUMBER ,A2 ,A2 ,MISSING=ON ,$
FIELD=FNETAMOUNT ,FNETAMOUNT ,A6 ,A6 ,MISSING=ON ,$
FIELD=FAMTSURREN ,FAMTSURREN ,A6 ,A6 ,MISSING=ON ,$
FIELD=FUTSSURREN ,FUTSSURREN ,A6 ,A6 ,MISSING=ON ,$
FIELD=FCCASH_VAL ,FCCASHVAL ,A6 ,A6 ,MISSING=ON ,$
FIELD=FGAIN_AMT ,FGAINAMT ,A6 ,A6 ,MISSING=ON ,$
FIELD=FLOSS_AMT ,FLOSSAMT ,A6 ,A6 ,MISSING=ON ,$
FIELD=FTOT_UNITS ,FTOTUNITS ,A6 ,A6 ,MISSING=ON ,$
FIELD=FINT_EARN ,FINTEARN ,A6 ,A6 ,MISSING=ON ,$
FIELD=FADD_INTR ,FADDINTR ,A6 ,A6 ,MISSING=ON ,$
FIELD=F_FILLER ,F_FILLER ,A8 ,A8 ,MISSING=ON ,$
FIELD=FMVAAMT ,FMVAAMT ,A5 ,A5 ,MISSING=ON ,$
FIELD=FUND_NMBR ,ORDER ,I2 ,I4 ,$
$ DEFINED FIELDS FOR THIS SEGMENT
DEFINE F_NUMBER/P3=CHKPCK(2, FNUMBER,000, F_NUMBER);$
DEFINE F_NET_AMOUNT/P13.2=CHKPCK(6, FNETAMOUNT,.00, F_NET_AMOUNT);$
DEFINE F_AMT_SURREN/P13.2=CHKPCK(6, FAMTSURREN,.00, F_AMT_SURREN);$
DEFINE F_UTS_SURREN/P13.4=CHKPCK(6, FUTSSURREN,.0000, F_UTS_SURREN);$
DEFINE F_CCASH_VAL/P13.2=CHKPCK(6, FCCASHVAL,.00, F_CCASH_VAL);$
DEFINE F_GAIN_AMT/P13.2=CHKPCK(6, FGAINAMT,.00, F_GAIN_AMT);$
DEFINE F_LOSS_AMT/P13.2=CHKPCK(6, FLOSSAMT,.00, F_LOSS_AMT);$
DEFINE F_TOT_UNITS/P13.4=CHKPCK(6, FTOTUNITS,.0000, F_TOT_UNITS);$
DEFINE F_INT_EARN/P13.2=CHKPCK(6, FINTEARN,.00, F_INT_EARN);$
DEFINE F_ADD_INTR/P13.2=CHKPCK(6, FADDINTR,.00, F_ADD_INTR);$
DEFINE F_MVA_AMOUNT/P13.2=CHKPCK(5, FMVAAMT,.00, F_MVA_AMOUNT);$
Here is the fex:
DEFINE FILE AUVTVCS_PAXXF_JY
DEF_CK_AMT/A20=SPELLNM(96, AUVTVCS_PAXXF_JY.PAYAMTS.CHECK_AMOUNT, DEF_CK_AMT);
DEF_CK_AMT2/D12.2=DMOD(AUVTVCS_PAXXF_JY.PAYAMTS.CHECK_AMOUNT, 1, DEF_CK_AMT2);
END
TABLE FILE AUVTVCS_PAXXF_JY
PRINT
'AUVTVCS_PAXXF_JY.PAYAMTS.CHECK_AMOUNT'
'AUVTVCS_PAXXF_JY.PAYAMTS.DISB_AMT'
'AUVTVCS_PAXXF_JY.PAYAMTS.PAY_PROCEEDS'
'AUVTVCS_PAXXF_JY.PAYAMTS.AMT_WH_FEDS'
'AUVTVCS_PAXXF_JY.PAYAMTS.AMT_WH_STATE'
'AUVTVCS_PAXXF_JY.PAYAMTS.AMT_WH_LOCAL'
'AUVTVCS_PAXXF_JY.PAYAMTS.AMT_NMBR'
'AUVTVCS_PAXXF_JY.AUVTVCS_PAXXF_JY.MASTER_ID'
'AUVTVCS_PAXXF_JY.AUVTVCS_PAXXF_JY.ACCM_CASH_VAL'
'AUVTVCS_PAXXF_JY.PAYAMTS.CHECK_AMOUNT'
'AUVTVCS_PAXXF_JY.AUVTVCS_PAXXF_JY.SEQUENCE_NUMBER'
'AUVTVCS_PAXXF_JY.AUVTVCS_PAXXF_JY.LINE_OF_BUS_CD'
'AUVTVCS_PAXXF_JY.PAYAREA.PAYDIS_IND'
'AUVTVCS_PAXXF_JY.PAYAREA.PCENT_BEN'
'AUVTVCS_PAXXF_JY.PAYAREA.PAYID_TYPE'
'AUVTVCS_PAXXF_JY.PAYAREA.PAY_SSECS'
'AUVTVCS_PAXXF_JY.PAYAREA.PAYCTAX_EIND'
'AUVTVCS_PAXXF_JY.AUVTVCS_PAXXF_JY.DEATH_PAYOUT_OPTN'
'AUVTVCS_PAXXF_JY.PAYAREA.PAY_SSEC'
'AUVTVCS_PAXXF_JY.PAYAREA.PAY_LST_NME'
'AUVTVCS_PAXXF_JY.PAYAREA.PAY_FST_NME'
'AUVTVCS_PAXXF_JY.PAYAREA.PAY_ADDR_1'
'AUVTVCS_PAXXF_JY.PAYAREA.PAY_ADDR_L1'
'AUVTVCS_PAXXF_JY.PAYAREA.PAY_ZIPCODE'
'AUVTVCS_PAXXF_JY.PAYAREA.PAYRES_STA'
HEADING
""
FOOTING
""
WHERE AUVTVCS_PAXXF_JY.AUVTVCS_PAXXF_JY.MASTER_ID EQ ' 900001001';
ON TABLE SET PAGE-NUM OFF
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
UNITS=IN,
SQUEEZE=ON,
ORIENTATION=PORTRAIT,
$
TYPE=REPORT,
GRID=OFF,
FONT='ARIAL',
SIZE=9,
$
TYPE=TITLE,
STYLE=BOLD,
$
TYPE=TABHEADING,
SIZE=12,
STYLE=BOLD,
$
TYPE=TABFOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=HEADING,
SIZE=12,
STYLE=BOLD,
$
TYPE=FOOTING,
SIZE=12,
STYLE=BOLD,
$
TYPE=SUBHEAD,
SIZE=10,
STYLE=BOLD,
$
TYPE=SUBFOOT,
SIZE=10,
STYLE=BOLD,
$
TYPE=SUBTOTAL,
BACKCOLOR=RGB(210 210 210),
$
TYPE=ACROSSVALUE,
SIZE=9,
$
TYPE=ACROSSTITLE,
STYLE=BOLD,
$
TYPE=GRANDTOTAL,
BACKCOLOR=RGB(210 210 210),
STYLE=BOLD,
$
ENDSTYLE
END
7.6.10
windows
AIX
UDB
SQL Server