work
perfectly well. Except for VARLOAD, that causes REXX to abend. So I coded
around using STEM
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op ma 10 jun 2024 om 01:46 schreef Rick Troth :
> hello gang --
>
&g
those to show they came
> from the user that logged in instead of the web server itself.
>
> That part all works fine, just the sfs part was causing me a bit of grief.
> Now I have a solution.
>
> Thank you.
>
> On Thu, Dec 14, 2023 at 01:30 Rob van der Heij wrote:
>
>
I have some relatively vague memories that someone with SFS admin rights
could connect to SFS using different authorities concurrently.
Thinking a bit deeper: the FTP server uses this during an FTP PUT or GET
with SFS. I don't think it uses Diag D4 to start talking to SFS.
Kris Buelens
Thanks John for this education
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op ma 28 nov. 2022 om 13:45 schreef John P. Hartmann :
> On 11/28/22 11:10, Kris Buelens wrote:
> > I repeat that #1 (or in F
I repeat that #1 (or in France £1) is a counter, so no spaces by
definition.
I guess that space(#1) converts it to a string and so you can compare to
identifier "a", what is a string
Kris Buelens,
--- VM/VSE consultan
This doesn't read very well here
" set £1=''",
I guess £1 stands for #1 outside the UK, and I don't understand what these
are supposed to do
Ignoring it would mean you try to assign counter 1 to an empty
string. It are counters, hence only accept numeric values
Kr
I just found that I placed my BENCH (benchmark) execs on the VM download
library. I wrote that to compare CPU consumption of execs/commands.
https://www.vm.ibm.com/download/packages/descript.cgi?BENCH
Kris Buelens,
--- VM/VSE consultant, Belgium
My PUTFILES is on the VM download library, and us indeed meant to perform
this kind of job.
Op di 12 okt. 2021 15:27 schreef Rich Smrcina :
> Great! Thanks, Rob.
>
> On Tue, Oct 12, 2021 at 8:05 AM Rob van der Heij
> wrote:
>
> > I think Kris once did a PUTFILES REXX that implemented one or two
iteration.
Later I added full SFS support with workunits after a problem that I don't
remember at this time.
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op wo 3 mrt. 2021 om 15:41 schreef van Sleeuwen, Berry
record arriving, it can
take ages
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op wo 3 mrt. 2021 om 12:43 schreef van Sleeuwen, Berry <
berry.vansleeu...@atos.net>:
> Hi All,
>
> I have a REX
What I did most of the time was convert to hex
'PIPE literal X' || c2x(blah) '|..
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op wo 17 feb. 2021 om 00:26 schreef Glenn Knickerbocker :
> This is a frequ
Yes indeed, a bit more complicated than something like
!T: take last!Strip Trailing!F: fanin 1 0 !
and that's what I wanted to say.
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op zo 17 jan. 2021 om 15:09
Probably there still is a chance that DEBLOCK CMS will complain when the
last meaningful record had a trailing blank.
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op zo 17 jan. 2021 om 12:37 schreef Alain
If you can't change it, I'd then perform a STRIP TRAILING only on the last
record when receiving the punched file.
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op za 16 jan. 2021 om 18:13 schreef Alain Benvéniste
> I just save the file and quit it, no change done.
It is a RECFM V file, so when you let XEDIT rewrite the file, it will
remove all trailing blanks.
So, you didn't change the file, but XEDIT did.
Kris Buelens,
--- VM/VSE consultant, Belg
Wasn't EDF new with VM/SP?
(I remember performance problems with CDF for large RECFM V files in my
first IBM years)
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op za 12 sep. 2020 om 19:07 schreef Alan Altmark
XEDIT is known to strip trailing blanks for RECFM V files, so that 0 isn't
a surprise. (I never checked what.it did with BFS files)
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op wo 9 sep. 2020 om 06:22 schreef
You request that the STACK be appended to stem Table1
I guess you want
"PIPE STACK",
"! APPEND STEM TABLE1.",
"! CONSole"
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op w
There also is the COMPAIR XEDIT macro to interactively compare 2 files side
by side.
Op za 9 mei 2020 03:07 schreef Donald Russell :
> SUPERC?
>
>
> On Fri, May 8, 2020 at 11:47 AM Glenn Knickerbocker
> wrote:
>
> > I have one file that includes copies of several others. When one of the
> >
You forgot a few things
... | spec /'/ 1 1-* Next /'/ Next | ...
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op vr 24 apr. 2020 om 16:16 schreef Rick Troth :
> ... | spec /'/ w 1 /'/ | ...
>
>
What about inserting a new line in the XEDITed file to indicate the end of
the range (obviously a very special line that is unique).
Then you'd use something like PIPE XEDIT ... | ToTarget
Kris Buelens,
--- VM/VSE consultant, Belgium
There is also SET RANGE to limit which lines are available.
Op ma 10 jun. 2019 21:40 schreef Donald Russell :
> See the XEDIT stage.
>
> Pipe ahelp xedit
>
> Use it to read starting at the current line, use subsequent stages to
> select/do what you want.
>
> Don
>
>
>
> On Mon, Jun 10, 2019 at
the right option on the :
> On Mon, 4 Feb 2019 at 17:43, Kris Buelens wrote:
>
>
> > that requires a much more elaborate pipe.
> >
>
> For varying degrees of "much" :-) Mine is 11 stages, and fits on half a
> command line...
>
> https://rvdheij.wordpres
start by reading LOOK XEDIT
Remember a couple
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op ma 4 feb. 2019 om 16:33 schreef Kris Buelens :
> What about this
> '<' fn ft fm,
/* Put results in file */
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
Op ma 4 feb. 2019 om 16:19 schreef Tim Joyce :
> Hey Guys,
>
>
>
> I'm not a skilled plumber. I'm much more familiar wit
in NETDATA or
DISK DUMP format need most work to make them readable. I shall dig out my
PIPPEEK EXEC and PIPPEEK REXX that can help you a bit.
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
2017-12-25 11:43 GMT+01:00
Look at the PICTURE option in SPECS.
Kris Buelens,
--- VM/VSE consultant, Belgium ---
---
2017-03-02 14:41 GMT+01:00 Gentry, Steve <
steve.gen...@westernsouthernlife.com>:
> I need to put leading zeroes into
ople sometimes seem to forget
that REXX interprets it first.
For example, if one codes:
'PIPE Literal A',
'| Console'
The PIPE command gets the following string as input "Literal A | Console"
no comma, no newline.
Kris Buelens,
--- freel
Instead of coding a multistream (in which one sends the secondary output of
Take to Hole), one could use buffer:
'PIPE stack|buffer|var expdt'
Buffer will read all stacked lines and only then pass the firstcrecord
through. Note that Take isn't required as Var will stop aftr havibg
processed the
!Var Where'
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2016-05-14 17:07 GMT+02:00 <amphitr...@ok.de>:
> Building a parser for nibble-oriented files I tried to get an
> indicator 'where I am'.
I found it via http://cvie.free.fr/ and then selecting REXX
But, it doesn't run on my Win7 when I gave it a couple of my REXXes, some
syntax error, without error description, makes it halt
Kris Buelens,
--- freelance z/VM consultant, Belgium
Yes, I missed the sigl part... Sorry. (must get new glasses :-)
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2016-02-26 20:30 GMT+01:00 Hobart Spitz <orexx...@gmail.com>:
> Did you not read
for syntax
errors and alike.
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2016-02-26 16:33 GMT+01:00 Hobart Spitz <orexx...@gmail.com>:
> Would it be feasible to default NAME to somet
Isn't PICK what you need?
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2016-02-25 7:56 GMT+01:00 Jack Woehr <jwo...@softwoehr.com>:
> Trying to select records by a text key field (not unique) c
xxx will display the help files created by the
VM lab and describe roughly what got included with VM with VM/ESA V1
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2016-01-24 6:24 GMT+01:00 Dave Jones &l
Just one possibility:
'PIPE (end ?)',
'F3: FrTarget Locate /this is file3/|> FILE 3 A',
'?F3:',
'|F2: FrTarget Locate /beginning of file2/|> FILE 2 A',
'?F2:|> FILE 1 A'
Kris Buelens,
--- freelance z/VM consultant
HOLE is what I am looking for.
Or, as illustrated in other reactions, HOLE is what you simply don't need
for the primary output of LOOKUP. In such a case HOLE is pure overhead
Kris Buelens,
--- freelance z/VM consultant, Belgium
before the other /V.R.xxx lines
Note too that you'd better use VARLOAD DIRECT, otherwise: if the exec in
which you use that VARLOAD already defined some contents for R (like
R='fred') then your simple VARLOAD would define V.fred.A and V.fred.B
Kris Buelens,
--- freelance z/VM consultant
John, one can Google APAR numbers and find information, most of the time
that is.
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2014-11-30 15:48 GMT+01:00 John P. Hartmann jphartm...@gmail.com:
You can
Our Pipe Telecourse ?
http://www.vm.ibm.com/download/packages/descript.cgi?TCVM2
it is a selfstudy with exercises, in HTML format. There is an advanced
REXX too:
http://www.vm.ibm.com/download/packages/descript.cgi?TCVM1
Kris Buelens,
--- freelance z/VM consultant, Belgium
.
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2014-08-08 15:19 GMT+02:00 Rob van der Heij rvdh...@gmail.com:
And for those trying to imagine why we needed that, think of processing the
output of 'rexxvars
level z. HELP PIPE
remains at level x.
Our TCVM2 selfstudy does handle only what is distributed with z/VM itself,
so level y.
Kris Buelens
freelance z/VM consultant
Op 4-aug.-2014 23:35 schreef Miguel Soltero Diaz mig...@live.com:
thanks guys...
working on it... :)
quick question Kris
LOOKUP W2 W1
Or is that too simple?
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2014-08-04 22:32 GMT+02:00 Miguel Soltero Diaz mig...@live.com:
Hi guys,
Once again need some guidance on what to do
be anything, a trick is to
convert it to HEX in REXX and tell PIPE you insert a HEX string:
'|SPECS X'c2x(ThisHost' ') '1 21-28 9 41-48 19 29-32 29 ',
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2014-07-28 18:21
The reason for INSERT is that it is a much simpler stage than SPECS, hence
it performs better. Not important for a very small PIPE.
If you'd have some time, you could take our selfstudy Pipelines course
http://www.vm.ibm.com/download/packages/descript.cgi?TCVM2
Kris Buelens
One can use SPECS, no problem, but for simple things INSERT, CHOP etc could
perform better.
30K records is not that big to start worrying. But, if you'd run that
process every minute, saving some CPU cycles may become worthwhile.
Kris Buelens,
--- freelance z/VM consultant, Belgium
I don't know if that will help: PIPE alos has ean ELSEIF
ELSEIF a==/MVS/ THEN,
/C/ NW,
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2014-04-24 22:19 GMT+02:00 Joe Parker
have
SIGNAL ON ERROR
And
IF RC\=0 THEN ...
The IF will never be executed as the SIGNAL ON ERROR causes transfer to the
error routine
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2014-04-14 18:50 GMT+02
There is a TIMEOUT option (I was at least one of the requestprs for this
feature)
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2013/12/13 James Vincent jamesscottvinc...@gmail.com
Hello!
Is there a way
JUXTAPOSE is the typical answer for such a problem:
'PIPE (end ?) .
'|CH: CHOP 5',
'|JX: Juxtapose',
'|CONS',
'?CH:|SPLIT|JX:'
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2013/11/10 Mark
This ain't good:
pick 2.2 = /0/
the = means you don't use numerical comparison, but strings are
compared. Should be
pick 2.2 = /00/
As mentions in other appends, use VERIFY /0123456789/ before teh PICK to
avoid non numeric values, after whick you can simply use = /00/ or = /0/
Kris
There is the RDR command that gives a return code telling what kind the
file is. Then you'd still need NETDATA QUERY to see if it is a file or an
email.
P.S. it should be PIPE COMMAND NETDATA QUERY if you want to be protected
agains a NETDATA EXEC floating around.
Kris Buelens
RDR and NETDATA have almost no other choice than looking at the first
record. I guess that RDR only doesn't do that for PRT type files: CP Q RDR
tells you,
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2013
Upgrade PIPE level
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2013/7/24 Frank M. Ramaekers framaek...@ailife.com
Hmmm not sure how mine is different:
|p:PICK FROM W1 == /TRACK/ COUNT 4
then Write',
'Print b+1 Pic ZZZ9 1 ',
'if a-1b+1 then /-/ N',
'print a-1 Strip N',
'endif',
'/Reserved/ NW',
'endIf',
Don't shoot me if still not perfect.
Kris Buelens,
--- freelance z/VM consultant, Belgium
. The help explains it.
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2013/2/22 Rob van der Heij rvdh...@gmail.com
On 22 February 2013 09:17, FAULHABER Michael
michael.faulha...@power.alstom.com wrote:
How may
Our Telecourse (an HTML selfstudy)
http://www.vm.ibm.com/download/packages/descript.cgi?TCVM2
Kris Buelens,
--- freelance z/VM consultant, Belgium ---
---
2013/2/22 Roberto Halais roberto.hal...@gmail.com
Hello
. */
if Date( 'Weekday' )=='Tuesday' then leave Day; end Day
...
I don't get Kris's loop because I cautiously chose a time after midnight
rather than just before.
-- gil
--
Kris Buelens,
IBM Belgium, VM customer support
?
Or might this depend on how ops set the local time?
Thanks,
gil
--
Kris Buelens,
IBM Belgium, VM customer support
when it's 12. Any idea what's going
on here? I poked through the TSO REXX books looking for anything
special about TRACE in the MVS address space, but only found a note
about messages in the output file in MVS batch.
¬R
--
Kris Buelens,
IBM Belgium, VM customer support
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
privacy...@ailife.com.
--
Kris Buelens,
IBM Belgium, VM customer support
pass the filter unmodified.)
SPLIT and CHOP don't seem to do quite what I want, but perhaps
I just don't know how to use them.
Thanks,
gil
--
Kris Buelens,
IBM Belgium, VM customer support
of system resources?
o Is there a better way?
Thanks,
gil
--
Bruce Hayden
z/VM and Linux on System z ATS
IBM, Endicott, NY
--
Kris Buelens,
IBM Belgium, VM customer support
a resume to
jackie.robi...@hp.com. Sorry about the late notice.
--
Philip M. Cohen 610-331-3926
--
Kris Buelens,
IBM Belgium, VM customer support
No no, this Pipeline job should come to Belgium.
2011/4/28 James Laing - Hotmail james_la...@hotmail.co.uk
There are jobs going in Belgium?
--
From: Kris Buelens kris.buel...@gmail.com
Sent: Thursday, April 28, 2011 8:25 PM
To: CMS-PIPELINES
be
intercepted, amended, lost or destroyed, or contain viruses. You are deemed
to have accepted these risks if you communicate with us by e-mail.
--
Kris Buelens,
IBM Belgium, VM customer support
, Kris Buelens wrote:
The REXX variable pool addressed by ADDPIPE is different from CALLPIPE.
- with CALLPIPE, the REXX instance issuing it is surely available as long
as
the called PIPE runs.
- with ADDPIPE, this REXX instance can long be gone when the added PIPE
still runs.
The online
...@ailife.com.
--
Kris Buelens,
IBM Belgium, VM customer support
before the 'tail stage' that forced the commit level and passed
its input stream unmodified, or unconditionally force commit in ''.
Thanks again,
gil
--
Kris Buelens,
IBM Belgium, VM customer support
subsequent attempts to write to the filepool failed (with rc 30 or 31)
for about the next 45 minutes, after which the problem mysteriously went
away by itself (i.e. without any help from me, anyway).
Anyone ever seen this or have any suggestions what might be going on?
--
bc
--
Kris Buelens
Senior Systems Engineer
Mainline Information Systems
--
Mark D Pace
Senior Systems Engineer
Mainline Information Systems
--
Kris Buelens,
IBM Belgium, VM customer support
on path FC
No devices on path FD
No devices on path FE
Ready; T=0.01/0.09 09:02:33
--
Kris Buelens,
IBM Belgium, VM customer support
something I can
locate. How do I locate a line, use it, and then also use the very next
line?
--
Mark Pace
Mainline Information Systems
1700 Summit Lake Drive
Tallahassee, FL. 32317
--
Kris Buelens,
IBM Belgium, VM customer support
of this message is strictly
prohibited. If you have
received this in error, please destroy it immediately and notify us at
privacy...@ailife.com.
--
Kris Buelens,
IBM Belgium, VM customer support
.
-Original Message-
From: CMSTSO Pipelines Discussion List
[mailto:cms-pipeli...@vm.marist.edu] On Behalf Of Kris Buelens
Sent: Thursday, May 13, 2010 11:45 AM
To: CMS-PIPELINES@VM.MARIST.EDU
Subject: Re: [CMS-PIPELINES] *STARMSG stage
Look in the PROP documentation, or in the CP
_
Hotmail is redefining busy with tools for the New Busy. Get more from your
inbox.
http://www.windowslive.com/campaign/thenewbusy?ocid=PID28326::T:WLMTAGL:ON:WL:en-US:WM_HMP:042010_2
--
Kris Buelens,
IBM Belgium, VM customer support
to be getting just far enough on MVS to start waxing quixotic:
Is there a way to read a data set into the pipeline out of sequence,
or is MVS all we've got? If there is, is there a way to read
backwards, or to get the record count to know where to start?
¬R
--
Kris Buelens,
IBM Belgium, VM
not something like:
myFile = 'THIS THAT B1'
PIPE VAR MYFILE | STATE NODETAIL | GETFILES | ...
If THIS THAT B1' doesn't exist, or isn't even a valid name, it wont get
through the STATE stage, and so won't be processed by GETFILES...
--
Kris Buelens,
IBM Belgium, VM customer support
aware. Causes us problems with z/OS guests.
Wonder why GMT isn't among the numerous date() and time() formats
provided by Rexx?
-- gil
--
Kris Buelens,
IBM Belgium, VM customer support
in
another pipe to divert those records, etc.
A neat part of the trick is that the peekto will not consume the
record, so it will still be in the pipeline by the time the addpipe
inserts the pick and stages. So it would still be able to flow
there.
Rob
--
Kris Buelens,
IBM Belgium, VM
impossible to
enter because of the slashes. In commands built from LISTFILE
responses, the leading zeroes are missing.
(And of course the new FIXDATE was designed as a drop-in replacement for
the old one, which didn't have the same syntax as DMSPLU.)
¬R
--
Kris Buelens,
IBM Belgium, VM
)
Mono 2.4
ooRexx 4.0
The code can be found at the following address:
http://ipages.iland.net/~jimj/ http://ipages.iland.net/%7Ejimj/
Any thoughts or comments are welcome.
James Johnson
--
Kris Buelens,
IBM Belgium, VM customer support
:, -- connect to output of stage preceding caller
| frlabel xyz
'callpipe' pipe
'select both 0'
if opt SORT then do
'PeekTo line'
do while rc = 0
'Output' line
if rc = 0 then do
'ReadTo'
'PeekTo line'
end
end
end
Kris Buelens wrote:
After reading PC-Pipes web page
of a Win32 Pipe created by a colleague in Holland, there
the default separator is !.
2009/7/7 Kris Buelens kris.buel...@gmail.com
I installed ooREXX 4.0 and RxPipe with the SETUP.EXE found in the
Support for Rexx only is included in this package
PC-PipesRexx.zip.http://ipages.iland.net/%7Ejimj/PC
'PIPE VERSION'
SYNTAX condition raised in at 0
Code: 3001 Message: Failure during initialization: File VERSION.rxpipe is
unreadable
rc = 0 rexxtry.rex on WindowsNT
2009/7/7 Kris Buelens kris.buel...@gmail.com
I found a readme in the Rexx subdir of Pc-Pipes
quiet *
Ready(28);
With STRING, there's no way around it but to move the fileid to the
input file. Guess it's time to write myself a PIPSTATE EXEC.
¬R
--
Kris Buelens,
IBM Belgium, VM customer support
Oh yes, why do you code a STRIP after a SPLIT? Splitting in words
doesn't leave any blank.
2009/4/3 Kris Buelens kris.buel...@gmail.com:
| LOCATE 20keeps records of 20 byte or longer
2009/4/3 Russel Brooks rlbro...@us.ibm.com:
I am currently splitting records into separate words
filter on word length in a pipe stage?
PIPE fn ft fm | split | strip | filter on length? | ...
--
Russ Brooks -- SVM Support (aka: RLB at STLVM5)
408-390-8483
rlbro...@us.ibm.com
Astronomy Picture of the Day: http://antwrp.gsfc.nasa.gov/apod/
TANSTAAFL
--
Kris Buelens,
IBM Belgium, VM
orders of magnitude larger than the sum should be. One example, 585
instead of 17. I have also seen numbers in the tens of thousands when
the actual totals were under 1000. What did I do wrong and how can I
correct the plug-board?
Regards,
Richard Schuh
--
Kris Buelens,
IBM Belgium, VM
Support
IBM, Endicott, NY
--
Kris Buelens,
IBM Belgium, VM customer support
Dulce et decorum est pro patria mori, sed dulcius pro patria vivere, et
dulcissimus pro patria biber. Ergo, bibiamo pro salute patriae.
--
Kris Buelens,
IBM Belgium, VM customer support
for IMSGs.
2009/1/9 Glenn Knickerbocker n...@bestweb.net
Kris Buelens wrote:
I'll send you my PIPE code that waits for some accounting records, midnight,
CP/CMS commands, etc. It may inspire you. And, it has a STOP command...
The part he's missing, Bob said offline, is a way to wait for a RDR
necessary.
--
Kris Buelens,
IBM Belgium, VM customer support
Beach_
--
DJ
V/Soft
z/VM and mainframe Linux expertise, training,
consulting, and software development
www.vsoft-software.com
--
Kris Buelens,
IBM Belgium, VM customer support
it in a feedback pipeline, for example) where it's a syntactical
requirement to have a stage to hold the label. I can't recall a need
for your other idiom.
-Rob
--
Kris Buelens,
IBM Belgium, VM customer support
. Worthington, MBCS.
me: http://isw.me.uk/
photos: http://gallery.isw.me.uk/
Dulce et decorum est pro patria mori, sed dulcius pro patria
vivere, et
dulcissimus pro patria biber. Ergo, bibiamo pro salute patriae.
--
Kris Buelens,
IBM Belgium, VM customer support
96 matches
Mail list logo