Good catch Gil!
The one thing I forgot to say was that the member being included needs a
statement like this as the first entry:
// DD *,SYMBOLS=JCLONLY
Sorry for the confusion.
C-
On Mon, Jan 8, 2024 at 10:47 AM Paul Gilmartin <
042bfe9c879d-dmarc-requ...@listserv.ua.edu>
Colin,
I do it using IEBGENER:
// JCLLIB ORDER=pds.with.members.to.use
//SETSTEP EXEC PGM=IEBGENER
//SYSINDD DUMMY
//SYSPRINT DD SYSOUT=*
//SYSUT1 DD *,SYMBOLS=JCLONLY
// INCLUDE MEMBER=x
//SYSUT2 DD DISP=SHR,DSN=dataset.to.contain.resolved.member
I don't know if
en they load it for passing to the SYNAD exit, or
> is
> >it my responsibility to clear the high byte
>
> Not sure, but I can darn sure tell you what the fastest resolution would
> be!
>
> Charles
>
>
> On Mon, 6 Nov 2023 11:46:16 -0600, Charles Hardee <
> charles
To answer Seymour J. Metz's question first, it's specified in the DCB.
To answer Charles Mills' question, the module is defined as RMODE 24, AMODE
ANY, so the I/O was issued in 31-bit mode.
Which now rings a bell, I, too, vaguely remember that SYNAD is called in
the A-Mode of the code issuing
Hello All,
I have been under the impression for decades that SYNAD exits are called in
24-bit mode.
Recently I have been having problems in one of my programs.
The problem goes as follows:
I am reading an input file that is defined as:
//INPUTDD *,SYMBOLS=JCLONLY
OUTPUT DATASET *other
Thanks everyone for your information.
I have looked at named tokens and it appears they just might do what I need.
Chuck
On Thu, Oct 19, 2023 at 1:06 PM Jon Perryman wrote:
> On Thu, 19 Oct 2023 16:25:23 +, Farley, Peter <
> peter.far...@broadridge.com> wrote:
>
> >System-wide named
, 19 Oct 2023 at 10:18, Charles Hardee
> wrote:
>
> >
> > I will "grossly" explain what I want to do.
> > I am not interested in other methods, I have other methods, but I am
> > interested in this method the most, if it can be done.
> >
> &g
t; wrote:
> JCL symbols exist only within a job. A symbol set in one job cannot be
> checked in another job.
>
> Sorry if this isn't "*constructive*".
>
> --
> Tom Marchant
>
> On Thu, 19 Oct 2023 09:17:34 -0500, Charles Hardee <
> charleshhar...@gmail.com> w
My apologies, I didn't mean to stir up the hornet's nest of opinions on the
viability of my question.
I will "grossly" explain what I want to do.
I am not interested in other methods, I have other methods, but I am
interested in this method the most, if it can be done.
Program A executes and
Hello All,
Thanks in advance for anyone that can shed light on the subject.
Is there a mechanism for setting a JCL type variable from within a program?
In other words, I would like to do this:
// SET XYZ='ABC and DEF'
from within a program.
Again, thanks for anyone that can shed light on
I'm on 2.5 and just used ! today.
On Wed, Sep 20, 2023 at 3:20 PM Binyamin Dissen
wrote:
> You specify the pointer type in the storage display screen.
>
> % = 24bit
> ? = 31 bit
>
> On Wed, 20 Sep 2023 15:15:28 -0500 Paul Gilmartin
> <042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
>
I wouldn't call myself a SLIP expert, but I do a lot of SLIPs during
software development.
Consider something like the private module parm of SLIP. You would use
something like P=TOROLABA.
Do you get registers when you get the S0C4?
If you do, find the one that contains the base address and use
Hi Peter,
This works:
STR14,0(,R13)
JAS R14,*+4+8
DCC'$SL$',Y(x,y)
L R14,0(,R13)
and I can do DA=(14R?,EQ,5BE2D35B)
Where x is a module's identification number and y is the nth macro
expansion for my SLIP trigger macro.
What I wanted to
D Rossman wrote:
> Normally, you would use the RANGE= option to have the SLIP hit on certain
> PSWs. Are you trying to see if a particular instruction is present at the
> PSW?
>
> Eric Rossman
>
> -Original Message-
> From: IBM Mainframe Discussion List On Behalf
&
Hello All,
I have a question regarding the SLIP command.
In my DA= parameter I have used things like 2r? to reference register 2,
etc.
Is there a symbol for the PSW?
I have tried DA=(PSW?+0,EQ,*myvalue*) and it tells me the DA parm is bad.
Thanks,
Chuck
*I have not tried this*, but could you use SET FILE-VAR TO ADDRESS OF
FILE-NAME?
Does that make FILE-VAR point to the DCB?
If so, then, with the file closed, move in your DD name, open, write, close.
Rinse and repeat.
Like I said, I don't know if this will work, but it's worth a try.
Chuck
On
I have not seen this exactly like what you describe, but I do have some
thoughts.
The pointer you are using for the ALLOCATE, does it have a value clause,
specifically VALUE NULL.
If not, the pointer could have an unknown value that does not compare equal
to NULL so you would attempt to FREE it.
Mainframe Discussion List on behalf
> of Charles Hardee
> Sent: Friday, April 7, 2023 4:11 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Cobol calling module with non alphanumeric no longer
> allowed???
>
> Are you doing a call literal or call dataname?
>
> On Friday, Apr
Are you doing a call literal or call dataname?
On Friday, April 7, 2023, Frank Swarbrick
wrote:
> I've tried calling modules (that exist!) with both '@' and '#' signs in
> them and Enterprise COBOL 5+ does not allow this. COBOL 4 allowed this.
> Is there any good reason why this is the case?
>
I received your message so it appears your not being blocked, as of now.
On Sun, Feb 19, 2023 at 12:13 PM Steve Thompson wrote:
> This is a test to see if my IP is still being blocked.
>
> My email server is hosted in Washington state and from time to
> time certain organizations suddenly start
EQUALS was not specified in my SORT parms, but it was listed in the OPTIONS
display of the output as EQUALS=Y.
I am in the process of getting the program rerun with NOEQUALS specified.
C-
On Thu, Jan 12, 2023 at 6:06 PM Sri h Kolusu wrote:
> >> Is 32 bits an optimum choice? A larger
il secure email.
>
> --- Original Message ---
> On Thursday, January 12th, 2023 at 1:01 PM, Charles Hardee <
> charleshhar...@gmail.com> wrote:
>
>
> > I have plenty of SORTWKxx DDs.
> > I don't think that is the problem.
> >
> > I am getting an
WKnn DD's it will
> allocate. Our local Syncsort default is 64, but for really big sorts (when
> we get the Syncsort equivalent "too big to sort" message, which says "SORT
> CAPACITY EXCEEDED") we use DYNALOC(SYSDA,255).
>
> HTH
>
> Peter
>
> -O
Hello Listers,
I've searched the IBM-MAIN archives and found nothing to help me so I
thought I'd better ask the question.
I am trying to sort roughly 4295217295, records using DFSORT.
DFSORT issues a message that I have exceeded the sort input record maximum.
It appears that this maximum is
24 matches
Mail list logo