Martin,
I have a PLX program that I wrote to do this kind of thing last year. That
program would not be of much use to you, so I've written you a short REXX
sample as follows:
/* REXX */
trace i
ALLOC DD(ADMGDF
Thanks, Phil! Very much appreciated.
Now, how about extending it to create JPEGs directly? :-)
Cheers, Martin
Martin Packer
Performance Consultant
IBM United Kingdom Ltd
+44-20-8832-5167
+44-7802-245-584
email: martin_pac...@uk.ibm.com
Twitter ID: MartinPacker
They're figuring out that
Martin,
I came across a reference to TRANSMOGRIFIER several years ago and made a
note of it. I've never tried it. I don't know whether it could be used to
convert ADMGDF files to JPEGs. For more information see:
http://www.ibm.com/software/applications/office/bkmgr/transmog.html
Ultimately I'm trying to convert ADMGDFs into JPEGs (though I guess GIFs
have similar utility).
Does anyone have a sample invocation - either JCL or (preferably) REXX for
invoking ADMUGIF to convert ADMGDFs to GIFs? In particular I want to
convert from one member of a PDS to another member. I
Hi all,
Does anybody out there have a sample in REXX to send a message to console and
get a response from operator ,something like WTOR(write to operator with
reply) macro in assembly?
Any help is highly appretiated.
Regards,
Ali
Sent: Tuesday, May 15, 2007 11:00 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: rexx sample
Hi all,
Does anybody out there have a sample in REXX to send a message to
console and get a response from operator ,something like WTOR(write to
operator with reply) macro in assembly?
Any help is highly appretiated
Jalili,
try with this site: http://www.sscmainframe.com/freeware.htm
and download program ALXRWTOR. Then assemble it and make the use you
need.
Hope this helps.
_
Paolo Cacciari
Business Continuity and Resiliency
Ali,
You can use some code similar to this:
/* REXX */
CONSOLE ACTIVATE
CONSPROF SOLDISPLAY(NO) SOLNUM(100)
ADDRESS CONSOLE
console command
DISPMSG = ''
MCODE = GETMSG('DISPMSG.','SOL',,,10)
DO UNTIL DISPMSG.1 = ''
SAY DISPMSG.1
DISPMSG.1 = ''
MCODE = GETMSG('DISPMSG.','SOL',,,10)
--snip-
Does anybody out there have a sample in REXX to send a message to
console and get a response from operator ,something like WTOR(write to
operator with reply) macro in assembly?
Any help is highly appretiated.
9 matches
Mail list logo