It seems to me that this one would be perfect for an addpipe reconfiguration of the pipeline. An adaptation of PUTFILES should not be too difficult.
Regards, Richard Schuh > -----Original Message----- > From: CMSTSO Pipelines Discussion List > [mailto:[email protected]] On Behalf Of Kris Buelens > Sent: Thursday, October 22, 2009 1:22 PM > To: [email protected] > Subject: Re: Writing to file when name is in stream > > There is no need for a FINIS (the CALLPIPE containing the >> > doesn't leave the file open). > And, when only one message has to be written, why not a simple EXECIO? > address command 'EXECIO 1 DISKW' $filename '(FINIS STRING' $msg > > The drawback is that the file is opened and closed with every > message that arrives... Not a problem with few messages... > If the file has to be written into SFS; you can leave the > file open, but commit it as often as you want: > - open the file with CSL routine DMSOPEN, you get a token > - then use either PIPE's >>SFS stage using that token, or > CSL DMSWRITE > - and call CSL routine DMSCOMM to commit (I have samples, > but burried somewhere) > > 2009/10/22 Hughes, Jim <[email protected]> > > > A sipping pipeline maybe. Call this stage for each SCIF message. > > > > Good Luck. > > > > /* */ > > > > "peekto $data" > > Do while rc = 0 > > Parse var $data $fn $msg > > $filename = $fn "MYTYPE A" > > "callpipe var $msg | >> " $filename > > Address command "FINIS" $filename > > "readto" > > "peekto" $data > > End > > > > Return (rc<>12)*rc > > > > ____________________ > > Jim Hughes > > 603-271-5586 > > "It is fun to do the impossible." > > > > ==>-----Original Message----- > > ==>From: CMSTSO Pipelines Discussion List [mailto:CMS- > > ==>[email protected]] On Behalf Of Frank M. Ramaekers > > ==>Sent: Thursday, October 22, 2009 3:48 PM > > ==>To: [email protected] > > ==>Subject: Re: Writing to file when name is in stream ==> > > ==>Not sure this is what I need. Okay time to get more > detailed. I > > have > > ==>a disconnected user that is receiving SCIF messages that > I want to > > route ==>to a file with a FN of the user and a FT of my > choosing. I > > have most of ==>this coded in a PIPE with STARMSG stage. When I > > receive, I want to ==>APPEND (or create) to a file with the > user's id > > as the FN and the FT is ==>a constant. > > ==> > > ==>Does that help? > > ==> > > ==>Frank M. Ramaekers Jr. > > ==>Systems Programmer MCP, MCP+I, MCSE & RHCE > > ==>American Income Life Insurance Co. Phone: (254)761-6649 > > ==>1200 Wooded Acres Dr. Fax: (254)741-5777 > > ==>Waco, Texas 76710 > > ==> > > ==> > > ==> > > ==> > > ==> > > ==>-----Original Message----- > > ==>From: CMSTSO Pipelines Discussion List > > ==>[mailto:[email protected]] On Behalf Of Kris Buelens > > ==>Sent: Thursday, October 22, 2009 2:28 PM > > ==>To: [email protected] > > ==>Subject: Re: [CMS-PIPELINES] Writing to file when name > is in stream > > ==> ==>I created a PUTFILES REXX stage, > > ==> http://www.vm.ibm.com/download/packages/descript.cgi?PUTFILES > > ==> > > ==>2009/10/22 Frank M. Ramaekers <[email protected]> > ==> ==>> How > > can I write to a file when the filename is contained within > the ==>> > > stream? > > ==>> > > ==>> Frank M. Ramaekers Jr. > > ==>> Systems Programmer MCP, MCP+I, MCSE & RHCE > > ==>> American Income Life Insurance Co. Phone: (254)761-6649 > > ==>> 1200 Wooded Acres Dr. Fax: (254)741-5777 > > ==>> Waco, Texas 76710 > > ==>> > > ==>> > > ==>> _____________________________________________________ > > ==>> This message contains information which is privileged and > > confidential ==>and ==>> is solely for the use of the ==>> intended > > recipient. If you are not the intended recipient, be aware ==>that > > ==>> any review, disclosure, ==>> copying, distribution, or > use of the > > contents of this message is ==>strictly ==>> prohibited. If > you have > > ==>> received this in error, please destroy it immediately > and notify > > us at ==>> [email protected]. > > ==>> > > ==> > > ==> > > ==> > > ==>-- > > ==>Kris Buelens, > > ==>IBM Belgium, VM customer support > > ==> > > ==>_____________________________________________________ > > ==> > > ==>This message contains information which is privileged and > > confidential ==>and is solely for the use of the ==> ==>intended > > recipient. If you are not the intended recipient, be aware > that ==>any > > review, disclosure, ==> ==>copying, distribution, or use of the > > contents of this message is strictly ==>prohibited. If you have ==> > > ==>received this in error, please destroy it immediately > and notify us > > at ==>[email protected]. > > > > > > -- > Kris Buelens, > IBM Belgium, VM customer support >
