Hello All,
I still have same issue when i use pipe command in rexx and I don't get
message on console. But when I don't use pipe command on console, then I
get message on console.
Details are below.
1) Doesnt work. It means that we don't get messages on console.
****************Netview automation table ******************************
*******
IF MSGID = 'SVTM052I' THEN
EXEC(CMD('FDIREXX')) NETLOG(Y) SYSLOG(Y);
BROWSE NETVIEW.CNMCLST(FDIREXX) - 01.17 Line 00000000
********************************* Top of Data **********************
/* REXX */
trace i
'PIPE SAFE * | STEM MSG.'
TODataset = Word( Msg.3,3 )
WTO.CONSNAME ='CNDVMSTR'
WTO.DESC = '0100010000000000' /* WHITE */
WTO.DESC = '0010000000100000' /* RED */
WTO.MCSFLAG = '00000000'
WTO.TEXT = 'FDI' TODataset
WTO
mvs "send 'FDI DATAST NAME IS "TODataset"',user=(TS06,OP117),LOGON"
exit
Netview Log
2) Solution works .It means that we get messages on console.
****************Netview automation table ******************************
*******
IF MSGID = 'IEF403I' & TEXT = .'OP117LST'. & TEXT = MTXT THEN
EXEC(CMD('FDIREXX1 'MTXT)) NETLOG(Y) SYSLOG(Y);
/* REXX */
trace i
parse arg mtxt . mtxt
WTO.CONSNAME = ' '
WTO.DESC = '0100010000000000' /* WHITE */
WTO.DESC = '0010000000100000' /* RED */
WTO.MCSFLAG = '00000000'
WTO.TEXT = 'CONSOLE TEST MSG IS' mtxt
WTO
exit
Netview log
- CNM493I DSITBL01 : #0000250 : FDIREXX1 IEF403I AB54LST -
E IEF403I AB54LST - STARTED - TIME=07.19.45
C 3 *-* parse arg mtxt . mtxt
C >>> "IEF403I"
C >.> "AB54LST"
C >>> "- STARTED - TIME=07.19.45"
C 4 *-* /* say 'AB54LST Job STARTED at' mtxt */
C 5 *-* /* mvs "send 'AB54LST JOB "mtxt"',user=(AB54)
C 6 *-* /* mvs "send 'CONSOLE OUTPUT DISPLAY "mtxt"',C
C 7 *-* WTO.CONSNAME = 'CNDVMSTR'
C >L> "CNDVMSTR"
C 8 *-* WTO.DESC = '0100010000000000' /* WHITE */
C >L> "0100010000000000"
C 9 *-* WTO.DESC = '0010000000100000' /* RED */
C >L> "0010000000100000"
C 10 *-* WTO.MCSFLAG = '00000000'
C >L> "00000000"
C 11 *-* WTO.TEXT = 'CONSOLE TEST MSG IS' mtxt
C >L> "CONSOLE TEST MSG IS"
C >V> "- STARTED - TIME=07.19.45"
C >O> "CONSOLE TEST MSG IS - STARTED - TIME=07.19.4
C 12 *-* WTO
C >L> "WTO"
C 13 *-* exit
> CONSOLE TEST MSG IS - STARTED - TIME=07.19.45
On Fri, Jun 22, 2018 at 9:15 PM, saurabh khandelwal <
[email protected]> wrote:
> Thanks for reply.
>
> I looked at netview command manual and found "WTO.TEXT" can be used for
> this purpose. But I am not sure, how do I incorporate this into this case.
>
> Netview table code.
>
> IF MSGID = 'SVTM052I' THEN
> EXEC(CMD('FIBREXX')) NETLOG(Y) SYSLOG(Y);
>
>
>
> In our rexx we retrieve the full messge via:
>
> /* REXX */
>
> 'PIPE SAFE * | STEM MSG.'
>
> TODataset = Word( Msg.3,3 )
> mvs "send 'FIB DATASET NAME IS "TODataset"',CON=CNDVMSTR"
>
> in this rexx, where do I need to add WTO.TEXT to display TODataset as
> WTO message on operator console.
>
> Can anybody suggest to implement this change.
>
>
>
> On Fri, Jun 22, 2018 at 5:15 PM, Lucas Rosalen <[email protected]>
> wrote:
>
>> Right tool for the right job.
>>
>> Read about WTO (REXX) command in Netview commands manual.
>>
>> ------------------------------------------------------------
>> -------------------------------------------------------------------
>> *Lucas Rosalen*
>> [email protected] / [email protected]
>> http://br.linkedin.com/in/lrosalen
>>
>>
>> 2018-06-22 6:31 GMT+02:00 saurabh khandelwal <[email protected]
>> >:
>>
>> > Hello Group,
>> >
>> >
>> > /* REXX */
>> >
>> > 'PIPE SAFE * | STEM MSG.'
>> >
>> >
>> >
>> > TODataset = Word( Msg.3,3 )
>> >
>> > mvs "send 'My console name is "TODataset"',CN=CNDVMSTR"
>> >
>> > exit
>> >
>> >
>> > We used CN operand with send command to send message to operator
>> console
>> > and now i receive output as required.
>> >
>> > But this message is visible in green color which get disappeared as
>> other
>> > message comes on console.
>> >
>> > But, I would like to have these message in white color ( not sure if we
>> can
>> > say as WTO), so that until operator intervention, these message will be
>> on
>> > console itself.
>> >
>> >
>> > Can you please suggest, how can i achieve this
>> >
>> > ----------------------------------------------------------------------
>> > For IBM-MAIN subscribe / signoff / archive access instructions,
>> > send email to [email protected] with the message: INFO IBM-MAIN
>> >
>>
>> ----------------------------------------------------------------------
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to [email protected] with the message: INFO IBM-MAIN
>>
>
>
>
> --
> Thanks & Regards
> Saurabh Khandelwal
>
--
Thanks & Regards
Saurabh Khandelwal
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
