DEFINE FILE FCLWIUAM DATEESTABLISHED/MDYY = DATECVT(CYMD, 'A8YYMD', 'YYMD'); FROMDATE/MDYY = DATECVT(FROM_DATE, 'A8YYMD', 'YYMD'); TODATE/MDYY = DATECVT(TO_DATE, 'A8YYMD', 'YYMD'); PAYMENTDATE/MDYY = DATECVT(PYMT_ENTER, 'A8YYMD', 'YYMD'); END TABLE FILE FCLWIUAM PRINT PREFIX AS 'Prefix' DCN AS 'Debtor ID' PGM AS 'Program' DATEESTABLISHED AS 'Date Established' FROMDATE AS 'From Date' TODATE AS 'To Date' BEG_BALANCE/P11.2M AS 'Begin Balance' WIUAM.CUR_BALANCE/P11.2M AS 'Current Balance' CLAIM_STATUS AS 'Claim, Status' WIU_STATUS AS 'WIU, Status' WIU_ACTION AS 'WIU, Action' LEGAL_ACTION AS 'Legal, Action' CAUSE_CODE AS 'Cause' PAYMENTDATE AS 'Payment Date' PYMT_TRANS AS 'Tran Type' PYMT_AMT/P11.2M AS 'Payment Amount' DEBTOR_COUNTY AS 'Debtor, County' BY WIUAM.PGM NOPRINT ON TABLE COLUMN-TOTAL AS 'TOTAL' ON TABLE PCHOLD FORMAT EXL2K OPEN END SET COMPOUND=BYTOC DEFINE FILE FCLWIUAM DATEESTABLISHED/MDYY = DATECVT(CYMD, 'A8YYMD', 'YYMD'); FROMDATE/MDYY = DATECVT(FROM_DATE, 'A8YYMD', 'YYMD'); TODATE/MDYY = DATECVT(TO_DATE, 'A8YYMD', 'YYMD'); PAYMENTDATE/MDYY = DATECVT(PYMT_ENTER, 'A8YYMD', 'YYMD'); END TABLE FILE FCLWIUAM PRINT PREFIX AS 'Prefix' DCN AS 'Debtor ID' PGM AS 'Program' DATEESTABLISHED AS 'Date Established' FROMDATE AS 'From Date' TODATE AS 'To Date' BEG_BALANCE/P11.2M AS 'Begin Balance' CUR_BALANCE/P11.2M AS 'Current Balance' CLAIM_STATUS AS 'Claim, Status' WIU_STATUS AS 'WIU, Status' WIU_ACTION AS 'WIU, Action' LEGAL_ACTION AS 'Legal, Action' CAUSE_CODE AS 'Cause' PAYMENTDATE AS 'Payment Date' PYMT_TRANS AS 'Tran Type' PYMT_AMT/P11.2M AS 'Payment Amount' DEBTOR_COUNTY AS 'Debtor, County' BY TOTAL COMPUTE FYPROGTYPE/A26 = 'FY2013-WIU-Program-Type-' || PGM; NOPRINT -*ON TABLE COLUMN-TOTAL AS 'TOTAL' BEG_BALANCE' ON TABLE PCHOLD FORMAT EXL2KThis message has been edited. Last edited by: <Kathryn Henning>,
BY TOTAL COMPUTE FYPROGTYPE/A26 = 'FY2013-WIU-Program-Type-' || PGM; NOPRINT BY BEG_BALANCE NOPRINT ON TABLE BEG_BALANCE SUBTOTAL ON TABLE PCHOLD FORMAT EXL2K END 0 ERROR AT OR NEAR LINE 140 IN PROCEDURE ADHOCRQ FOCEXEC * (FOC002) A WORD IS NOT RECOGNIZED: BEG_BALANCE BYPASSING TO END OF COMMAND (FOC3298) ERROR FOUND IN A COMPOUND REPORT Compound Report is TERMINATING.....
quote:ON TABLE BEG_BALANCE SUBTOTAL
In FOCUS since 1986 | WebFOCUS Server 8.2.01M, thru 8.2.07 on Windows Svr 2008 R2 | ||
WebFOCUS App Studio 8.2.06 standalone on Windows 10 |
BY TOTAL COMPUTE FYPROGTYPE/A26 = 'FY2013-WIU-Program-Type-' || PGM; NOPRINT ON TABLE NOTOTAL ON BEG_BALANCE SUBTOTAL ON TABLE PCHOLD FORMAT EXL2K
BY BEG_BALANCE NOPRINT BY TOTAL COMPUTE FYPROGTYPE/A26 = 'FY2013-WIU-Program-Type-' || PGM; NOPRINT ON TABLE NOTOTAL ON BEG_BALANCE SUBTOTAL ON TABLE PCHOLD FORMAT EXL2K