TABLE FILE whatever blah blah blah END -RUN -IF &RECORDS GT 0 THEN :Show_Rep; -HTMLFORM BEGIN <html> <head> <title>Error Report - No records</title> </head> <body> <TABLE WIDTH="95%" CELLPADDING=0 style='margin-left:18pt;margin-right:18pt;margin-top:18pt;margin-bottom:18pt'> <TR> <TD> </TD> </TR> <TR> <TD style="vertical-align:bottom"> <FONT SIZE=+1>The report you were running produced no results</FONT> </TD> </TR> <TR> <TD> 1<BR /> 2<BR /> </TD> </TR> <TR> <TD style="vertical-align:middle" height="200px"> Please check your selections and rerun if required. </TD> </TR> <TR> <TD style='padding-left:0pt; vertical-align:bottom'> <TABLE BORDER=0 CELLSPACING=0 CELLPADDING=0 WIDTH="100%"> <TR> <TD> <span >Produced by : &USERID </span> <span >Page:</span> <span >1</span> <span > of </span> <span >1</span> <span >Created on : &RepDate at &RepTime </span> </TD> </TR> </TABLE> </TD> </TR> </TABLE> </body> </html> -HTMLFORM END -EXIT -:Show_Rep
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 |
TABLE FILE CAR PRINT COMPUTE MESSAGE/A80 = 'There were no records meeting your request'; AS '' BY COUNTRY IF RECORDLIMIT EQ 1 ON TABLE PCHOLD FORMAT PDF (or EXL2K) HEADING blah FOOTING more blah ON TABLE etc. etc. END
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 |