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].

Reply via email to