Well, 100 reader files at about 80 chars per line plus the header, is 8080 bytes, just short of the default 8192 default buffer for returning the output from a CP command. Maybe you need to specify a bigger buffer using the BUFFER option? And, of course, CMS Pipelines would be a much better solution...
On Thu, Aug 7, 2008 at 1:08 PM, Wakser, David <[EMAIL PROTECTED]> wrote: > All: > > The solution is probably simple, but I can't see it (it's been a long > week): > > The following code is in an EXEC. However, when executing, it issues a > VM READ after every 100 rdr queue entries, causing the EXEC to go bananas > (since it then pulls in a file name or type of blanks). How can I figure out > what is issuing the VM READ? A trace showed nothing. > > Thanks, in advance. > > David Wakser > > "EXECIO * CP (STRING Q RDR * ALL" > > do i = 1 to reader_files + 1 /* the header is the "plus 1" */ > pull sender num . . recs copy hold date time name type . > if sender = "ORIGINID" then iterate /* Bypass header */ > x = datatype(type) > if x ¬= "NUM" then > do > name = name || type > type = " " > end > "EXEC RECEIVE =" name "ICCF" "G" > end > -- Bruce Hayden Linux on System z Advanced Technical Support IBM, Endicott, NY
