Focal Point
[SOLVED] Report Caster query

This topic can be found at:
http://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/7787055196

August 28, 2019, 05:05 PM
wfdmuser
[SOLVED] Report Caster query
Is there a way to query the repository in WF82 so we can get the info about all RC schedules, mainly the info in the task and distribution pan?
Thanks.

This message has been edited. Last edited by: FP Mod Chuck,


WebFOCUS 8
Windows, All Outputs
August 28, 2019, 05:13 PM
Waz
You need to check out the BOT... tables in the WebFOCUS repository.


Waz...

Prod:WebFOCUS 7.6.10/8.1.04Upgrade:WebFOCUS 8.2.06OS:LinuxOutputs:HTML, PDF, Excel, PPT
In Focus since 1984
Know The Code

August 29, 2019, 07:44 AM
Frans
Which version of 82 do you have? AFter 8205 it's possible to use the client adapter to query this via Rest.


Test: WF 8.2
Prod: WF 8.2
DB: Progress, REST, IBM UniVerse/UniData, SQLServer, MySQL, PostgreSQL, Oracle, Greenplum, Athena.
August 29, 2019, 09:50 AM
wfdmuser
I have version 8201. I was able to setup synonyms for BOTSCHED and BOTTASK and get the info. Thanks for your input guys.


WebFOCUS 8
Windows, All Outputs
August 29, 2019, 10:03 AM
David Briars
Thanks for the info Frans and wfdmuser.

I'll add this to our 'reasons to upgrade from 81 to 82' doc.




Test: WebFOCUS 8.1.05M Prod: WebFOCUS 8.1.05M Server: Windows Server 2012/Tomcat Standalone Workstation: Windows 7/IE 11 Database: Oracle 12c/Netezza Output: AHTML/XLSX/HTML/PDF/JSCHART Tools: WFDS, Repository Content, BI Portal Designer, & ReportCaster

August 29, 2019, 05:21 PM
Waz
Hi wfdmuser,

Please edit your first post in this thread and add [SOLVED] or [CLOSED] to the title.


Waz...

Prod:WebFOCUS 7.6.10/8.1.04Upgrade:WebFOCUS 8.2.06OS:LinuxOutputs:HTML, PDF, Excel, PPT
In Focus since 1984
Know The Code

September 02, 2019, 10:53 AM
Ian Dalton
Try this code.....

-MRNOEDIT -SET &D = EDIT(&YYMD.EVAL,'$$$$$$99')|'/'|EDIT(&YYMD.EVAL,'$$$$99$$')|'/'|EDIT(&YYMD.EVAL,'9999$$$$');
-MRNOEDIT -SET &T = CTRAN(8,'&TOD.EVAL',46,58,'A8');
-RUN

JOIN
BOTSCHED.BOTSCHED.PACKETID IN BOTSCHED TO UNIQUE BOTTASK.BOTTASK.PACKETID
IN BOTTASK TAG J0 AS J0
END
JOIN
BOTSCHED.BOTSCHED.SCHEDULEID IN BOTSCHED TO UNIQUE BOTDIST.BOTDIST.SCHEDULEID
IN BOTDIST TAG J1 AS J1
END
JOIN
LEFT_OUTER J1.BOTDIST.DISTLIST IN BOTSCHED TO UNIQUE BOTDEST.BOTDEST.ADDRBOOKID
IN botdest TAG J2 AS J2
END
JOIN
LEFT_OUTER J1.BOTDIST.DISTLIST IN BOTSCHED TO UNIQUE BOTADDR.BOTADDR.IBFSID
IN botaddr TAG J3 AS J3
END



DEFINE FILE BOTSCHED
METHOD/A10 = IF (METHOD_CODE EQ 'M') THEN 'Email' ELSE
IF (METHOD_CODE EQ 'P') THEN 'Printer' ELSE 'Other';
LIST_T/A25 = IF (LISTTYPE EQ 'D') THEN 'Distribution List' ELSE
IF (LISTTYPE EQ 'S') THEN 'Single Email Address(es)' ELSE 'Other';
PRETTY_TO/A255 = IF (LISTTYPE EQ 'D') THEN J3.DESCRIPTION || ' -- ' || DESTFN ELSE DISTLIST;
END

TABLE FILE BOTSCHED
HEADING CENTER
"Report Caster Schedules with Dist. Info. from Server &SERVER_NAME as at : &DATEDMYY "
" "
"Run on: &D at: &T Page No. "
" "
PRINT
BOTSCHED.BOTSCHED.LASTEXTIME/HMDYYI
LASTEXSTATUS
PRETTY_TO AS 'DIST. TO'
COMPUTE LIST_TYPE/A25 = IF SCHEDULEID EQ LAST SCHEDULEID THEN '' ELSE LIST_T;
BY BOTSCHED.BOTSCHED.JOBDESC
BY BOTSCHED.BOTSCHED.CASTER_USER
BY BOTSCHED.BOTSCHED.ACTIVE
BY J1.BOTDIST.METHOD
BY J1.BOTDIST.MAILSUBJECT
BY J0.BOTTASK.TASKNAME
-*WHERE ACTIVE EQ 'Y';
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE SET ASNAMES ON
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLEMBEDIMG ON
ON TABLE SET HTMLCSS ON

-MRNOEDIT -INCLUDE QIS_HTML_STYLE

-*ON TABLE SET STYLE *
-* INCLUDE = IBFS:/EDA/EDASERVE/_EDAHOME/ETC/endeflt.sty,
$
ENDSTYLE
END


_______________________
*** WebFOCUS 8.1.05M ***