There are a lot better ways to approach this than Queue. If you¹re already in xedit, why not just have the rexx macro do the commands? If you aren¹t, Don¹t queue the xedit command; queue the xedit commands, from ³ALL² through ³QQ², then execute the xedit command directly in the rexx exec. The way you¹ve set it up, the xedit won¹t happen until something prompts for input, and that isn¹t until after both execs have completed running.
Another thing to watch for when using stack or queue is the fact that you may not know what others have been queuing up around you. I haven¹t used this method at all for a long while, but I think you can surround your stuff with a makebuf and dropbuf to (somewhat) isolate your queued stuff from other¹s stuff. It will still let you rip right through things others have stacked, but if you only use your own stuff, you and the outside world should both be safe. There¹s no need to queue the xedit command; Queue the other stuff, and then run the xedit and it should consume the queued commands, the way you want it to. -- Robert P. Nix Mayo Foundation .~. RO-OE-5-55 200 First Street SW /V\ 507-284-0844 Rochester, MN 55905 /( )\ ----- ^^-^^ "In theory, theory and practice are the same, but in practice, theory and practice are different." On 4/15/08 8:56 AM, "Tim Joyce" <[EMAIL PROTECTED]> wrote: > Hey guys, > > I have a question about the QUEUE function in REXX. I created an exec that > uses the QUEUE function to XEDIT the operator log issue a "ALL / INVALID" and > put the results into a file: > > Queue "XEDIT "FN FT FM > Queue "ALL /INVALID" > Queue "SET SHADOW OFF" > Queue "PUT * = INVALID A1" > Queue "QQ" > > I then run another exec that sends that created file containing all "INVALID" > logon attempts to a specified userid: > > 'SENDFILE 'FNO' INVALID A TIMJ' > 'ERASE 'FNO' INVALID A' > > If I run these execs manually (separately) they work fine. But, when I try to > automate the process by doing such: > > /* */ > EXEC OINVLOG > EXEC OINVSEND > exit > the send exec will not work because the Queued commands do not execute until > out of the rexx procedure. > > My question : Is there a way to have all the Queued xedit commands execute > before starting the send exec? > > I know there a many other ways to do this, I am just curious as to how to > force the queued commands to execute. > > Tim > ~~~~~~~~~~~~~~~~~~~~~~~~ > Tim Joyce > Sr. Systems Programmer / Project Leader > Alex Lee, Inc. > Email : [EMAIL PROTECTED] <mailto:[EMAIL PROTECTED]> > Phone: (828) 725-4448 > Fax: (828) 725-4800 > >
