[SOLVED] PDF - Same output with different values being passed
Hi
Overview - Report 1 - 5 are same reports. I Pass a different values to these reports and bring them together. Problem - If the first report has null values then all the other reports become null. If the first report has values, then even if the 3rd report is null. It displays all 5 accurately showing the 3rd report values to be null. . So any idea as to what must be wrong. I have even pasted the section_cls thats being called.
-*------------------------------------------------------------------------------------------------------------------- -* This Fex will be called repeatedly in the compound report with choosen department and top 5 class's -* This is the one step before the final piece of the report, where we will combine all earlier information and display -SET &ECHO = ALL; -*SET &DEPT ='52'; -*SET &CLASS = '18'; -*INCLUDE INTERMEDIATE_CLASS -*INCLUDE EMPTYKTRPMRCLS -*INCLUDE TPREPCUITEM -*------------------------------------------------------------------------------------------------------------------- -*SET &REPNUM = 1; -SET &DEPT_TXT = D|&DEPT; -*------------------------------------------------------------------------------------------------------------------- -*Check KTRPMRCLS - If Any Records TABLE FILE KTRPMRCLS PRINT * WHERE CLASS EQ '&CLASS' ON TABLE HOLD AS CLSRSLTS FORMAT ALPHA END -RUN -IF &LINES EQ 0 THEN GOTO NODATA; -*------------------------------------------------------------------------------------------------------------------- JOIN CLEAR * JOIN CLASS IN KTRPMRCLS TO CLASS_I IN EPCUSHTGCLS END -*------------------------------------------------------------------------------------------------------------------- DEFINE FILE KTRPMRCLS TEXT1/A15 = 'Resolution'; TEXT2/A15 = 'Prevention'; TEXT3/A15= 'Intelligence'; TEXT4/A15= 'Prevention'; TEXT5/A10= 'Results'; TEXT6/A4 = '#'; TEXT7/A4 = '$'; TEXT8/A10 = 'TPS Rec'; TEXT9/A5 = 'PMR'; TEXT10/A12 = 'Internals'; TEXT11/A12 = 'Externals'; TEXT12/A12 = 'Other Rec'; TEXT13/A15 = 'KTR'; TEXT14/A15='TOTAL IMPACT'; TEXT15/A15=''; TEXT16/A18='Prevent/Resolve'; TEXT17/A15='Total Intel'; TEXT18/A18='Total Identified'; TEXT19/A15='Empty Pack'; REPNUM/A3='&REPNUM'; TEXT20/A12 = '&DPCI1'; TEXT21/A12 = '&DPCI2'; TEXT22/A12 = '&DPCI3'; TEXT23/A12 = '&DPCI4'; TEXT24/A12 = '&DPCI5'; TEXT25/A30 = '&ITEM_DESC_T1'; TEXT26/A30 = '&ITEM_DESC_T2'; TEXT27/A30 = '&ITEM_DESC_T3'; TEXT28/A30 = '&ITEM_DESC_T4'; TEXT29/A30 = '&ITEM_DESC_T5'; TEXTH/A12 = 'Top 5 Items'; END -*------------------------------------------------------------------------------------------------------------------- TABLE FILE KTRPMRCLS ON TABLE SUBHEAD "<+0>" "<+0>&DEPT_TXT-&CLASS" "<+0>"YTD Count Updates" "TY Shortage" "LY Shortage" "<+0>Shortage Rank<+0>SUM TEXT5 AS '' TEXT7 AS '' OVER TEXT2 AS '' TEXT15 AS '' OVER TEXT9 AS '' PMRAMNT/D12.2M AS '' OVER TEXT8 AS '' TPSAMT/D12.2M AS '' OVER TEXT12 AS '' OTHRRECAMT/D12.2M AS '' OVER TEXT1 AS '' TEXT15 AS '' OVER TEXT10 AS '' INTRAMT/D12.2M AS '' OVER TEXT11 AS '' EXTERNAMT/D12.2M AS '' OVER TEXT16 AS '' PRERES/D12.2M AS '' OVER TEXT3 AS '' TEXT15 AS '' OVER TEXT13 AS '' KTRAMT/D12.2M AS '' OVER TEXT19 AS '' RETAILAMT/D12.2M AS '' OVER TEXT17 AS '' COMPUTE TOTALINTEL1/P12.2M= (TOTALINTEL + RETAILAMT); AS '' OVER TEXT18 AS '' COMPUTE TOTALIDENTIFIED1/P12.2M= (TOTALIDENTIFIED + RETAILAMT); AS '' OVER TEXT15 AS '' OVER TEXTH AS '' OVER TEXT20 AS '' TEXT25 AS '' OVER TEXT21 AS '' TEXT26 AS '' OVER TEXT22 AS '' TEXT27 AS '' OVER TEXT23 AS '' TEXT28 AS '' OVER TEXT24 AS '' TEXT29 AS '' WHERE CLASS EQ &CLASS ON TABLE PCHOLD FORMAT PDF ON TABLE SET PAGE-NUM OFF -INCLUDE TPRCLSSTYLE END -RUN -*------------------------------------------------------------------------------------------------------------------- -GOTO ENDOFFEX -*------------------------------------------------------------------------------------------------------------------- -NODATA -*------------------------------------------------------------------------------------------------------------------- SQL SELECT * FROM EPCUSHTGCLS WHERE EPCUSHTGCLS.CLASS_I = &CLASS ; TABLE ON TABLE HOLD AS KTRPMRCLS FORMAT FOCUS END DEFINE FILE KTRPMRCLS TEXT1/A15 = 'Resolution'; TEXT2/A15 = 'Prevention'; TEXT3/A15= 'Intelligence'; TEXT4/A15= 'Prevention'; TEXT5/A10= 'Results'; TEXT6/A4 = '#'; TEXT7/A4 = '$'; TEXT8/A10 = 'TPS Rec'; TEXT9/A5 = 'PMR'; TEXT10/A12 = 'Internals'; TEXT11/A12 = 'Externals'; TEXT12/A12 = 'Other Rec'; TEXT13/A15 = 'KTR'; TEXT14/A15='TOTAL IMPACT'; TEXT15/A15=''; TEXT16/A18='Prevent/Resolve'; TEXT17/A15='Total Intel'; TEXT18/A18='Total Identified'; TEXT19/A15='Empty Pack'; PMRAMNT/D12.2M = 0.00; TPSAMT/D12.2M = 0.00; OTHRRECAMT/D12.2M = 0.00; INTRAMT/D12.2M = 0.00; EXTERNAMT/D12.2M = 0.00; PRERES/D12.2M = 0.00; KTRAMT/D12.2M = 0.00; REPNUM/A3='&REPNUM'; TEXT20/A12 = '&DPCI1'; TEXT21/A12 = '&DPCI2'; TEXT22/A12 = '&DPCI3'; TEXT23/A12 = '&DPCI4'; TEXT24/A12 = '&DPCI5'; TEXT25/A30 = '&ITEM_DESC_T1'; TEXT26/A30 = '&ITEM_DESC_T2'; TEXT27/A30 = '&ITEM_DESC_T3'; TEXT28/A30 = '&ITEM_DESC_T4'; TEXT29/A30 = '&ITEM_DESC_T5'; TEXTH/A12 = 'Top 5 Items'; END -*------------------------------------------------------------------------------------------------------------------- TABLE FILE KTRPMRCLS ON TABLE SUBHEAD "<+0>" "<+0>&DEPT_TXT-&CLASS" "<+0>"YTD Count Updates" "TY Shortage" "LY Shortage" "<+0>Shortage Rank<+0>SUM TEXT5 AS '' TEXT7 AS '' OVER TEXT2 AS '' TEXT15 AS '' OVER TEXT9 AS '' PMRAMNT/D12.2M AS '' OVER TEXT8 AS '' TPSAMT/D12.2M AS '' OVER TEXT12 AS '' OTHRRECAMT/D12.2M AS '' OVER TEXT1 AS '' TEXT15 AS '' OVER TEXT10 AS '' INTRAMT/D12.2M AS '' OVER TEXT11 AS '' EXTERNAMT/D12.2M AS '' OVER TEXT16 AS '' PRERES/D12.2M AS '' OVER TEXT3 AS '' TEXT15 AS '' OVER TEXT13 AS '' KTRAMT/D12.2M AS '' OVER TEXT19 AS '' RETAILAMT/D12.2M AS '' OVER TEXT17 AS '' COMPUTE TOTALINTEL1/P12.2M= (TOTALINTEL + RETAILAMT); AS '' OVER TEXT18 AS '' COMPUTE TOTALIDENTIFIED1/P12.2M= (TOTALIDENTIFIED + RETAILAMT); AS '' OVER TEXT15 AS '' OVER TEXTH AS '' OVER TEXT20 AS '' TEXT25 AS '' OVER TEXT21 AS '' TEXT26 AS '' OVER TEXT22 AS '' TEXT27 AS '' OVER TEXT23 AS '' TEXT28 AS '' OVER TEXT24 AS '' TEXT29 AS '' WHERE CLASS EQ '&CLASS' ON TABLE PCHOLD FORMAT PDF ON TABLE SET PAGE-NUM OFF -INCLUDE TPRCLSSTYLE E-*------------------------------------------------------------------------------------------------------------------- -* This Fex will be called repeatedly in the compound report with choosen department and top 5 class's -* This is the one step before the final piece of the report, where we will combine all earlier information and display -SET &ECHO = ALL; -*SET &DEPT ='52'; -*SET &CLASS = '18'; -*INCLUDE INTERMEDIATE_CLASS -*INCLUDE EMPTYKTRPMRCLS -*INCLUDE TPREPCUITEM -*------------------------------------------------------------------------------------------------------------------- -*SET &REPNUM = 1; -SET &DEPT_TXT = D|&DEPT; -*------------------------------------------------------------------------------------------------------------------- -*Check KTRPMRCLS - If Any Records TABLE FILE KTRPMRCLS PRINT * WHERE CLASS EQ '&CLASS' ON TABLE HOLD AS CLSRSLTS FORMAT ALPHA END -RUN -IF &LINES EQ 0 THEN GOTO NODATA; -*------------------------------------------------------------------------------------------------------------------- JOIN CLEAR * JOIN CLASS IN KTRPMRCLS TO CLASS_I IN EPCUSHTGCLS END -*------------------------------------------------------------------------------------------------------------------- DEFINE FILE KTRPMRCLS TEXT1/A15 = 'Resolution'; TEXT2/A15 = 'Prevention'; TEXT3/A15= 'Intelligence'; TEXT4/A15= 'Prevention'; TEXT5/A10= 'Results'; TEXT6/A4 = '#'; TEXT7/A4 = '$'; TEXT8/A10 = 'TPS Rec'; TEXT9/A5 = 'PMR'; TEXT10/A12 = 'Internals'; TEXT11/A12 = 'Externals'; TEXT12/A12 = 'Other Rec'; TEXT13/A15 = 'KTR'; TEXT14/A15='TOTAL IMPACT'; TEXT15/A15=''; TEXT16/A18='Prevent/Resolve'; TEXT17/A15='Total Intel'; TEXT18/A18='Total Identified'; TEXT19/A15='Empty Pack'; REPNUM/A3='&REPNUM'; TEXT20/A12 = '&DPCI1'; TEXT21/A12 = '&DPCI2'; TEXT22/A12 = '&DPCI3'; TEXT23/A12 = '&DPCI4'; TEXT24/A12 = '&DPCI5'; TEXT25/A30 = '&ITEM_DESC_T1'; TEXT26/A30 = '&ITEM_DESC_T2'; TEXT27/A30 = '&ITEM_DESC_T3'; TEXT28/A30 = '&ITEM_DESC_T4'; TEXT29/A30 = '&ITEM_DESC_T5'; TEXTH/A12 = 'Top 5 Items'; END -*------------------------------------------------------------------------------------------------------------------- TABLE FILE KTRPMRCLS ON TABLE SUBHEAD "<+0>" "<+0>&DEPT_TXT-&CLASS" "<+0>"YTD Count Updates" "TY Shortage" "LY Shortage" "<+0>Shortage Rank<+0>SUM TEXT5 AS '' TEXT7 AS '' OVER TEXT2 AS '' TEXT15 AS '' OVER TEXT9 AS '' PMRAMNT/D12.2M AS '' OVER TEXT8 AS '' TPSAMT/D12.2M AS '' OVER TEXT12 AS '' OTHRRECAMT/D12.2M AS '' OVER TEXT1 AS '' TEXT15 AS '' OVER TEXT10 AS '' INTRAMT/D12.2M AS '' OVER TEXT11 AS '' EXTERNAMT/D12.2M AS '' OVER TEXT16 AS '' PRERES/D12.2M AS '' OVER TEXT3 AS '' TEXT15 AS '' OVER TEXT13 AS '' KTRAMT/D12.2M AS '' OVER TEXT19 AS '' RETAILAMT/D12.2M AS '' OVER TEXT17 AS '' COMPUTE TOTALINTEL1/P12.2M= (TOTALINTEL + RETAILAMT); AS '' OVER TEXT18 AS '' COMPUTE TOTALIDENTIFIED1/P12.2M= (TOTALIDENTIFIED + RETAILAMT); AS '' OVER TEXT15 AS '' OVER TEXTH AS '' OVER TEXT20 AS '' TEXT25 AS '' OVER TEXT21 AS '' TEXT26 AS '' OVER TEXT22 AS '' TEXT27 AS '' OVER TEXT23 AS '' TEXT28 AS '' OVER TEXT24 AS '' TEXT29 AS '' WHERE CLASS EQ &CLASS ON TABLE PCHOLD FORMAT PDF ON TABLE SET PAGE-NUM OFF -INCLUDE TPRCLSSTYLE END -RUN -*------------------------------------------------------------------------------------------------------------------- -GOTO ENDOFFEX -*------------------------------------------------------------------------------------------------------------------- -NODATA -*------------------------------------------------------------------------------------------------------------------- SQL SELECT * FROM EPCUSHTGCLS WHERE EPCUSHTGCLS.CLASS_I = &CLASS ; TABLE ON TABLE HOLD AS KTRPMRCLS FORMAT FOCUS END DEFINE FILE KTRPMRCLS TEXT1/A15 = 'Resolution'; TEXT2/A15 = 'Prevention'; TEXT3/A15= 'Intelligence'; TEXT4/A15= 'Prevention'; TEXT5/A10= 'Results'; TEXT6/A4 = '#'; TEXT7/A4 = '$'; TEXT8/A10 = 'TPS Rec'; TEXT9/A5 = 'PMR'; TEXT10/A12 = 'Internals'; TEXT11/A12 = 'Externals'; TEXT12/A12 = 'Other Rec'; TEXT13/A15 = 'KTR'; TEXT14/A15='TOTAL IMPACT'; TEXT15/A15=''; TEXT16/A18='Prevent/Resolve'; TEXT17/A15='Total Intel'; TEXT18/A18='Total Identified'; TEXT19/A15='Empty Pack'; PMRAMNT/D12.2M = 0.00; TPSAMT/D12.2M = 0.00; OTHRRECAMT/D12.2M = 0.00; INTRAMT/D12.2M = 0.00; EXTERNAMT/D12.2M = 0.00; PRERES/D12.2M = 0.00; KTRAMT/D12.2M = 0.00; REPNUM/A3='&REPNUM'; TEXT20/A12 = '&DPCI1'; TEXT21/A12 = '&DPCI2'; TEXT22/A12 = '&DPCI3'; TEXT23/A12 = '&DPCI4'; TEXT24/A12 = '&DPCI5'; TEXT25/A30 = '&ITEM_DESC_T1'; TEXT26/A30 = '&ITEM_DESC_T2'; TEXT27/A30 = '&ITEM_DESC_T3'; TEXT28/A30 = '&ITEM_DESC_T4'; TEXT29/A30 = '&ITEM_DESC_T5'; TEXTH/A12 = 'Top 5 Items'; END -*------------------------------------------------------------------------------------------------------------------- TABLE FILE KTRPMRCLS ON TABLE SUBHEAD "<+0>" "<+0>&DEPT_TXT-&CLASS" "<+0>"YTD Count Updates" "TY Shortage" "LY Shortage" "<+0>Shortage Rank<+0>SUM TEXT5 AS '' TEXT7 AS '' OVER TEXT2 AS '' TEXT15 AS '' OVER TEXT9 AS '' PMRAMNT/D12.2M AS '' OVER TEXT8 AS '' TPSAMT/D12.2M AS '' OVER TEXT12 AS '' OTHRRECAMT/D12.2M AS '' OVER TEXT1 AS '' TEXT15 AS '' OVER TEXT10 AS '' INTRAMT/D12.2M AS '' OVER TEXT11 AS '' EXTERNAMT/D12.2M AS '' OVER TEXT16 AS '' PRERES/D12.2M AS '' OVER TEXT3 AS '' TEXT15 AS '' OVER TEXT13 AS '' KTRAMT/D12.2M AS '' OVER TEXT19 AS '' RETAILAMT/D12.2M AS '' OVER TEXT17 AS '' COMPUTE TOTALINTEL1/P12.2M= (TOTALINTEL + RETAILAMT); AS '' OVER TEXT18 AS '' COMPUTE TOTALIDENTIFIED1/P12.2M= (TOTALIDENTIFIED + RETAILAMT); AS '' OVER TEXT15 AS '' OVER TEXTH AS '' OVER TEXT20 AS '' TEXT25 AS '' OVER TEXT21 AS '' TEXT26 AS '' OVER TEXT22 AS '' TEXT27 AS '' OVER TEXT23 AS '' TEXT28 AS '' OVER TEXT24 AS '' TEXT29 AS '' WHERE CLASS EQ '&CLASS' ON TABLE PCHOLD FORMAT PDF ON TABLE SET PAGE-NUM OFF -INCLUDE TPRCLSSTYLE END -RUN -*------------------------------------------------------------------------------------------------------------------- -ENDOFFEX
Thank you,This message has been edited. Last edited by: Kerry,
WebFOCUS 7.1 Windows Excel, HTML, PDF
April 03, 2010, 03:41 AM
ganesh_a_hariharan
Note - I have pasted the section_cls twice - Ignore that. Thank you
WebFOCUS 7.1 Windows Excel, HTML, PDF
April 05, 2010, 06:04 PM
Waz
What happens in TPREPCUITEM ?, can you post it ?
Waz...
Prod:
WebFOCUS 7.6.10/8.1.04
Upgrade:
WebFOCUS 8.2.07
OS:
Linux
Outputs:
HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!
April 06, 2010, 08:08 AM
ganesh_a_hariharan
Thank you Waz, The wrong format was the reason behind the issue.
Thank you, Ganesh.H
WebFOCUS 7.1 Windows Excel, HTML, PDF
April 06, 2010, 05:39 PM
Waz
Glad to be of service, what did I do ?
Waz...
Prod:
WebFOCUS 7.6.10/8.1.04
Upgrade:
WebFOCUS 8.2.07
OS:
Linux
Outputs:
HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!
April 07, 2010, 07:36 AM
ganesh_a_hariharan
Sometimes asking - would be sufficient. Thank you for that.