Why does IBM have this compulsion to be different from everyone else
and invent its own terminology rather than using a conventional,
well-understood word such as bijective?
Because bijective is not so well understood by anyone born before 1952 or so.
The term relates to SET Theory, which was a
But in today's world, without SCRATCH in the definition, the oldest GDG does
not get scratched. It gets rolled off the GDG base and becomes a normal
cataloged dataset entry. So it stays in the catalog, and can be referenced by
absolute name. I wonder if this would ever be of some use to
Fujitsu used to make a SCSI-2 tape drive with 3490E capability. I believe the
line was sold to Computer Peripherals Unlimited, Inc.
There is a web page at: http://www.fujitsutape.com/3490e.html
Note also that they offer a data conversion service, so I suppose they will for
a fee read a
Just curious: how would you mask names and addresses? Of course, if these
are not used as keys some constraints such as uniqueness are relaxed.
-- gil
Our data records have fields for first name, last name, and gender. They of
course do not need to be unique. But the masking algorithm must
snip
As input I have a dataset with a list of dataset
names from a catalog (really several catalogs),
in columns 1 thru 44. What I want to do is
include or exclude dataset names in the file
based on patterns like you might enter on ISPF 3.4
xxx.yyy.*.zzz.**
I don't know if DFSORT can do this. I'm not too familar with the advanced
stuff. But that pattern matching is exactly where regular expressions would
be a perfect fit.
Aw, you beat me to it John, just like I predicted.
I would say more, but I fear the small, but very vocal, anti-UNIX members.
How about a table of 1,000 numbers that translates a specific 3 digit
number to another 3 digit number.
Use it 3 times on 3 parts of your 9 digit number.
This would probably work for me. But if you carry it to the extreme, why not
nine different translation tables of 10 entries each?
I am sure
I can foresee that my organization will soon need to provide test data to an
external vendor. This test data will need to be generated by masking subsets
of real production data, since crafting fictional test data would be an
impossible undertaking in the time we have available.
So all
If you have ICSF configured you might be able to use one of the One-Way
Hash Generate Callable Services (CSNBOWH or CSNBOWH1 and CSNEOWH or
CSNEOWH1)
I don't know if we have ICSF installed. But even if we did, I would doubt if
any hash function could meet my requirement #2 (uniqueness) and
Do you need to keeping the masking values between runs? I.e. must the masked
value be the same for the same input on multiple runs?
No - we will extract a full set of PROD data, mask it, and then burn a DVD for
our vendor. If they ask for a refresh, we will just repeat using current PROD
Surely you don't actually use all billion values.
No, but generating index values on demand is a complication I would like to
avoid. But for a million values, the masked values could be pre-generated.
And I could generate multiple such indexes by simply using a different seed
value for the
If it is the U.S. tax number, about 700M have been issued since
inception and 300M in use every year.
I can't even mention what specific type of nine digit number we are discussing.
Because if I put that TLA in my messages, Tumbleweed Secure Messenger will
start intercepting my emails.
Surely you don't actually use all billion values.
No, and don't call me Shirley.
(sorry, its Friday ;-) )
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the message:
Do you actually have a billion numbers in your data? If not, my thought would
be to only generate as many mapped keys as you have unique live keys. That's
what the pseudo code meant to say. Don't generate a key until you need one.
You could even do this using VSAM as the data store. Or, even
Now, folks want to assert that today's youngsters are too stupid to turn
into COBOL programmers? Well, dang it, sonny - the same thing was said
about us back in the day - and see how that turned out.
I don't think anyone is trying to claim that younger people can't learn COBOL.
After all, I
When the last Cobol programmers walk out the door, so may 50 years
of business processes within the software they created. Will you be
ready?
http://www.computerworld.com/s/article/9227263/The_Cobol_Brain_Drain?
taxonomyId=154
Ed, Interesting article and fairly accurate IMO.
This is what
You have received a secure message from Roberts, John J entitled, RE: XML
Parsing.
You may view the message (before 05/30/2012) at the following web address:
https://dhstw1.dhs.state.ia.us/messenger/msg?x=d-1416193-zTDA9CU6
On 4/19/2012 2:56 PM, Roberts, John J wrote:
For the code critics: I know it could be better with UNSTRING, and it would
be trivial in PL/I or C. But as it is, it works. Improvements are for the
young. Us old-timers have only so many more clock cycles left.
It has no GOTOs. Gasp! :-)
I
John Roberts has resolved your problem. You need a reusable zero-th
step that sets the return code.
Something I have done before is create a little program that accepts as PARM a
list of comma separated values, like:
//S000 EXEC PGM=TESTPARM,PARM='SYM,CAT,DOG,COW,MOOSE,SQUIRREL'
The
For anyone who would care to have source code for my little TESTPARM JCL aid,
it is reproduced below.
For the code critics: I know it could be better with UNSTRING, and it would be
trivial in PL/I or C. But as it is, it works. Improvements are for the young.
Us old-timers have only so many
Another option is to pass the parameter as PARM information to a first step.
The program for the first step would inspect the PARM and set its return code
accordingly. Subsequent steps could be made conditional on the return code of
this first step.
John
My experience as a SYSPROG was a while back at a smallish insurance company in
Vancouver. IIRC, this was a mid-size ES9000 running OS/390, CICS/ESA, and DB2.
I think we had TCP/IP networking via Token-Ring attachment to a 3174
controller. I know we all ran DOS PC's running some 3270 emulator.
We are a CICS shop with IMS DB (DBCTL), but I've been curious for a while
about the differences between how CICS works and how IMS TM works. I
couldn't find anything on the web. Anyone have a link to a good reference?
Try Google for IMS DC. The IMS Transaction Manager used to be called
One day I got a call from the production people about an OC4 (in
LISTCAT) . I looked at it a little and since it was a vendor program
I called up their support line.
AFter a few minutes on the phone I got a not to nice of a response:
DEBUG it yourself
Now I know the product cost very little
We just need a simple inventory control product that could answer interactive
queries (E.G., What JCL uses this file? Where is this program used?) by
programmers and technical support staff.
I asked a related question last November (see the thread entitled Scanning
JES3 JCL). I am wanting to
snip
And there is a general belief that the people who know about mainframes are
old, too, you know, like the guy with the COBOL skills and dubious hygiene who
shuffles along the corridor, looking like he eats his blue-plate special at
4:30 in the afternoon.
/snip
I am offended that anyone
Well, the runs counter to the many sites that moved their applications
to PL/1, including State Farm (who trained 1,500 non-programmers to use
PL/1 in a 9 week course - those with musical ability, mathematical degrees,
or knowledge of two or more languages accounted for 90% of the folks who
were
I am a cross-platform kind of guy. So if I had this task, I would do it as
follows:
(1) Use ISPF 3.1 to generate the member lists for all the libraries.
(2) FTP the member list files to my Windows PC.
(3) Write a little VB.Net program to scan the member list reports and build
John, I'm glad that you have been able to master shell script coding, and Unix
tools like awk, sed, grep, etc. You must have bought a lot of those O'Reilly
books with all the strange critters on the covers ;-).
I tried too, but I could never get the hang of it. I guess if you don't use it
Although there may be some 'success' stories the issue I have with most
vendors is where they tout - We migrated this company off the mainframe
and save 10,000+ MIPS. In reality they probably moved a small
application of about 1000 - 2000 MIPS which happened to be the last one
on the mainframe.
Subject: Re: 21st Century Migrates Mainframe with Clerity
Last I heard, they were a relatively small Prop/Casualty insurer
Certainly not a State Farm, Prudential, Farmers, Allstate,.
Just the same, Clerity has had a few high profile successes doing migrations.
The NYSE used the
One of our developers is performing an XML GENERATE with a string that's
variable. When it gets above
about 100K, it ASRA's. No error codes or anything.
David, you might want to ask Paul Cooper over on the CICS-L listserv, since I
think you are doing XML GENERATE in the CICS context (ASRA
Going back to fundamentals, my recollection is that this information is not in
the VTOC (F1 DSCB), nor is it to be found in the catalog. So it is only to be
found in the SMF data. I hope I have it right so far.
One implication could be that for certain ancient datasets, there will be no
Every so often I'm asked if I can report what date a member of a PDS
(generally a member of the production procedure library) was last read,
and the person who asks seems surprised when I say the answer is no
Greg,
When users ask such questions, what they are really wanting to know is one of
Google is Your Friend: http://wweb.uta.edu/faculty/trethard/Humor/TheEndOfOS.PDF
Does anyone remember, and better still, have a copy of a humourous piece
poking fun at IBM from years ago called (as I recall) The End of OS?
--
You have received a secure message from Roberts, John J entitled, RE: Data
encrypt.
You may view the message (before 12/15/2011) at the following web address:
https://dhstw2.dhs.state.ia.us/messenger/msg?x=d-801006-VUpGvX5q
I can't remember the last time I used IEHPROGM.
So I wonder - Is there any function of IEHPROGM that is not duplicated in some
more modern utility? Is the only reason for its continued existence for
compatibility with old legacy JCL? Or just in case somebody is nostalgic for
CVOL catalogs?
Maybe this article is of interest to you:
http://www.ncbi.nlm.nih.gov/pmc/articles/PMC1070001/
This is a publication of the Federal National Institutes for Health.
John
--
For IBM-MAIN subscribe / signoff / archive access
What would the folks in New Foundland do?
I hope this doesn't degrade into a Newfie Joke thread. Its only Tuesday.
--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@bama.ua.edu with the
I think Big D is going to whack us with a 2x4 pretty soon ;-)
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
Bill Fairchild
Sent: Tuesday, November 08, 2011 3:04 PM
To: IBM-MAIN@bama.ua.edu
Subject: Re: OT measures was Re: Out damn'd GMT
On 11/4/2011 11:31 AM, Clark Morris wrote:
Canada may be officially metric but I am looking at an advertisement
for meat at $4.99 a pound at my local grocery here in Nova Scotia,
Canada.
Canada is all screwed up G We bought jewelry, chocolates, and
a book at a Halifax mall, and each receipt
No offense please, I really admire You old wrecks!
It doesn't take much to set it off. All I did is mention OS/360 and 384K to
start the ball rolling.
We should really do a mainframe version of the Monty Python Four Yorkshiremen
sketch. Now who to cast ... :-)
Ed, I'll hazard a guess that the second message was emitted from some ASM code,
but the others were probably PL/S.
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@bama.ua.edu] On Behalf Of
Edward Jaffe
Sent: Thursday, November 03, 2011 3:09 PM
To:
Shmuel Wrote:
Were procs in the original design? I know that symbolic parameters
weren't.
They may not have been in PCP. But I am 99% certain they were in OS MFT R18
which was my earliest experience, back in 1970.
It would have made a lot more sense to treat PROC's as a special
kind of MACRO
Thanks to all that have contributed to this thread. To summarize what I have
heard so far, there seems to be two basic ideas:
(1) Post Process the JES Messages to extract the expanded JCL after a
TYPRUN=SCAN or EXEC PGM=JCLTEST.
(2) Use EXEC PGM=JSTTEST to generate special messages in the JES
You have received a secure message from Roberts, John J entitled, RE: Scanning
JES3 JCL.
You may view the message (before 12/01/2011) at the following web address:
https://dhstw2.dhs.state.ia.us/messenger/msg?x=d-753142-NgiROjKk
For those who wonder what you get with EXEC PGM=JSTTEST, see below:
First the original JCL:
//COMPEXEC PROC=COBPDS,MBR=S470N125,
// CPARM='DATA(24),TRUNC(BIN),SIZE(4096K),XMLPARSE(XMLSS)',
// COBLIB1='X470.Z002',
// COBLIB2='X470.Z000',
//
You have received a secure message from Roberts, John J entitled, RE: Scanning
JES3 JCL.
You may view the message (before 12/01/2011) at the following web address:
https://dhstw2.dhs.state.ia.us/messenger/msg?x=d-753124-6Rr2tXKF
You have received a secure message from Roberts, John J entitled, RE: Scanning
JES3 JCL.
You may view the message (before 12/01/2011) at the following web address:
https://dhstw2.dhs.state.ia.us/messenger/msg?x=d-753576-OvgsLMRH
Of course, if you don't know Perl or awk, this become problematic. I may give
a look at this. But I need to download some of the JESJCL portions of some
jobs that I've run. In the words of Arnold: I'll be back!
I am one of those mile wide, inch deep kind of guys. So never more than a
brief
In spite of several tries, I can't seem to post any of my EXEC PGM=JSTTEST
results to the list. At my installation we have this thing called Tumbleweed
Secure Messenger. When I send messages outside my own domain, this software
makes a decision: should I pass the message text thru unchanged,
Julian,
If you are scanning the original source and doing the library fetches to
resolve PROCs and INCLUDES, I should think the JES2/JES3 differences would be
minor.
If you are scanning the JESLOG for the expanded JCL listing, there might be a
bit more work, but I should still think that a
At this installation we have a business rules engine from a company called
Corticon. The interface to the Corticon servers is via SOAP web services. We
also have Windows Web Servers that expose ASP.Net Web Services.
We need to be able to access these web services from Batch COBOL programs. I
I have a requirement to generate cross references of JCL Source. I need to
have a database that I can query to answer questions like this:
1. What job/jobstep/ddname references dataset A.B.C?
2. What job/jobstep references program XYZ?
3. What datasets does job J123
Would it be feasible to submit the job with TYPRUN=HOLD (TYPRUN=SCAN is
irreparably
broken) and scan the resolved JESJCL with SDSF, then cancel it?
No SDSF at this shop, yet. We use $AVRS and some other piece of junk which is
a small improvement on ISPF 3.8.
But you might be on the right
Can you submit the jobs (held if necessary) and post-process their JESJCL DD
output? You should be able to extract that DD to a data set using whatever
spool
browse tool you have in-house. You can even do this with the TSO/E OUTPUT
command.
I will try this and report back to the list.
I take
I have only been on this list a short while. But this past week seems to have
reached a new high (low?) for email flames. So let us end the week with an
uplifting message that I am sure many of the mainframe generation will remember.
The Lyrics to Get Together as performed by the Youngbloods,
Could You post a corrected version of the code, please ?
I wrote it a long time ago, and it still works at this installation.
The defects others have pointed out may or may not affect you.
So for me, it is a case of if it ain't broke, don't try to fix it. I will
leave it to the others to
Dave,
This is a data migration problem, something very common in mainframe
migration/modernization projects. There are ETL tools (Extract-Transform-Load)
to help with doing such projects.
But first you need to establish the goal of migrating the data. From what you
describe, I could see
Dave,
In 2006 I did a project in Ohio to offload a bunch of data files to MS SQL.
They had completed a SAP implementation, but had not bothered to deal with all
the historical data left behind on the old mainframe. They had VSAM files,
QSAM disk files, thousands of tapes, and even a few IMS
The life expectancy (readability) is at most 10 years for DVD and CD's .
Whenever you are archiving data, you need to ask the question: what is the
expected Standard of Care.
IMO, data archival is often a CYA proposition. You may think that the data is
a bunch of old junk, but you are unsure
My little subprog:
***
*SUBROUTINE TO OBTAIN SYSTEM INFORMATION *
***
GETJINFO CSECT
GETJINFO AMODE 31
GETJINFO RMODE ANY
LENTRY
I need to know the dataset names of the files that are allocated (DD stmts) of
a STC.
Can some one point me to the initial CB, I looked at TCB , do I assume this is
the place to start ?
Start with the PSA at absolute address zero (IHAPSA). Field PSATOLD contains
the address of the current
The solution I suggested presumes that you are adding code to the STC program
itself (inside looking out).
If you are on the outside looking in (i.e. another task wants to see what
resources the STC is using), then my solution won't work, since most of the
control blocks are in the private
On 10/19/2011 5:29 PM, Roberts, John J wrote:
My little subprog:
SR1,1
ICM 1,B'0111',TIOEJFCB LOCATE JFCB
MVC 10(44,15),16(1)
This always works only in older systems. For current ones, the
TIOEJFCB field is a double index into SQA, and you need to use
Why not print it all out? Then get an army of Monks to transcribe to archival
parchment scrolls using quill pens and an ink formula from about 2000 years
ago. Seal the results into ceramic pottery vessels and place in a cave,
somewhere near the Dead Sea. Roll a big rock in front of the cave
There are gateway products that allow MSMQ to interface with IBM MQ.
But I think the OP wants to avoid any configuration requiring any flavor of MQ.
In this case the OP needs to ask the 3rd party vendor what other interfacing
alternatives exist. For example, is there a possibility for a web
Anyone have any idea what is going on here? This looks to me like the email
I am receiving is ill-formed.
Some installations have special handling for email sent to addresses outside
the home organization. The email is intercepted and stored in a database.
What gets sent to the
(2) Upgraded our OS from OS/MFT to OS/MVT. We can now run seven jobs
concurrently!!!
H, I'm smelling something fishy. What resources are used concurrently?
In 512 KiB? Not bllody likely!
Those programmers and their jobs are probably very economically with all
those bits and bytes... :-D
Hal Merritt Posted:
I think we seem to be missing a basic chicken-and-egg issue. If I understand,
the OP wants to -originate- the message from the console and does not say
who/what is the intended recipient.
I think Sergio is having trouble explaining his requirements, since English is
My use was deliberate, suggesting that PROCs and temp DSNs,
two facilities his client considers ultramodern, antedate the 029.
HA HA HA
You guys are just jealous. We have been making great strides here are Trailing
Edge Computers. Things we have achieved lately:
(1) Upgraded from S360/30 to a
Sergio,
Many years ago, at another installation, I had a batch utility program that
worked like this:
//WTOR EXEC PGM=MYWTOR,PARM='PLEASE REPLY ''Y'' TO CONTINUE OR ''N'' TO
STOP|Y|N'
The program would send the message (up to the first delimiter), wait for the
reply, and then analyze
My current client has long avoided any of the modern JCL enhancements. For
example, PROCs are very rare. As are temporary datasets.
I am trying to upgrade some of the batch apps with PROC/JCLLIB/SET/INCLUDE/IF
etc.
One of the impediments to the upgrade is the existence of custom JCL XREF
Below is code from CBT file 270 (www.cbttape.org). It could be what you are
looking for.
//WTO00150 JOB (2100,56-D),'LLUEB 0679 T',CLASS=H,MSGCLASS=T
//JOBCAT DD DSN=SYS1.SOFTCAT,DISP=SHR
// DD DSN=SYS1.USERCAT1,DISP=SHR
I think she is retired nowit's been around 40 years since she was walking
on the beach.
The Girl from Ipanema (Astrud Gilberto) was pretty hot in 1964 and I'll bet she
still looks good today. But if she isn't available, then maybe her
granddaughter will stand in :-)
In case you missed
Given a large file - say 2TB or so on the mainframe. Let's say it's a PS
file without any packed fields.
A process on a remote unix machine needs to read this data.
===
I am thinking that the transfer of a 2TB file isn't going to
76 matches
Mail list logo