Access OPC using REXX

[Anithab]

Hi all,

Is it possible to retrieve all the error jobs listed in OPC for a particular controller using REXX or by someother means than reading it manually?

[Anuj Dhawan]

I do not have a direct answer to your question but I just red about OPC Control Language tool. And this quote from the manuals might be of your interest:

The OPC Control Language (OCL) tool enables you to access and manipulate Tivoli OPC data by using a REXX-like language. Several macro-functions are made available that perform, in a single action, what would require several invocations of the OPC Program Interface functions. The OCL tool acts as an extension to the REXX language processor. Therefore, normal REXX statements can be coded together with OCL statements. This tool runs in a batch TSO session.

Also you can search TWSxxx.SEQQSAMP for REXX examples . You've to use HLQ for Your shop.

[Anithab]

Is it possible to read the OPC 5;4 error screen and get its current content through REXX?

I did search the SEQQSAMP but not much help in there

[Anithab]

I did some further reading ...I found that EQQE036I messages needs to be trapped

And I also see this I might need to pick message which has ">>EQQE036I" because they have the return code of the job

Now my next question is how to print the data from SYSLOG?

[zprogrammer]

You could try

Code: Select all

/* REXX */                                                          
rc=isfcalls('ON')                                                           
isflinelim=10000
Address SDSF “ISFLOG READ TYPE(SYSLOG)"
do ix=1 to isfmsg2.0
  say isfmsg2.ix
end
do ix=1 to isfline.0        /* Process the returned variables */
  say isfline.ix
end    
isfcalls("OFF")      

refer

http://pic.dhe.ibm.com/infocenter/zos/v ... exlogx.htm

[Anithab]

Hi Pandora,

I did some minor adjustments and the code works perfect for me

Thanks all

[zprogrammer]

Glad it helped..Thanks for letting us know