Re: How to set time parameter in TSO/E REXX getmsg function
Hi Dale, Thank you for your comments. But as I reported in another mail, I can't recreate the problem now. The reason is unknown. If the problem happens again, I will try it. Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/18 11:21, Dale R. Smith wrote: On Wed, 17 Aug 2022 10:54:16 +0900, Nobuhiko Furuya wrote: Hi ALL, Thank you for your all suggestions. But my explanation seemed poor. What I would like to do is specifying the wait time indirectly in getmsg as follows. But the following code gets errors as I reported. ARG hsmcmd':'seconds <- get wait seconds as a parameter hsmid = 'DFHSM' <- set hsmid address console "F "hsmid","hsmcmd <- issue command msghsm = getmsg('resp.','SOL','HSM',,seconds) <- wait the specified seconds Of course when I specified the wait time directly as follows, it was OK. msghsm = getmsg('resp.','SOL','HSM',,20) Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. Try changing this line from: ARG hsmcmd':'seconds to ARG hsmcmd':'seconds . it's possible that the the parameter was entered with a trailing space and now it does not have a trailing space. Try the original program with a trailing space, if it fails then try changing the line as I suggested and execute it again with a trailing space. It should work correctly after the change. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
On Wed, 17 Aug 2022 10:54:16 +0900, Nobuhiko Furuya wrote: >Hi ALL, > >Thank you for your all suggestions. >But my explanation seemed poor. >What I would like to do is specifying the wait time indirectly in >getmsg as follows. >But the following code gets errors as I reported. > >ARG hsmcmd':'seconds <- get wait >seconds as a parameter >hsmid = 'DFHSM' <- set hsmid >address console "F "hsmid","hsmcmd <- issue command >msghsm = getmsg('resp.','SOL','HSM',,seconds) <- wait the specified seconds > >Of course when I specified the wait time directly as follows, it was OK. > >msghsm = getmsg('resp.','SOL','HSM',,20) > >Best regards, > >Nobuhiko Furuya(古谷信彦) >V-SOL Inc. Try changing this line from: ARG hsmcmd':'seconds to ARG hsmcmd':'seconds . it's possible that the the parameter was entered with a trailing space and now it does not have a trailing space. Try the original program with a trailing space, if it fails then try changing the line as I suggested and execute it again with a trailing space. It should work correctly after the change. -- Dale R. Smith -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
Hi Shmuel, Thank you for your comments. As I reported in another mail, the problem disappeared. The reason is unknown. I will try to use TRACE I when the problem happens again. Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/18 0:00, Seymour J Metz wrote: What happened to 'CONSOLE ACTIVATE'? I don't believe that it worked correctly without that, regardless of how you coded getmsg. Again, TRACE I is your friend. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Nobuhiko Furuya [furu...@v-sol.co.jp] Sent: Tuesday, August 16, 2022 9:54 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How to set time parameter in TSO/E REXX getmsg function Hi ALL, Thank you for your all suggestions. But my explanation seemed poor. What I would like to do is specifying the wait time indirectly in getmsg as follows. But the following code gets errors as I reported. ARG hsmcmd':'seconds<- get wait seconds as a parameter hsmid = 'DFHSM' <- set hsmid address console "F "hsmid","hsmcmd<- issue command msghsm = getmsg('resp.','SOL','HSM',,seconds) <- wait the specified seconds Of course when I specified the wait time directly as follows, it was OK. msghsm = getmsg('resp.','SOL','HSM',,20) Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/17 5:32, Mark Zelden wrote: On Tue, 16 Aug 2022 14:18:41 +0900, Nobuhiko Furuya wrote: Thanks. But I can't find how to code it. I would line to change time value depend on the logic. How can I resolve this ? Are you trying to do something that requires the REXX "interpret" instruction? Is that what you mean? https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fdocs%2Fen%2Fzos%2F2.4.0%3Ftopic%3Dexpression-using-interpret-instructiondata=05%7C01%7Csmetz3%40gmu.edu%7Cba611a742b994e6d461d08da7ff373ce%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C637962980844423734%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7Csdata=veLyUq8PnkRIAurC7Hibz73ehYrzb1mePSfiMzSv8lo%3Dreserved=0 Best Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:m...@mzelden.com Mark's MVS Utilities: http://secure-web.cisco.com/1ac7hX8Wn6rc-3nk8Q9nCsTyPIQhH5DvT8Wup6Ld5tNLbCC_RBgOdbse-u1jN7G4T5_Oc6IqaW5SW48PdDkRVANXQw4mOKKbyLDGcRlhlCTOrc7nnqXMX8FczRUNVUtIdCKx-eanO6MFTqcn2jpOOjQ7swYuZTHkuUyePAqTSLrc-sWIwu87cyLMsv5gdOAc_y-uMUhM44mkjq6SWQo6VxcD5cFFLJjBPEYdLXWRvnpI9-QNX74LrXesOMPZ9k9tIDY21LaAWrq-VqhwJRUjCOy2417qCZlBOYFIPV8Jo53Iq3CA8uctZb7CJxSOg7g-f7z8WeAx3x9BF2JQ06fY_jMqnWLJVithmkLAGQ_s579k026S1MlVp85GiizsUgamislC6aQSQY2ZotLipgEbzzzjTV2C47IuwL2nuX5IB3LThUO6_n1fz-HHb3FhAbu82/http%3A%2F%2Fwww.mzelden.com%2Fmvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
Hi Willy, Thank you for your idea. I believe "seconds" was entirely numeric. After I insert your code, it was OK. But even after I removed your code, it was also OK. So the problem disappeared. I'm very confused. There might be some garbages in the string. Anyway I will try to diagnose if the problem happens again. Best reagrds, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/17 21:17, Willy Jensen wrote: You have the statement ARG hsmcmd':'seconds Could it be that the seconds value is not entirely numeric? Maybe do something like this: seconds=word(seconds 2,1) /* set default =2 */ if datatype(seconds)<>'NUM' then call error 'bad seconds value "'seconds"'"' -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
What happened to 'CONSOLE ACTIVATE'? I don't believe that it worked correctly without that, regardless of how you coded getmsg. Again, TRACE I is your friend. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Nobuhiko Furuya [furu...@v-sol.co.jp] Sent: Tuesday, August 16, 2022 9:54 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How to set time parameter in TSO/E REXX getmsg function Hi ALL, Thank you for your all suggestions. But my explanation seemed poor. What I would like to do is specifying the wait time indirectly in getmsg as follows. But the following code gets errors as I reported. ARG hsmcmd':'seconds<- get wait seconds as a parameter hsmid = 'DFHSM' <- set hsmid address console "F "hsmid","hsmcmd<- issue command msghsm = getmsg('resp.','SOL','HSM',,seconds) <- wait the specified seconds Of course when I specified the wait time directly as follows, it was OK. msghsm = getmsg('resp.','SOL','HSM',,20) Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/17 5:32, Mark Zelden wrote: > On Tue, 16 Aug 2022 14:18:41 +0900, Nobuhiko Furuya > wrote: > >> Thanks. But I can't find how to code it. >> I would line to change time value depend on the logic. >> How can I resolve this ? > Are you trying to do something that requires the REXX "interpret" > instruction? Is that what you mean? > > https://nam11.safelinks.protection.outlook.com/?url=https%3A%2F%2Fwww.ibm.com%2Fdocs%2Fen%2Fzos%2F2.4.0%3Ftopic%3Dexpression-using-interpret-instructiondata=05%7C01%7Csmetz3%40gmu.edu%7Cba611a742b994e6d461d08da7ff373ce%7C9e857255df574c47a0c00546460380cb%7C0%7C0%7C637962980844423734%7CUnknown%7CTWFpbGZsb3d8eyJWIjoiMC4wLjAwMDAiLCJQIjoiV2luMzIiLCJBTiI6Ik1haWwiLCJXVCI6Mn0%3D%7C3000%7C%7C%7Csdata=veLyUq8PnkRIAurC7Hibz73ehYrzb1mePSfiMzSv8lo%3Dreserved=0 > > > Best Regards, > > Mark > -- > Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS > ITIL v3 Foundation Certified > mailto:m...@mzelden.com > Mark's MVS Utilities: > http://secure-web.cisco.com/1ac7hX8Wn6rc-3nk8Q9nCsTyPIQhH5DvT8Wup6Ld5tNLbCC_RBgOdbse-u1jN7G4T5_Oc6IqaW5SW48PdDkRVANXQw4mOKKbyLDGcRlhlCTOrc7nnqXMX8FczRUNVUtIdCKx-eanO6MFTqcn2jpOOjQ7swYuZTHkuUyePAqTSLrc-sWIwu87cyLMsv5gdOAc_y-uMUhM44mkjq6SWQo6VxcD5cFFLJjBPEYdLXWRvnpI9-QNX74LrXesOMPZ9k9tIDY21LaAWrq-VqhwJRUjCOy2417qCZlBOYFIPV8Jo53Iq3CA8uctZb7CJxSOg7g-f7z8WeAx3x9BF2JQ06fY_jMqnWLJVithmkLAGQ_s579k026S1MlVp85GiizsUgamislC6aQSQY2ZotLipgEbzzzjTV2C47IuwL2nuX5IB3LThUO6_n1fz-HHb3FhAbu82/http%3A%2F%2Fwww.mzelden.com%2Fmvsutil.html > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
You have the statement ARG hsmcmd':'seconds Could it be that the seconds value is not entirely numeric? Maybe do something like this: seconds=word(seconds 2,1) /* set default =2 */ if datatype(seconds)<>'NUM' then call error 'bad seconds value "'seconds"'"' -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
re "why do you recommend the REXX/SDSF API rather than TSO GETMSG" I think it is simpler to use and saves one RACF definition (CONSOLE class). -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
Hi ALL, Thank you for your all suggestions. But my explanation seemed poor. What I would like to do is specifying the wait time indirectly in getmsg as follows. But the following code gets errors as I reported. ARG hsmcmd':'seconds <- get wait seconds as a parameter hsmid = 'DFHSM' <- set hsmid address console "F "hsmid","hsmcmd <- issue command msghsm = getmsg('resp.','SOL','HSM',,seconds) <- wait the specified seconds Of course when I specified the wait time directly as follows, it was OK. msghsm = getmsg('resp.','SOL','HSM',,20) Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/17 5:32, Mark Zelden wrote: On Tue, 16 Aug 2022 14:18:41 +0900, Nobuhiko Furuya wrote: Thanks. But I can't find how to code it. I would line to change time value depend on the logic. How can I resolve this ? Are you trying to do something that requires the REXX "interpret" instruction? Is that what you mean? https://www.ibm.com/docs/en/zos/2.4.0?topic=expression-using-interpret-instruction Best Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
Hi Willy, Thank you for your suggestion. I have confirmed that delay time(isfdeley) can be set from argue indirectly. But why do you recommend the REXX/SDSF API rather than TSO GETMSG, i.e ? Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/16 21:22, Willy Jensen wrote: In any case, I will strongly recommend that you use the REXX/SDSF API rather than TSO GETMSG, i.e.: /* Demo REXX/SDSF API system command */ zz=isfcalls('ON') isfdelay=2 /* value for WAIT */ Address SDSF ISFSLASH "'d prog,apf' (WAIT)" if rc<>0 then say 'Console failed rc' rc else do n=1 to isfulog.0 say '->'isfulog.n end -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
On Tue, 16 Aug 2022 14:18:41 +0900, Nobuhiko Furuya wrote: >Thanks. But I can't find how to code it. >I would line to change time value depend on the logic. >How can I resolve this ? Are you trying to do something that requires the REXX "interpret" instruction? Is that what you mean? https://www.ibm.com/docs/en/zos/2.4.0?topic=expression-using-interpret-instruction Best Regards, Mark -- Mark Zelden - Zelden Consulting Services - z/OS, OS/390 and MVS ITIL v3 Foundation Certified mailto:m...@mzelden.com Mark's MVS Utilities: http://www.mzelden.com/mvsutil.html -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
In any case, I will strongly recommend that you use the REXX/SDSF API rather than TSO GETMSG, i.e.: /* Demo REXX/SDSF API system command */ zz=isfcalls('ON') isfdelay=2 /* value for WAIT */ Address SDSF ISFSLASH "'d prog,apf' (WAIT)" if rc<>0 then say 'Console failed rc' rc else do n=1 to isfulog.0 say '->'isfulog.n end -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
The getmsg() is valid; the problem is before that. You're not showing enough of your code to diagnose the problem. Include a trace i before the CONSOLE command. -- Shmuel (Seymour J.) Metz http://mason.gmu.edu/~smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Nobuhiko Furuya [furu...@v-sol.co.jp] Sent: Tuesday, August 16, 2022 1:18 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: How to set time parameter in TSO/E REXX getmsg function Thanks. But I can't find how to code it. I would line to change time value depend on the logic. How can I resolve this ? For example, when I coded as follows, T=60 msghsm = getmsg('resp.','SOL','HSM',,T) the following messages appeared. IKJ55303I THE CONSOLE COMMAND HAS TERMINATED.+ IKJ55303I AN ERROR OCCURRED DURING CONSOLE INITIALIZATION. THE MCSOPER RETURN CODE WAS X'0004' AND THE REASON CODE WAS X''. 25 *-* address console "CART HSM" +++ RC(-3) +++ 31 *-* address console "F "hsmid","hsmcmd +++ RC(-3) +++ IKJ55323I GETMSG PROCESSING HAS TERMINATED. A CONSOLE SESSION IS NOT ACTIVE. IKJ55307I THE CONSOLE COMMAND HAS TERMINATED.+ Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/16 13:33, Seymour J Metz wrote: > There is nothing special about getmsg; the time parameter can be any > expression that evaluates to a positive number. > > Note: specifying the CART in hexadecimal is certainly valid, but it makes the > code harder to read. > > > From: IBM Mainframe Discussion List on behalf of > Nobuhiko Furuya > Sent: Monday, August 15, 2022 9:54 PM > To: IBM-MAIN@LISTSERV.UA.EDU > Subject: How to set time parameter in TSO/E REXX getmsg function > > Hi all, > > Can we set variable time parameter in TSO/E REXX getmsg function ? > We would like to specify wait time value from argue. > But getmsg seems to accept only specific numeric seconds as follows. > > msgrett = getmsg(’dmsg’,’sol’,’C1D7D7D3F2F9F6F8’X,,60) > > time > the amount of time, in seconds, that GETMSG should wait, if the requested > message has not yet been routed to the user's console. If you specify a time > value and the time expires before the message is routed to the user's > console, GETMSG does not retrieve the message. Otherwise, if the message > is available before the time expires, GETMSG retrieves the message. > If you do not specify time, GETMSG uses a time value of 0 seconds. If the > message has not been routed to the user's console, GETMSG does not > retrieve the message. > > Best regarss, > > Nobuhiko Furuya(古谷信彦) > V-SOL Inc. > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN > > -- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
You might be missing something. This is (one of) my TSO console pgms. The delay of 2 seconds could be a variaible. /* Issue command, receive response via the TSO CONSOLE commandrexx */ cons = userid()'C' cart = 'C'right(time('s'),7,0) parse arg cmd cc= XTSO("Console deactivate") cc= XTSO("CONSOLE SYSCMD("cmd") CART("cart") NAME("cons")") if cc>0 then do say 'Console rc' cc if datatype($.0)='NUM' then do n=1 to $.0 say $.n end Call close 20 end Do cn=1 to 2/* #2 is sometimes needed to pick up all messages */ cm.0=0 cc= GETMSG('CM.','SOL',cart,,2) if cc>4 then call close 8 "GETMSG error retrieving message, rc" cc if cm.0=0 then leave do cmsgi=1 to cm.0 say strip(cm.cmsgi,'t') end if cm.0>1 then leave End call close 0 Close: parse arg crc cmsg crc=word(crc 0,1) if cmsg<>'' then call line cmsg cc= XTSO("Console deactivate") Exit crc XTSO: trace off; zz=outtrap(word(arg(2) '$.',1)) address tso arg(1);zz=outtrap('off');xtsorc=rc;return rc -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
Thanks. But I can't find how to code it. I would line to change time value depend on the logic. How can I resolve this ? For example, when I coded as follows, T=60 msghsm = getmsg('resp.','SOL','HSM',,T) the following messages appeared. IKJ55303I THE CONSOLE COMMAND HAS TERMINATED.+ IKJ55303I AN ERROR OCCURRED DURING CONSOLE INITIALIZATION. THE MCSOPER RETURN CODE WAS X'0004' AND THE REASON CODE WAS X''. 25 *-* address console "CART HSM" +++ RC(-3) +++ 31 *-* address console "F "hsmid","hsmcmd +++ RC(-3) +++ IKJ55323I GETMSG PROCESSING HAS TERMINATED. A CONSOLE SESSION IS NOT ACTIVE. IKJ55307I THE CONSOLE COMMAND HAS TERMINATED.+ Best regards, Nobuhiko Furuya(古谷信彦) V-SOL Inc. On 2022/08/16 13:33, Seymour J Metz wrote: There is nothing special about getmsg; the time parameter can be any expression that evaluates to a positive number. Note: specifying the CART in hexadecimal is certainly valid, but it makes the code harder to read. From: IBM Mainframe Discussion List on behalf of Nobuhiko Furuya Sent: Monday, August 15, 2022 9:54 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: How to set time parameter in TSO/E REXX getmsg function Hi all, Can we set variable time parameter in TSO/E REXX getmsg function ? We would like to specify wait time value from argue. But getmsg seems to accept only specific numeric seconds as follows. msgrett = getmsg(’dmsg’,’sol’,’C1D7D7D3F2F9F6F8’X,,60) time the amount of time, in seconds, that GETMSG should wait, if the requested message has not yet been routed to the user's console. If you specify a time value and the time expires before the message is routed to the user's console, GETMSG does not retrieve the message. Otherwise, if the message is available before the time expires, GETMSG retrieves the message. If you do not specify time, GETMSG uses a time value of 0 seconds. If the message has not been routed to the user's console, GETMSG does not retrieve the message. Best regarss, Nobuhiko Furuya(古谷信彦) V-SOL Inc. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
Re: How to set time parameter in TSO/E REXX getmsg function
There is nothing special about getmsg; the time parameter can be any expression that evaluates to a positive number. Note: specifying the CART in hexadecimal is certainly valid, but it makes the code harder to read. From: IBM Mainframe Discussion List on behalf of Nobuhiko Furuya Sent: Monday, August 15, 2022 9:54 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: How to set time parameter in TSO/E REXX getmsg function Hi all, Can we set variable time parameter in TSO/E REXX getmsg function ? We would like to specify wait time value from argue. But getmsg seems to accept only specific numeric seconds as follows. msgrett = getmsg(’dmsg’,’sol’,’C1D7D7D3F2F9F6F8’X,,60) time the amount of time, in seconds, that GETMSG should wait, if the requested message has not yet been routed to the user's console. If you specify a time value and the time expires before the message is routed to the user's console, GETMSG does not retrieve the message. Otherwise, if the message is available before the time expires, GETMSG retrieves the message. If you do not specify time, GETMSG uses a time value of 0 seconds. If the message has not been routed to the user's console, GETMSG does not retrieve the message. Best regarss, Nobuhiko Furuya(古谷信彦) V-SOL Inc. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
How to set time parameter in TSO/E REXX getmsg function
Hi all, Can we set variable time parameter in TSO/E REXX getmsg function ? We would like to specify wait time value from argue. But getmsg seems to accept only specific numeric seconds as follows. msgrett = getmsg(’dmsg’,’sol’,’C1D7D7D3F2F9F6F8’X,,60) time the amount of time, in seconds, that GETMSG should wait, if the requested message has not yet been routed to the user's console. If you specify a time value and the time expires before the message is routed to the user's console, GETMSG does not retrieve the message. Otherwise, if the message is available before the time expires, GETMSG retrieves the message. If you do not specify time, GETMSG uses a time value of 0 seconds. If the message has not been routed to the user's console, GETMSG does not retrieve the message. Best regarss, Nobuhiko Furuya(古谷信彦) V-SOL Inc. -- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN