Seems like this is the only way my read worked but it kind of doesn’t make
sense
I should be able to have the I/O area from subpool 0 pageable storage
Thanks
--
For IBM-MAIN subscribe / signoff / archive access instructions,
It is normal to obtaon buffers from subpool 0. It is not normal to specify DCBE
options that you don't want'
Please include the relevant DCBE with code that you post.
BTW, the DFSMSdfp documentation discusses what can be above the line line and
how to support it.
--
Shmuel (Seymour J.) Metz
h
Seymour
Here is the code if you page down the email you will see "Here is the
DCB//DECB/DCBE and exlst code"
As I said when get the I/O area from sp=0 I abend 800 rc 4 from sp=233 which
is fixed its okay
*
*
On Thu, 23 Mar 2023 12:31:36 +, Seymour J Metz wrote:
>It is normal to obtaon buffers from subpool 0. It is not normal to specify
>DCBE options that you don't want'
>
I coded some BSAM long ago, 370 era. I never bothered with fixing pages.
I assumed/was told the access method did that for me
Dynamic Information Retrieval doesn't read the data set to determine
information - it looks at what is known about it in SWA. So unless it knows
the information you're looking for - for example, the DD is coded in JCL and
has the relevant keyword specified, or maybe you've OPENed the DD so that
The access method handles page fixing unless you specify DCBE FIX=USER.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Paul Gilmartin [042bfe9c879d-dmarc-requ...@li
On 3/22/2023 1:21 AM, Steve Austin wrote:
This works for me;
level='0004'x
name=left(serverName,16)
token=''x
retcode=''x
do until retcode = '0004'x
"sleep 2"
address LINKPGM "IEANTRT LEVEL NAME TOKEN RETCODE"
end
Using an intended servic
Seymour “respectfully ” that’s for QSAM in locate mode BSAM doesn’t have a
locate mode the user supplied the I/O area
This snippet is from code that is re-entrant
I remember a long time ago I wrote program here at the IRS using bsam and got
storage from subpool zero
There is one program her
> STORAGE OBTAIN,LENGTH=(R0),ADDR=(R6),LOC=BELOW,EXECUTABLE=YES,X
>SP=0
Is ADDR=(R6) legal? What is the generated code?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@L
In general, yes, and true for IEANTRT, but there are some cases where the
intended service is awkward or pointless.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Ed
I put executable=yes because of exlst initial code must be below the line
Just noticed the LAM
Don't believe I have a SYSSTATE ASCENV=AR don't even know if that has
anything to do with the abend I was getting
LAR0,IODSECTLEN
STO
FSVO QSAM.
"FIXED=USER
With this DCBE option, you assert that the data areas remain fixed from the
time the READ or WRITE
macro instruction is issued through the completion of the CHECK or WAIT macro
instruction."
Three out of four of those macros are BASm, and the last isn't part of the
acce
So I’ll try using FIX=USER ? And ADDR=(1)
> On Mar 23, 2023, at 10:22 AM, Seymour J Metz wrote:
>
> FSVO QSAM.
>
> "FIXED=USER
> With this DCBE option, you assert that the data areas remain fixed from the
> time the READ or WRITE
> macro instruction is issued through the completion of the CHE
Interesting - time for an RCF.
BTW, you'll get shorter code if you use the documented LENGTH=(0) instead of
using the symbolic name. It would be nice if IBM assumed that R0-R15 had the
values 0-15, but that might break existing code.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
__
Is it documented by IBM that BSAM IO buffers must be in fixed storage? I've
never seen it.
Further, we have written widely used BSAM code in the last 15 years that uses a
circular queue of DECBs, with one BLKSIZE buffer per DECB (as suggested by
"Using Data Sets"). We just use 31 bit C Libra
Hi all,
(This seems like one of those easy answers to find, but I'm not having much
luck)
We have z/OS 2.4 and we are wondering if we can unzip an ASCII file that was
zipped on the Windows platform.
I've seen references to gzip, Ported Tools, 3rd party software. What are our
options for unz
I got curious about how many possible different values could exist in a
dataset "node". A node can be 1 to 8 characters long. The first character
must be A-Z @#$ or 29 characters. Subsequent characters are those 29 plus
digits 0-9 and a dash (the dash was a surprise to me). Unless I goofed up,
that
I am not sure, but GIMUNZUP might work. It's designed for SMPE, but might
work. Or write a Java program to do an unzip.
https://www.ibm.com/docs/en/zos/2.2.0?topic=routines-gimunzip-file-extraction-service-routine
On Thu, Mar 23, 2023, 09:33 MARTIN, MIKE <
04b29373b847-dmarc-requ...@listserv
You can get a port of unzip from https://github.com/ZOSOpenTools/unzipport
To get the executable go here
https://github.com/ZOSOpenTools/unzipport/releases/tag/unzipport_601
Hope this helps
Lionel B. Dyck <><
Website: https://www.lbdsoftware.com
Github: https://github.com/lbdyck
Worry more a
It is documented that BSAM buffers must be page fixed by the user *ONLY* if the
DCBE specifies FIXED=USER. The problem lies elsewhere.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU]
If you have Java on z/OS, try the jar command.jar xf zipfile
-Original Message-
From: MARTIN, MIKE <04b29373b847-dmarc-requ...@listserv.ua.edu>
To: IBM-MAIN@LISTSERV.UA.EDU
Sent: Thu, Mar 23, 2023 3:33 pm
Subject: Unzip on z/OS ?
Hi all,
(This seems like one of those easy answers to
If your DCBE doesn't have FIXED=USER then the page fix shouldn't be needed and
something else is wrong.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Joseph Reichman
FIXED=USER
Worked no abend I also have to say that I took
The RMODE31=BUFF out since it’s not relevant for bsam and I had ADDR=(1)
And included LR R6,R1
Thank you
> On Mar 23, 2023, at 10:49 AM, Seymour J Metz wrote:
>
> If your DCBE doesn't have FIXED=USER then the page fix shouldn't be n
I get 4.75136 trillion, just under rather than over.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
John McKown [john.archie.mck...@gmail.com]
Sent: Thursday, March 23,
Same here.
On Thu, Mar 23, 2023 at 10:00 AM Seymour J Metz wrote:
> I get 4.75136 trillion, just under rather than over.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU
Seems reasonable to me. Don't forget to add the shorts (node length <8).
sas
On Thu, Mar 23, 2023 at 11:00 AM Seymour J Metz wrote:
> I get 4.75136 trillion, just under rather than over.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
Ok. At least I'm close. Thanks.
On Thu, Mar 23, 2023, 10:00 Seymour J Metz wrote:
> I get 4.75136 trillion, just under rather than over.
>
>
> --
> Shmuel (Seymour J.) Metz
> http://mason.gmu.edu/~smetz3
>
>
> From: IBM Mainframe Discussion List [IBM-MAIN
On Thu, Mar 23, 2023 at 08:56:43AM -0400, Joseph Reichman wrote:
> Here is the code if you page down the email you will see "Here is the
> DCB//DECB/DCBE and exlst code"
Another partial source which ignores that you are authorized.
When you are authorized (especially key zero/system key/supervis
You are absolutely right I’ll fix pronto
> On Mar 23, 2023, at 11:38 AM, Michael Stein wrote:
>
> On Thu, Mar 23, 2023 at 08:56:43AM -0400, Joseph Reichman wrote:
>> Here is the code if you page down the email you will see "Here is the
>> DCB//DECB/DCBE and exlst code"
>
> Another partial sou
Woops! Taking that into account I get 4.87318974, which is just over.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Steve Smith [sasd...@gmail.com]
Sent: Thursday, Mar
Steve Smith added:
>Seems reasonable to me. Don't forget to add the shorts (node length <8).
To summarize:
8-character node: 29*(40**7) 4,751,360,000,000
7-character node: 29*(40**6) 118,784,000,000
6-character node: 29*(40**5) 2,969,600,000
5-character node: 29*(40**4) 74
Did listpsw at breakpoint was key 8 problem bit bit 15 was one
Open ok Read ok and got IOAREA
> On Mar 23, 2023, at 11:39 AM, Joseph Reichman wrote:
>
> You are absolutely right I’ll fix pronto
>
>>> On Mar 23, 2023, at 11:38 AM, Michael Stein wrote:
>>>
>>> On Thu, Mar 23, 2023 at 08:
What's wrong with goof old Infozip?
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
MARTIN, MIKE [04b29373b847-dmarc-requ...@listserv.ua.edu]
Sent: Thursday, March 2
Thanks for that! I was lost as usual with math.
https://www.youtube.com/watch?v=NO0cvqT1tAE
On 3/23/2023 8:48 AM, Phil Smith III wrote:
Steve Smith added:
Seems reasonable to me. Don't forget to add the shorts (node length <8).
To summarize:
8-character node: 29*(40**7) 4,751,360,000,
On Thu, 23 Mar 2023 09:34:02 -0500, John McKown wrote:
>I got curious about how many possible different values could exist in a
>dataset "node". A node can be 1 to 8 characters long. The first character
>must be A-Z @#$ or 29 characters. Subsequent characters are those 29 plus
>digits 0-9 and a da
On Thu, 23 Mar 2023 16:00:40 +, Seymour J Metz wrote:
>What's wrong with goof old Infozip?
>
NIH.
jar works fine for me, except for files created with 7zip and some of its fancy
options.
It's very unlikely that zip creates an ASCII file. Perhaps IBM-1252, UTF-8,
Quoted-Printable.
Base64,
Thank you! Wonderful. This is probably the BCD Assist that is mentioned in
https://www.websphereusergroup.co.uk/wug/presentations/40/Whats_new_In_IBM_Java_8.pdf
.
René.
> On 23 Mar 2023, at 03:29, Andrew Rowley wrote:
>
> On 23/03/2023 11:39 am, David Crayford wrote:
>> FYI, the OpenJ9 JIT ca
On Wed, 22 Mar 2023 11:30:44 -0400, Steve Smith wrote:
>That's a far more elegant and supported way to do it. Although the loop is
>presumably part of some other logic. I converted it into a simple demo
>exec:
>
I'm curious, too.
Why the loop?
Why the SLEEP?
Have you an example where they help?
On Thu, 23 Mar 2023 08:18:08 -0500 Scott Ballentine
wrote:
:>Dynamic Information Retrieval doesn't read the data set to determine
information - it looks at what is known about it in SWA. So unless it knows
the information you're looking for - for example, the DD is coded in JCL and
has the re
I am sure that such a utility exists, but not finding it.
I hope I don't have to do STARTIO coding for this.
--
Binyamin Dissen
http://www.dissensoftware.com
Director, Dissen Software, Bar & Grill - Israel
--
For IBM-MAIN subs
Try this
//STEP1EXEC PGM=ADRDSSU
//SYSPRINT DDSYSOUT=A
//DASD DDUNIT=3380,VOL=(PRIVATE,SER=11),DISP=OLD
//SYSINDD*
PRINT TRACKS(1,0,1,5) INDDNAME(DASD)
/*
From
https://www.ibm.com/docs/en/SSLTBW_2.2.0/com.ibm.zos.v2r2.adru000/dgt3u2128.
htm
Lionel B. Dyck <><
Web
Did anyone face an issue with CICSTS56 deployment job (IZUD01UZ unzip) with
RACF issue. Looks like a bug with the install job, and I tried to bypassacs
that also failing with syntax error.
Appreciate any leads on this?
RESTORE INDD(SYSUT1) -
DATASET(INCLUDE( -
ADRDSSU or AMASPZAP perhaps?
Mark Jacobs
Sent from ProtonMail, Swiss-based encrypted email.
GPG Public Key -
https://api.protonmail.ch/pks/lookup?op=get&search=markjac...@protonmail.com
--- Original Message ---
On Thursday, March 23rd, 2023 at 1:32 PM, Binyamin Dissen
wrote:
> I
On Thu, 23 Mar 2023 10:03:50 -0400, Joseph Reichman wrote:
>Seymour “respectfully ” that’s for QSAM in locate mode BSAM doesn’t have a
>locate mode the user supplied the I/O area
>
My (very old) experience with BSAM agreed with what Seymour says.
Why are you trying to use BSAM. QSAM is easier.
I’m actually doing a presentation at work
( I hope Seymour will attend )
Most programs here are qsam locate mode
But there are some BSAM
All most all amode 24 rmode 24
> On Mar 23, 2023, at 1:43 PM, Paul Gilmartin
> <042bfe9c879d-dmarc-requ...@listserv.ua.edu> wrote:
>
> On Thu, 23 Ma
There are some SAF requirements in order to succesfully execute deployment
jobs; define profiles for CB.OS*.** and CB.ST*.** is one of them:
"To deploy a ServerPac Portable Software Instance with z/OSMF Software
Management, observe the following requirements:
* The user ID that you use must
Thanks.
ADRDSSU is the way to go.
On Thu, 23 Mar 2023 12:39:22 -0500 "Lionel B. Dyck" wrote:
:>Try this
:>
:>//STEP1EXEC PGM=ADRDSSU
:>//SYSPRINT DDSYSOUT=A
:>//DASD DDUNIT=3380,VOL=(PRIVATE,SER=11),DISP=OLD
:>//SYSINDD*
:> PRINT TRACKS(1,0,1,5) INDDNAME(DASD)
:>/
The code is taken from a routine I've had running for some time and rather
than change it and potentially introduce an error I left it alone. The loop
is simply to check that server has not ended every 2 seconds. I think I got
the idea from an IBM sample that uses a similar technique to call the
Ca
On Thu, 23 Mar 2023 18:46:43 -, Steve Austin wrote:
>... The loop
>is simply to check that server has not ended every 2 seconds.
>
I see. Thanks.
>I think I got
>the idea from an IBM sample that uses a similar technique to call the
>Catalog Search Interface from REXX. I didn' t expect
On Wed, 22 Mar 2023 10:36:12 -0500, Charles Mills wrote:
>I am not a user of typesetting languages so I have no real personal feelings,
>but I know others here have expressed a fondness for LaTeX, so this
>announcement caught my eye.
>..."
>The example seems pretty cool to me.
>https://githu
After lurking for on here for years, it's nice to have contributed something
some found useful. Please excuse my poor attempt at humour.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Paul Gilmartin
Sent: Thursday, March 23, 2023 6:59
On Thu, 23 Mar 2023 at 08:57, Joseph Reichman wrote:
> STORAGE OBTAIN,LENGTH=(R0),ADDR=(R7),LOC=(31,64),SP=233
Does BSAM (or EXCP for that matter) support above-the-bar real storage
for I/O operations? Format-2 IDAWs or MIDAWs and all that?
Tony H.
---
BSAM really isn't that hard, and I didn't see any errors that he didn't
correct. I don't know why he's running AC(1), but I also don't know why it's
acting as though he had FIX=USER. If I had access I'd be looking at the
relevant control blocks.
Are both IEZIOB and IGGIOBEX available for custom
You don't need STARTIO to read an arbitrary track, although you do need AC(1)
and SAF rights.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Binyamin Dissen [bdis...@d
Why use unzip -a if the data are anything but ASCII? use unzip and a separate
iconv. You might need another step to deal with line endings; I don't recall.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-
DITTO/ESA V1R3 User’s Guide, SH19-8221
Does anyone have a .pdf copy of this document that could be emailed to me?
michael.watk...@cpa.texas.gov
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lis
On Thu, 23 Mar 2023 20:41:40 +, Seymour J Metz wrote:
>Why use unzip -a if the data are anything but ASCII? use unzip and a separate
>iconv. You might need another step to deal with line endings; I don't recall.
>
unzip -a also fixes CRLF.
z/OS pax also does code page conversion. (But not r
EXCPV4 does. For anything else, consult the PLM (curse you, OCO!)
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Tony Harminc [t...@harminc.net]
Sent: Thursday, March 2
Fixes CRLF, but also uses a wired-in translation table. The point of using -b
is to do your own translation, but that means no CRLF conversion.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSE
On Thu, 23 Mar 2023 21:06:39 +, Seymour J Metz wrote:
>Fixes CRLF, but also uses a wired-in translation table. The point of using -b
>is to do your own translation, but that means no CRLF conversion.
>
A one-line "sed" or "tr" script can fix CRLF.
To what code pages does the wired-in trans
On Thu, Mar 23, 2023 at 04:16:10PM -0400, Tony Harminc wrote:
> On Thu, 23 Mar 2023 at 08:57, Joseph Reichman wrote:
>
> > STORAGE OBTAIN,LENGTH=(R0),ADDR=(R7),LOC=(31,64),SP=233
>
> Does BSAM (or EXCP for that matter) support above-the-bar real storage
> for I/O operations? Format-2 I
I just sent you an e-mail (2 actually). Did you get them?
Rex
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
Michael Watkins
Sent: Thursday, March 23, 2023 3:55 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] DITTO/ESA V1R3 User’s Guide, SH19-8221
DITTO/ESA V1
I haven't seen them on my GMU account. Did you drop the 3 from smetz3?
From: IBM Mainframe Discussion List on behalf of
Pommier, Rex
Sent: Thursday, March 23, 2023 5:33 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DITTO/ESA V1R3 User’s Guide, SH19-8221
is this what you are looking for? you might find it on cbttape.org or on
MVS380 distribution
Zap** Top of Data
//HERC01A JOB CLASS=A,REGION=0K,MSGCLASS=A,MSGLEVEL=(1,1)
//* Now provide some documentation
//*
http://www.info-zip.org is a good bet. Whatever product/freeware you choose it
needs to more or less conform to this format...
https://pkware.cachefly.net/webdocs/APPNOTE/APPNOTE-6.2.0.txt
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
MARTIN, MIKE
Sent: Thursday
65 matches
Mail list logo
