Worldline's Cardlink II is a(nother) card management services application.
Cardlink II's customer base tends to be concentrated in Asia-Pacific.
—
Timothy Sipples
Senior Architect
Digital Assets, Industry Solutions, and Cybersecurity
IBM zSystems/LinuxONE, Asia-Pacific
sipp...@sg.ibm.com
Agreed on all points:
Errors: disp5ay --> display and repeated "If RC Not = 0 Then" near the end of
the program code. I'll send an RCF on that one.
I added a pseudo-random initialization of the zinput area based on the RANDOM
function with a seed of the current CCYYMMDD date and it does work
The example has two bugs in it (a typo and a repeated line), but fixing those
it does appear to work. A better test would have been to compress something
other than just binary zeroes, and also to re-init the "input" (now output)
area so you can actually "see" it work (in the debugger).
A DASD record is a physical block. Contents of the block depend on
the RECFM=, i.e. U for load modules, VB for variable blocked, FB for
Fixed Blocked.
On Wed, Apr 26, 2023 at 6:11 PM Seymour J Metz wrote:
>
> The DASD documentation uses the term record.
>
>
> --
> Shmuel (Seymour J.) Metz
>
The DASD documentation uses the term record.
--
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...@listserv.ua.edu]
Sent:
Yes, but IBM would have given the same ABEND code had they done a READ CKD and
compared.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Steve Thompson
There is a BUFL parameter, but it's not needed in this case; LRECL=max,
BLKSIZE=max will do the job.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of
Charles Mills
MFA is a separately charged product from IBM, and is licensed in blocks of 500
users. So there will be a software purchase and install on top of the racf
changes
Dave Jousma
Vice President | Director, Technology Engineering
Fifth Third Bank | 1830 East Paris Ave, SE | MD RSCB2H |
Isn't this the result of a CCW that does not have the wrong
length Record suppression bit on (I think that is what it is
called, been a long time since I did any CCWs and SSCH commands).
Steve Thompson
On 4/26/2023 6:08 PM, Paul Gilmartin wrote:
On Wed, 26 Apr 2023 13:44:21 -0700, Michael
+1
Storage is a lot cheaper than programmer time writing exits and bit-twiddling
DCBs.
Isn't there a BUFL parameter that accomplishes the same thing and can be used
without regard to actual BLKSIZE (in the case of RECFM=FB)?
CM
On Wed, 26 Apr 2023 17:08:54 -0500, Paul Gilmartin wrote:
>On
On Wed, 26 Apr 2023 13:44:21 -0700, Michael Stein wrote:
>> 000234D0 E6D9D5C7 4BD3C5D5 4BD9C5C3 D6D9C46B | WRNG.LEN.RECORD, |
>
>A likely result from reading a block larger than the blksize.
>
Why does it say "RECORD" if it means "Block"?
>...
>What does the *SOURCE* DCB & JCL
> where do you put it and what else do you do?
Ray and David have half of the answer. Specifically, you put it in a
constructor for a static class instance. The first "user code" that C++ runs --
before int main() -- is static class constructors.
What else do you do?
Charles
-Original
DCBOFLGS='30'X=DCBOFEOV+DCBOFOPN
DCBLRECL='C8'X=100
DCBBLKSI==3E8'X=1000
The OPEN exit needs to
OIDCBOFLGS,DCBOFPPC
From: IBM Mainframe Discussion List on behalf of
Pierre Fichaud
Sent: Wednesday, April 26, 2023 3:28 PM
To:
> 000234D0 E6D9D5C7 4BD3C5D5 4BD9C5C3 D6D9C46B | WRNG.LEN.RECORD, |
A likely result from reading a block larger than the blksize.
> DCB
>
> 000224D8.:0224DF. LENGTH(X'08')--All bytes contain X'00'
> 000224E0 01D1 00F43026 002FE5A2 05025C70 | .J...4Vs..*. |
>
Seymour,
SYNAD msg
00023475 008000 7C00 0260 |
.@- |
00023480 6003E840 40404040 40404040 40404040 | -.Y |
00023490.:02349F. LENGTH(X'10')--All bytes contain X'40', C' '
000234A0 40404040 40406BE3 C8F1F2F7
I've done it (called the Binder Fast Data API from COBOL). My program returns
interesting data about PDSE program object modules, such as the sections,
compiler versions and compile dates, binder information, user data IDRs, and so
on.
The hardest part was dealing with modules with enormously
Since this is C++, I'd stick it in a constructor for main, or (less
desirable) main::init(). No LE games needed.
Cheers,
Ray
On 2023-04-25 14:26, Charles Mills wrote:
Setting ARCH is like playing Blackjack or Twenty-one: guess too low and it is
sub-optimal; guess too high and you bust.
Note
I agree, but failing that they can (and should) at least put in a reference to
the COBOL documentation.
Yeah, calling the Binder Fast Data API (or even worse the "regular" Binder API)
from COBOL would be a stretch to document. Not sure I would even attempt that
one, and I have written code to
Thanks.
That seems like an odd place to put it. What's next, a chapter on how to call
the Binder Fast Data API from COBOL?
I'd think this chapter should be in the Callable Services for High Level
Languages manual.
-Original Message-
From: IBM Mainframe Discussion List On Behalf Of
what is needed to implement MFA (Multi Factor Authentication) in RACF aside
from the RACF changes?
would network changes be needed also?
thanks
Bill
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email
Wasting more time searching the internet about zEDC I came across several
articles about SMF record compression when using log streams. It sounded
almost like you did not need the zEDC Express software feature. So, I coded
compress for the TECH LPAR, and did a SET SMF=xx. It failed with
Yes. You don't need to license zEDC for JES2 to use it for spool compression.
Mark Jacobs
Sent from ProtonMail, Swiss-based encrypted email.
GPG Public Key -
https://api.protonmail.ch/pks/lookup?op=get=markjac...@protonmail.com
--- Original Message ---
On Wednesday, April 26th, 2023
I'm pretty sure that there won't be any progress without the contents of the
DCB at the time of failure; the current IOB might help. And if there is a
SYNADAF, its output would also help.
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From:
The drill is first do a scan, then a parse. If you're using TEST[AUTH] CP, then
you are prompted for a complete command and that's what you should enter. The
fact that you provided a member name doesn't change that. So
TEST MYPDS(FOO) CP
FOO 666 ASID(1)
...
--
Shmuel (Seymour J.) Metz
I happened to come across a PDF document from the 2020 NY Tampa Bay RUG titled
Protecting SPOOL with pervasive encryption and other recent JES2 security
changes.
Stepping away from the encryption part, I found a section concerning JES2
compression of output, via the OUTCLASS paramter, using
An off-list communication from another interested party pointed me to this link
to the online Enterprise COBOL Programmers Guide V6.4, which has exactly the
documentation I have been requesting, at least for COBOL programmers:
Chapter 36. Using zlib compression from a COBOL program
On Wed, Apr 26, 2023 at 08:00:07AM -0500, Pierre Fichaud wrote:
> Seymour's response made me realize that my post was incomplete.
Yes, source? JCL? I/O error info (CSW IOB stuff, sense data..)
DCB contents: LRECL/BLKSIZE/RECFM?
It's some sort of I/O error but what?
. incorrect length (caused
Thanks that worked
So if I developing a subcommand for TEST/TESTAUTH
For example LA ( list authorized ) to list storage not normally accessible by
the list subcommand
The INBUF pointer from TCOMTAB
would it have the LA sub command string or only
12345688 ASID(11)
Thanks
> On Apr 26,
Are you entering the string in response to this prompt?
IKJ57090A ENTER COMMAND FOR CP
If so, the first thing you enter on the line is treated
as the name of a command, not an operand, and
the operands begin with the second thing on the line.
Try entering something like this instead:
foo
On 4/26/23 01:44, David Crayford wrote:
On 25/4/23 20:48, Rick Troth wrote:
good questions
The library that I want to call is "just C", pretty clean, standard
POSIX. My development platform is PC Linux. The package gets built
and tested on other platforms as often as I can drive that,
Seymour's response made me realize that my post was incomplete.
I'm trying to read a concatenation of unlike data sets using QSAM.
The first dataset is VBS with LRECL=200,BLKSIZE=1000
The second dataset is VBS with LRECL=230,BLKSZIE= 1150.
I've coded a DCB OPEN exit that sets a re-read flag.
I
There is a port of PCRE, which has named captures.
How hard would it be to port ooRexx 5.0, including glue code for existing
applications?
From: IBM Mainframe Discussion List on behalf of
David Crayford
Sent: Wednesday, April 26, 2023 1:44 AM
To:
What I would like to do is drive the validity check exit the first operand
is a address and would like to verify via VSMLOC or if its 64 bit IARV64
REQUEST=LIST
But the string never hits the exit "LSTVALAD"
Trying to write a TESTAUTH subcommand to display data that regular L or LIST
command
The IKJIDENT looks okay although it would be easier to read if you broke it at
a comma rather than at column 71.
Please show the code that sets up IKJPARSE, starting at entry..
--
Shmuel (Seymour J.) Metz
http://mason.gmu.edu/~smetz3
From: IBM
Can you get this to work if you enter it as a quoted string?
e.g. '12345688 ASID(14)'
IKJIDENT should accept quoted strings according to the doc.
Do I assume your comments on using the ADDRESS keyword are for IKJPOSIT?
Lennie
-Original Message-
From: IBM Mainframe Discussion List On
35 matches
Mail list logo