Hi everyone! I am trying to generate a large test file for an internal
project, and I wanted to know if anyone has done this with SORT.
I need to have the first 9 bytes be incremental from 10001 by 8
(...001, ...009, ...017, etc.), followed by a 12byte current timestamp
(hhmmss,mi without
equ...@listserv.ua.edu> wrote:
> Is there any reason not to use IEBDG for this?
>
> Mark Jacobs
>
> Sent from ProtonMail mobile
>
> Original Message
> On Mar 27, 2019, 4:44 PM, Bill Ashton wrote:
>
> > Hi everyone! I am trying to generate a larg
Kolusu, I would like one little tweak, if you please - is it possible to
get the timestamp fresh on each record, instead of using the same timestamp
value for all of them?
Billy
On Wed, Mar 27, 2019 at 6:29 PM Sri h Kolusu wrote:
> Hi everyone! I am trying to generate a large test file for an i
Another thing to check is that your emulator is set up to display graphic
characters.
On Fri, Mar 10, 2017 at 10:17 AM, Pommier, Rex
wrote:
> Font or character set is my guess too. We tried some different fonts and
> it made no difference.
>
> -Original Message-
> From: IBM Mainframe Di
Wow...23 quadrillion calculations every second! At that speed, it should be
able to come up with an answer before the question is even asked!
On Tue, Apr 11, 2017 at 8:42 AM, David Crayford wrote:
> On 11/04/2017 8:34 PM, Parwez Hamid wrote:
>
>> The Met Office a HPC and 2 x IBM LinuxOne Servers
Hello friends!
I just ran into a problem, and am a bit confused how to correct this.
I am reading the output of an FTP list command, and using SORT to capture
and format the FTP GET commands I need. This process is working fine for
the most part, and it produces the correct commands most of the t
TESTFL1.BIN //DD:LIST
> get /thisdirectory/TEST2.TXT //DD:LIST
>
>
> Further if you have any questions please let me know
>
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
>
> From: Bill Ashton
> To: IBM-MAIN@LISTSERV.UA.EDU
> Dat
tput from this job is
>
> get /sys01/new2017/input/TESTFL1.BIN //DD:LIST
> get /sys12/y2017/processed/HOLDDATA.BIN //DD:LIST
> get /sys12/y2017/processed/NEWDATA.BIN //DD:LIST
>
>
> Further if you have any questions please let me know
>
> Thanks,
> Sri Hari Kolusu
>
=12)),
> BUILD=(01:C'BIN ',56:%03)),
>
> IFTHEN=(WHEN=(1,3,CH,EQ,C'BIN',AND,5,8,SS,NE,C' '),
> BUILD=(01:C'BIN ',56:5,12))
>
>
>
> Further if you have any questions please let me know
>
> Thanks,
> Kolu
Hello again! I would like to know what you all are using to access web
pages in batch JCL.
I have some internal webpages (built from multiple systems) that contain
particular information that I want to capture in a batch job, and then I
will combine that with other data from other mainframe files.
Thanks everyone for some great ideas. I will give these a try and see which
one fits the best into what I am doing.
Have a great day!
Billy
On Thu, Apr 27, 2017 at 10:27 AM, Martin Packer
wrote:
> Presumably it's related to "Beautiful Soup" - which is nice and liberal
> when it comes to parsing
you are not troubled with this request, and I appreciate your help.
I have attached some JCL and data with the first part of my process
(although you might change it anyway).
Thanks again!
Bill
On Mon, Apr 24, 2017 at 10:03 AM, Bill Ashton
wrote:
> Kolusu, thanks for the fix - I had not not
'Jul',C'07',C'Aug',C'08',C'Sep',C'09',
> C'Oct',C'10',C'Nov',C'11',C'Dec',C'12'),
> NOMATCH=(C'00'),
>
Hi again...I have searched, and must be looking for the wrong thing, so I
hope you can help me.
Is there a system symbol I can use in my DSN that has the current date in
it? I understand the implications of cross-date boundaries, etc., and am
looking to try something using the date in my dataset n
MY
> //*
> //IEBCOPY1 EXEC PGM=IEBCOPY,REGION=2M,TIME=10
> //SYSUT1 DD DISP=SHR,DSN=SYS1.SYSC.PARMLIB
> //SYSUT2 DD DISP=(,CATLG),
> // DSN=ATTS.PROD.SYSC.D&LYYMMDD..T&LHHMMSS..PARMLIB,
> // UNIT=SYSALLDA,SPACE=(CYL,(10,1,75),RLSE)
> //SYSIN DD DUMMY
> - Original Messa
If the intention is to just delete the oldest generation, why not run
IEBGENER of a dummy file to create the new +1, and this will make the
oldest generation fall off. Then you could run a job to delete the (0)
generation.
On Tue, Nov 17, 2015 at 6:26 AM, Elardus Engelbrecht <
elardus.engelbre...@
I apologize - I missed the "read and..." part of the process...I would opt
for reading the output of a ListCat, then you can programmatically allocate
the oldest GDS, process it and then delete it.
On Tue, Nov 17, 2015 at 7:21 AM, Mike Schwab
wrote:
> If you delete all GDG members, the next one
Here is one way to do this, if you don't need to call other external Rexx
programs:
//*
//* This JCL demonstrates how to create and execute an in-stream
//* REXX procedure. The PARM field contains only a single x'00'.
//***
Hello friends!
I have a teammate working on a z/OS 1.12 system and is trying to make a
proc fairly foolproof for his user. He wants to know the easiest way to
convert a SET statement or JCL Parm into a control card.
This proc needs a DSN and a couple other values as part of a SYSIN for the
program
DFSORT has the ability of reading the SET parms and generate an Output
> file. So show your SET statements and your required control cards for your
> program/utility, I will show you a way to do it
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
&g
.
I will play with the Rexx to see if that is an option for our needs once I
get the Sort to work - can't have too many tools!
B
On Tue, Feb 2, 2016 at 2:29 PM, Bill Ashton wrote:
> Thanks Kolusu... we would want to use
> // SET PFILE=MY.DATASET.NAME
> // SET TXTYP=1
> //
Kolusu, thanks for this - it was quite simple, and works great.
Ed, you had to be the fly in my ointment! I am reasonably certain that all
use the same Sort, but we will have to confirm that before my partner
finishes his work. If they do not, I guess I will have to look at the Rexx
option. Thanks
Thanks for the input, everyone - this is great!
Peter, I appreciate the Syncsort checkout...we will have to keep that in
mind in case any of our users have that instead of DFSORT at their location.
The BPX option also seems safe - can we assume that this is now a
"standard" program?
I will conti
all systems up to z/OS
2.1, none of this is a concern.
Billy
On Wed, Feb 3, 2016 at 12:59 PM, Paul Gilmartin <
000433f07816-dmarc-requ...@listserv.ua.edu> wrote:
> On Wed, 3 Feb 2016 10:35:13 -0500, Bill Ashton wrote:
> >
> >Peter, I appreciate the Syncsort checkout...
Since the OP is trying to fit D + date into a 6-character field, why not
use a modified format like Dyyxdd, where x is a hex value for the month. In
this case, Jan = 1, Sep = 9, Oct = A, Nov = B, and Dec = C. That would make
the vol reference earlier D18611 as expected. and then if it were November
2, 2018 at 2:01 PM Bill Ashton
> wrote:
>
> > Since the OP is trying to fit D + date into a 6-character field, why not
> > use a modified format like Dyyxdd, where x is a hex value for the month.
> In
> > this case, Jan = 1, Sep = 9, Oct = A, Nov = B, and Dec = C. Th
Hello, I am having some difficulty in troubleshooting an application
problem dealing with a started task, and want to create a dump of the
application job and the STC at a particular point of time.
Can someone tell me if I can set a SLIP to create an SVCD when my job
encounters a message that is p
I learned something very useful here...thanks, Kolusu!
On Wed, Jun 20, 2018 at 1:26 PM Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:
> Sri h Kolusu wrote:
>
> >If you are interested to see the symbol substitution then you can use the
> EZACFSM1 symbol translator utility.
>
> My oh
Hi Pierre, I am not sure where or if you can change that, but you can
always go to the command line and enter "HILITE ASM" to change it.
Billy
On Fri, Nov 9, 2018 at 10:02 AM Pierre Fichaud wrote:
> To All,
> I've added a *PROCESS OVERRIDE(CPAT(MC)) statement at the
> beginning of my as
Is there a way that I can determine if my SORT can be done in memory, or if
I will use SORTWK files? I am running IBM DFSORT if that matters.
For example, I am playing with a file that has about 15 Million records
(FB, len 49), and the key is the whole 49-byte record. How can I determine
if the wh
Hello friends...I ran some job some time in the past, and it whacked my PDS
blocksize (and reset it to the LRECL).
I thought I remembered that there is a slick little job I can run to reset
it back to what I need, but I can't remember the particulars. I know it did
not involve copying the file, bu
R or IEBCOPY should work.
>
> Unless things have drastically changed in the intervening, er, ah, weeks.
> Yeah, weeks.
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Bill Ashton
> Sent: Wednesday, Oct
nson
> Southern California Edison Company
> Electric Dragon Team Paddler
> SHARE MVS Program Co-Manager
> 323-715-0595 Mobile
> 626-543-6132 Office ⇐=== NEW
> robin...@sce.com
>
>
> -Original Message-----
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.
Hello fellow dragon-slayers!
We are finally biting the bullet and getting ready to move forward with the
Enterprise Cobol v 5. I know there are a lot of changes to v 5 from the
world as we know it, and I will be perusing the documentation very soon,
but can someone give me a quick 3-foot view
Hello! I am trying to use DFSORT to extract some records from a transaction
work file to be displayed in Microsoft Excel (and also on the mainframe).
The data contains a lot of hierarchical information (Customer, Region,
Location, and contact people), and I would like to create a single record
for
$
ICE107A 6 DUPLICATE, CONFLICTING, OR MISSING INREC OR OUTREC STATEMENT
OPERANDS
BUILD=(%01,JFY=(SHIFT=LEFT,LEAD=C'"',TRAIL=C'"'))
$
ICE005A 0 BLANK NEEDED IN COLUMN 1 OR OPERATION NOT DEFINED CORRECTLY
HI Kolusu, in the original post is an attached file showing the input
layout (data has been scrubbed) containing only the relevant data. Here it
is again for you. Let me know if that is not good enough.
Billy
On Fri, Dec 29, 2017 at 11:19 AM, Bill Ashton
wrote:
> Here is the error when I o
The original file is 80 bytes long, so you can copy this into an 80-byte
file, and get rid of everything in the [ ] pair if you want.
On Fri, Dec 29, 2017 at 11:22 AM, Bill Ashton
wrote:
> HI Kolusu, in the original post is an attached file showing the input
> layout (data has been sc
Thanks, Kolusu; I will be leaving shortly, too, and will give this a try in
the next week or so. I never imagined it would be so complex, but I will
try to figure it out.
Happy new year!
Billy
On Fri, Dec 29, 2017 at 12:58 PM, Sri h Kolusu wrote:
> Bill,
>
> Use the following JCL which will giv
PUSH=(411:411,27)),
> IFTHEN=(WHEN=GROUP,BEGIN=(438,1,CH,EQ,C'"'),
> PUSH=(438:438,53)),
> IFTHEN=(WHEN=GROUP,BEGIN=(491,1,CH,EQ,C'"'),
> PUSH=(491:491,26)),
>
>
> Thanks,
> Kolusu
>
Kolusu, I ran these statements and found the job to be incredibly fast. I
added an INCLUDE COND statement to filter out only what I needed (based on
the IfThen statements at the top), and was able to process
a 21,403,200-record file to produce 1,633,601 output records in only 20
seconds!
I also do
Here is a simple Listcat command that does an Outtrap, and then writes it
to a file that is browsed...you could easily just do a bunch of "say"
commands with this, too.
/*>> REXX <<==*/
/* LCAT: Browse output from 'LISTCAT ENT(dsn) ALL' command
You can also add a job to the IEFJOBS file if you have it defined, and you
can then have a Started Job.
On Fri, Nov 25, 2016 at 1:51 PM, Wayne Bickerdike wrote:
> For CICS, yes it can run as a started job.
>
> CA-Datacom can run as a job too.
>
> Whatever you want to do, try itWrap a job car
For fun I created some files. It seems that files with LRECL=7000 through
10796 create a SDB BLKSZ equal to the LRECL, rather than half track
blocking. There are many other LRECLs that also create SDB BLKSZ that seems
less than optimal. Does anyone know why this might be? For instance LRECL
3681 an
Would you be willing to share the process so we don't have to try and piece
the whole thing together to reinvent the wheel?
Billy
On Tue, Jan 31, 2017 at 10:21 PM, Hardee, Chuck <
chuck.har...@thermofisher.com> wrote:
> I was provided a stub program by Peter that he had used to get around a
> sim
If the issue is to use FileA if it exists, otherwise use FileB, the maybe
the best answer is to create a new file that is input to the STEP3 process.
You can do all this in the IDCAMS with something like this (untested),
where you define the temporary file (TEMPDD) in the JCL. This will also set
th
You might be able to REPRO the DATA component separately to another file
with fewer volumes, and then use that to rebuild the INDEX if you want to
keep the file.
On Wed, Feb 12, 2014 at 2:56 PM, John McKown
wrote:
> You might try:
>
> //IEFBR14 EXEC PGM=IEFBR14
> //DELETE DD DISP=(OLD,DELETE,DEL
With all the recent discussion about COBOL and bit twiddling and about
deleting migrated files, I wanted to look into some of our application
processes. We have a REXX program that makes LISTDSI calls, and I wondered
if there was any sort of equivalent interface for COBOL that I could pass
on to th
wrote:
> In
> ,
> on 02/27/2014
> at 08:45 AM, Bill Ashton said:
>
> >We have a REXX program that makes LISTDSI calls, and I wondered if
> >there was any sort of equivalent interface for COBOL
>
> It's the same interface, and I believe tha
Hi friends! I just had a new colleague ask me about using CNTL/ENDCNTL
statements in JCL, and I was at a loss. Even after looking it up, I really
can't see why I would use them.
Has anyone had experience with these statements, and can give a couple
real-world examples of how to use them? Is it lik
They have excellent support...I have used them a few times for silly little
things and big things, and they were always quite helpful!
On Fri, Apr 11, 2014 at 6:21 AM, Sambataro, Anthony (NIH/NBS) [E] <
anthony.sambat...@nih.gov> wrote:
> I'd contact the vendor Jolly Giant at http://www.jollygia
Hi friends...you have been helpful to in so many areas so far, and now I
have a question about using SORT.
I have an application that creates a CSV file (sort of) on the mainframe.
The data rows start with a field "DATA" before the actual data fields, and
there is a Header row that has a lot more
6 PM, retired mainframer wrote:
> You can use the OMIT feature to drop the trailer record
>
> You can use the IFTHEN feature to recognize whether the current record is a
> header record or data record.
>
> For the data records, you can simply copy starting at column 6. Because
>
Hi friends...I am having a bad brain day...Is there a common utility that
can run unauthorized which will show me if module(ABC) exists in a Linklist
library (and which one)?
I am looking for a JCL method that I can run on each of my LPARs to verify
and document that a particular software product
Thanks for these great suggestions. I think I will try the ISRDDN first, as
it does not need special programming.
Thanks again, everyone!
Billy
On Thu, Jul 24, 2014 at 7:33 PM, Shmuel Metz (Seymour J.) <
shmuel+ibm-m...@patriot.net> wrote:
> In
> ,
> on 07/24/2014
> at 03:
When you are editing the member, you can either enter BNDS 35 50 on the
command line, or enter BNDS on one of the data lines, and then put the < in
col 35 and the > in col 50. When done, don't forget to enter BNDS (with
nothing) in the command line to reset the bounds.
B
On Fri, Jul 25, 2014 at
If you need near-time or real-time access to the data, I would recommend
you look at CA Technologies product called VSAM Transparency for
Datacom/DB. Having used this for a lot of years, it was great. The
20-second description is that it allows your application programs to
continue accessing the da
Oct 2014 10:39:03 -0400, Bill Ashton
> wrote:
>
> >If you need near-time or real-time access to the data, I would recommend
> >you look at CA Technologies product called VSAM Transparency for
> >Datacom/DB. Having used this for a lot of years, it was great. The
> >20-sec
I thought I knew this off the top of my head, but someone gave me a problem
that doesn't fit what I thought.
Let's say I hvae a PS file allocated as CYL(2500,500), and it is allocated
to VOLSR1 and VOLSR2. Can someone point me to the doc that explains this,
or can someone explain to me what happen
These are not SMS-managed volumes..just plain old ordinary 3390s...
Billy
On Wed, Jul 18, 2012 at 8:46 AM, Darth Keller wrote:
> I thought I knew this off the top of my head, but someone gave me a
> problem
> > that doesn't fit what I thought.
> >
> > Let's say I have a PS file allocated as CYL(
Is it possible to use the PAX program to open a .zip file on the mainframe,
or does anyone have any other suggestions? I know I can open it on the PC
and transfer the file components over...just looking to see if I can cut
out a step.
--
Thank you and best regards,
*Billy Ashton*
I had an new contractor come to me recently and wanted to set up a Started
Job in IEFJOBS. It looks like a normal job that is run from a normal
scheduled jobs library.
Can anyone tell me:
1. Why is a Started Job better than a Started Task?
2. Why would I use a Started Job instead of running a regu
Hi Sri et al., I have 2 files that I would like to compare, file "A" has
5 records, and file "B" only a subset of that - maybe 1000 records.
They have the same key (pos 1, len 24), but are not unloaded in key order.
The records are 2524 bytes long (24 byte key + 2500 bytes data).
I know I can
2524
> //TOOLINDD *
> SELECT FROM(SORTIN1) TO(TEMPDD) DISCARD(SORTOU1) ON(1,2524,CH) ALLDUPS
> //*
>
> Best regards,
> David Tidy
> IS Technical Management/SAP-Mf
> Dow Benelux B.V.
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:I
(5,2)),
> // UNIT=SYSALLDA,
> // RECFM=FB,
> // LRECL=2524
> //TOOLINDD *
> SELECT FROM(SORTIN1) TO(TEMPDD) DISCARD(SORTOU1) ON(1,2524,CH) ALLDUPS
> //*
>
> Best regards,
> David Tidy
> IS Technical Management/SAP-Mf
> Dow Benelux B
>
> http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/ICE1CA60/4.0?
>
> Further if you have any questions please let me know
>
> Thanks,
> Sri Hari Kolusu
> DFSORT Development
> IBM Corporation
> Email: skol...@us.ibm.com
> Phone: 408-927-2187 Tie Line: 4
te simple. All you need is to change this statement in SYSIN from
>
> JOIN UNPAIRED
>
> to this statement (Just add F2 at the end)
>
> JOIN UNPAIRED,F2
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
>
>
> From: Bill Ashton
> To:
THEN=(WHEN=(5049,1,CH,EQ,C'1'),
> BUILD=(0001,2524,C'RECORD FOUND ONLY IN F1')),
>
> Thanks,
> Kolusu
> DFSORT Development
> IBM Corporation
>
> IBM Mainframe Discussion List wrote on
> 11/18/2014 11:21:59 AM:
>
> > From: Bill Ashton
> >
I took that to mean that he can change lower case data independent of upper
case data, even if the text strings might be similar. For example, changing
"ftp.mynode.somthing" to "ftp.newnode.something" without also changing
DSN=DATAFOR.MYNODE.TRANSMIT,DISP=SHR
Billy
On Thu, Dec 11, 2014 at 9:19 AM
Here are some of the benefits of using a Started Job through the IEFJOBS
process:
* Started Jobs (from IEFJOBS) run under the same general security as
Started Tasks. You can, however, specify a USER=xxx parameter on the JOB
card (be sure the proper Surrogate rules are in place) or a
USER=xxx,PASSWO
I second the suggestion about the communities...I have found some to be
very helpful, and have avoided opening a support ticket in one or two
cases. I don't know the Endevor one specifically, but it would be a good
place to start.
Billy
On Tue, Apr 7, 2015 at 3:20 PM, Lizette Koehler
wrote:
> I
Thomas, I tried a few things suing a stemname like 0a, and I could not get
that to work...Can you give me an example of how you use this, and how you
increment stem variables, so I can see this in action?
Thanks!
Billy
On Thu, Jun 13, 2013 at 10:20 AM, Thomas Berg wrote:
> > -Original Messa
That should be "I tried a few things using" Sorry about that!
Billy
On Thu, Jun 13, 2013 at 10:54 AM, Bill Ashton wrote:
> Thomas, I tried a few things suing a stemname like 0a, and I could not get
> that to work...Can you give me an example of how you use this, and how you
Hello friends!
I am trying to restore some files that were backed up with DFDSS some time
ago, and I am having a problem with the results.
If I let DFDSS allocate the file, I get an output file with a Blocksize of
zero, although all the space amounts are fine. I then tried to use OUTDD(),
and if I
s no data. In which case I would just allocate
> it
> rather than trying to restore it.
>
> Lizette
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Bill Ashton
> Sent: Thursday, August 29, 2013 5:43 A
It maybe that your file has no data. In which case I would just
> > allocate it rather than trying to restore it.
> >
> > Lizette
> >
> >
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Beh
just try and restore and replace the pre-allocated files.
I have tried lots of different ways, with no success.
On Thu, Aug 29, 2013 at 9:29 AM, Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:
> Bill Ashton wrote:
>
> >Here is my input:
> >RESTORE DATASET(INCLUD
Lizette, you are a genius, and I could hug you!
Here is the Gener step - I changed the null sysut1 to avoid the
"conflicting DCB attributes" message:
//GENERUO2 EXEC PGM=IEBGENER,REGION=0M
//SYSINDD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD DUMMY,LRECL=4096,BLKSIZE=4096,RECFM=F
//SYSUT2
do a
> RESTORE without the BYPASSACS and the file should be correct.
>
> Lizette
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Bill Ashton
> Sent: Thursday, August 29, 2013 7:31 AM
> To: IBM-MAIN@
Although adding two steps to a one-step proc means you could hit the 255
jobstep limit quicker, if that limit is still around. I haven't written
jobs that big in a long time...
Billy
On Fri, Dec 7, 2012 at 7:23 PM, retired mainframer wrote:
> You showed a one step proc that is invoked once for
Gerhard, I just tried this - what a hoot! I never would have thought of
it...Thanks for such a simple suggestion - I will keep this JCL around!
Billy
On Tue, Dec 11, 2012 at 3:55 PM, Gerhard Postpischil wrote:
> On 12/11/2012 3:44 PM, Gibney, Dave wrote:
>
>> I've never used it, but this seems t
Now, on a related note...is there a simple way to remove commas from a
number that is input as a string?
For example, if a variable has "2,143,628" in it, how can I easily strip
the commas to wind up with 2143628?
Billy
On Fri, Jan 4, 2013 at 1:58 PM, Lionel Dyck wrote:
> The 'extra' comman be
One of my favorites is lollipop - 4 characters, one hand...
Billy
On Tue, Jan 22, 2013 at 8:57 AM, Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:
> Phil Smith wrote:
>
> >And I remember when we were using a "common" password for some dev
> resources (long ago and far away, and befor
Hi...I am having some discussions with an application programmer about how
programs are loaded and the search sequence - STEPLIB/JOBLIB/LNKLST, etc.
Can someone point me to the IBM doc that spells this out clearly so I can
refer him and his teammates to the right place?
Thank you and best regards
nter/zos/basics/index.jsp?topic=/com.ibm.zos.zsysprog/zsysprogc_searchorder.htm
>
>
> -Original Message-
> From: Bill Ashton [mailto:bill00ash...@gmail.com]
> Sent: Thursday, March 21, 2013 10:31 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Program load processing
>
>
Hi guys...I have been asked to do some COBOL coding, and I have not done
some for quite a few years. Is there a COBOL listserv available, and is
there any other website that would have recommended best practices?
For example, I used to try to code all my working storage under a very few
01 levels,
Does anyone know if I can create an instream entry that would be used as an
INCLUDE? I have a bunch of steps in this job I am running, and would like
to override the INCLUDE member being called by coding it instream in the
top of the job, just as you would do with an instream PROC. I don't want to
NSTREAM
> //
>
> //EXTPROC PROC IPROC=
> // EXEC PROC=&IPROC
> //* OTHER JCL IN EXTERNAL PROC IN PROCLIB
> //*
>
>
>
>
> On Mon, Mar 25, 2013 at 3:46 PM, Bill Ashton
> wrote:
>
> > Does anyone know if I can create an instream entry that would be used as
>
Hi again...this should be my last annoyance for a while, I hope...You all
have been a big help in getting me going with finding my sea legs again
with this COBOL project.
Today's question (I think I already know the answer is 'no') - Is there a
way in native JCL to take a PARM and make an output f
0025 and UK90026" paper (sortugph.pdf)
> at:
>
> http://www.ibm.com/support/docview.wss?rs=114&uid=isg3T7000242
>
> Further if you have any questions please let me know
>
> Thanks
> Kolusu
> DFSORT Development
> IBM Corporation
>
> IBM Mainframe Discussio
ange to use a dataset
> //STDERR DD SYSOUT=*
>
> ...chris.
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Bill Ashton
> Sent: Tuesday, March 26, 2013 12:07 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subje
The best product was called Job/Scan from Diversified Software, then ASG. I
am not sure if it is still available, as the place I work now has something
else, but it was a great tool.
Billy
On Tue, Sep 6, 2016 at 10:44 AM, Lizette Koehler
wrote:
> I do not know smartJCL. But have you also looked
Hello my friends, this is a simple assembler question, but for some reason
is not clicking for me this morning.
How do I take a 1-byte character field containing a Hex value like x'C4'
and turn it into a 2-byte character field containing C4 (x'C3F4')? I know
how to turn it into a decimal value and
Thank you for all these great suggestions. My needs are very simple in only
having to translate two different 1-byte fields, so Bernd's solution worked
out to be the easiest and quickest to use.
I will be saving these other ones, and like the macro idea as well as a
quick print using DFSORT (Thank
Don't forget with Cut/Paste that you have many sections available - for
example you could go to line 10 and CC 4 lines, and say CUT A, then go to
line 50, CC 3 lines and CUT B, then go to line 65 C 1 line and CUT C, etc.
I use this often when I want to cut lots of pieces from one member and then
pa
I find that it is much easier to break the text into multiple,
quote-delimited lines, and not bother with the continuation stuff. For
example the lines above in my world would be as you have them, but without
the dash in Col 7. It makes it much easier to work with...
On Thu, Jul 16, 2015 at 11:12
I use code similar to this:
#rc = ListDSI("'"Strip(dsn)"' NORECALL SMSINFO");
If (#rc /= 0) & (sysreason /= 30) Then
Do
End
...
This gives me info on the dataset and on the SMS parameters used for a
file. The sysreason 30 says that the file is not SMS-managed. If you get a
sysreaso
Hello...I am working on a Rexx program for users, and as part of the
process, I want to submit a JCL member right away when the program starts.
There are no edits or changes needed, so I just issue a TSO SUBMIT
command.
However, the users are annoyed with the "...SUBMITTED" message and the
int
t;)
>
> before your submit. You can if you like have an ISPF message instead, eg;
>
> 'setmsg msg(twsul011)'
>
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Bill Ashton
> Sent: 28 J
I use this link, as it includes CICS and other products:
http://www-01.ibm.com/software/support/lifecycle/index_a_z.html
B
On Wed, Jul 29, 2015 at 6:12 AM, Elardus Engelbrecht <
elardus.engelbre...@sita.co.za> wrote:
> Gibney, David Allen,Jr wrote:
>
> >I used z/OS lifecycle and didn't come clos
1 - 100 of 122 matches
Mail list logo
