Very basic exec to get rdr files, no rexx "niceties" here.
/***********************************************************************/ trace 'i' receive: 'wakeup (noext rdr' 'execio 2 cp ( lifo string QUERY RDR * ALL' if rc ^= 0 then signal receive pull origin spid . . . . . . . name type dist 'desbuf' if name = "" then name = date(s) if type = "" then type = time(s) 'execio 1 diskw wakeup log a (finis string 'origin date(s) time() spid name type dist 'exec receive' spid name type' a2 (replace' if rc ^= 0 then signal error signal receive error: exit -----Original Message----- From: The IBM z/VM Operating System [mailto:[EMAIL PROTECTED] On Behalf Of Richard Alexander Sent: Friday, August 08, 2008 1:01 PM To: IBMVM@LISTSERV.UARK.EDU Subject: a wakeup exec Greetings Listers, Can someone out there post or forward me a copy of measly wakeup exec to read incoming RDR files and file them in CMS file. Greatly appreciated Richard _________________________________________________________________ Reveal your inner athlete and share it with friends on Windows Live. http://revealyourinnerathlete.windowslive.com?locale=en-us&ocid=TXT_TAGLM_WL YIA_whichathlete_us= This electronic transmission and any documents accompanying this electronic transmission contain confidential information belonging to the sender. This information may be legally privileged. The information is intended only for the use of the individual or entity named above. If you are not the intended recipient, you are hereby notified that any disclosure, copying, distribution, or the taking of any action in reliance on or regarding the contents of this electronically transmitted information is strictly prohibited.