Re: VSAM file as GDS

[Wayne Bickerdike]

Just take off the LIKE parameter. The GDG should have a model DSCB. Why
make things so hard?



On Thu, Jun 22, 2017 at 12:03 PM, Steve Beaver 
wrote:

> Was it done in the same job?
>
> Steve
>
> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Frank Swarbrick
> Sent: Wednesday, June 21, 2017 4:11 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: VSAM file as GDS
>
> Developer did more testing and found that even though it successfully
> created generation 1 when an attempt was made to create an additional
> generation it failed.  :-(
>
> IEF344I TESTREP STEP01 FILEOUT - ALLOCATION FAILED DUE TO DATA FACILITY
> SYSTEM ERROR
>
> IGD17101I DATA SET PROD.CONNDEF.PATM.BKP.G0001V00
>
> NOT DEFINED BECAUSE DUPLICATE NAME EXISTS IN CATALOG
>
> RETURN CODE IS 8 REASON CODE IS 38 IGG0CLEH
>
> IGD17219I UNABLE TO CONTINUE DEFINE OF DATA SET
>
> 
> From: IBM Mainframe Discussion List  on behalf
> of
> Frank Swarbrick 
> Sent: Wednesday, June 21, 2017 2:24 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: VSAM file as GDS
>
> Learn something new every day.  Another developer created a GDG
> (PROD.CONNDEF.PATM.BKP) and then a job step that has the following:
> //STEP02   EXEC PGM=IDCAMS,COND=(4,LT)
> //FILEIN   DD DSN=PROD.ONLINE.CONNDEF.PATM,
> //DISP=SHR
> //FILEOUT  DD DSN=PROD.CONNDEF.PATM.BKP(+1),
> //LIKE=PROD.ONLINE.CONNDEF.PATM,
> //DISP=(NEW,CATLG,DELETE)
> //SYSINDD DSN=PROD.PARM(REPRO),
> //DISP=SHR
> //SYSPRINT DD SYSOUT=*
> I though for sure this would not work, as PROD.ONLINE.CONNDEF.PATM is a
> VSAM
> KSDS.  But it appears it in fact did work:
> PROD.CONNDEF.PATM.BKP
> PROD.CONNDEF.PATM.BKP.G0001V00
> PROD.CONNDEF.PATM.BKP.G0001V00.DATA
> PROD.CONNDEF.PATM.BKP.G0001V00.INDEX
>
>
> I'm not sure how comfortable I am with it, though.  Any harm in doing this?
>
> Frank
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email
> to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
Wayne V. Bickerdike

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: VSAM file as GDS

[Steve Beaver]

Was it done in the same job?

Steve  

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
Behalf Of Frank Swarbrick
Sent: Wednesday, June 21, 2017 4:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: VSAM file as GDS

Developer did more testing and found that even though it successfully
created generation 1 when an attempt was made to create an additional
generation it failed.  :-(

IEF344I TESTREP STEP01 FILEOUT - ALLOCATION FAILED DUE TO DATA FACILITY
SYSTEM ERROR

IGD17101I DATA SET PROD.CONNDEF.PATM.BKP.G0001V00

NOT DEFINED BECAUSE DUPLICATE NAME EXISTS IN CATALOG

RETURN CODE IS 8 REASON CODE IS 38 IGG0CLEH

IGD17219I UNABLE TO CONTINUE DEFINE OF DATA SET


From: IBM Mainframe Discussion List  on behalf of
Frank Swarbrick 
Sent: Wednesday, June 21, 2017 2:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: VSAM file as GDS

Learn something new every day.  Another developer created a GDG
(PROD.CONNDEF.PATM.BKP) and then a job step that has the following:
//STEP02   EXEC PGM=IDCAMS,COND=(4,LT)
//FILEIN   DD DSN=PROD.ONLINE.CONNDEF.PATM,
//DISP=SHR
//FILEOUT  DD DSN=PROD.CONNDEF.PATM.BKP(+1),
//LIKE=PROD.ONLINE.CONNDEF.PATM,
//DISP=(NEW,CATLG,DELETE)
//SYSINDD DSN=PROD.PARM(REPRO),
//DISP=SHR
//SYSPRINT DD SYSOUT=*
I though for sure this would not work, as PROD.ONLINE.CONNDEF.PATM is a VSAM
KSDS.  But it appears it in fact did work:
PROD.CONNDEF.PATM.BKP
PROD.CONNDEF.PATM.BKP.G0001V00
PROD.CONNDEF.PATM.BKP.G0001V00.DATA
PROD.CONNDEF.PATM.BKP.G0001V00.INDEX


I'm not sure how comfortable I am with it, though.  Any harm in doing this?

Frank

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email
to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: CSSMTP user exit and external email

[Andrew Rowley]

On 21/06/2017 10:52 PM, Paul Gilmartin wrote:

Nice.  I see:
 final String username = "smtp-username";
 final String password = "smtp-password";

Rather than hard-coding, could these be extracted from RACF (or other?)
database?  Or kept in suitably protected user-specific files?
RACF? Maybe, but you would have to figure out how to get the data using 
Java. Protected files, certainly.


You might want to move all the hard coded items into some sort of 
external configuration e.g. read them from DDs. The sample isn't 
intended to be the ideal solution, it is intended as a working example 
of what can be done, expected to be extended and modified as required. 
While you don't want to hard code stuff in production code, it often 
makes things clearer in a sample where you just want to understand the 
code. Abstraction etc. can be desirable in production code because it 
hides implementation details, but the details are what you want to see 
in a sample.



What about headers?  Ideally, I might expect:
 From: z/OS-ID
 Sender: "smtp-username"

You can set headers as required:
https://javaee.github.io/javamail/docs/api/javax/mail/internet/MimeMessage.html#setHeader-java.lang.String-java.lang.String-
also:
https://javaee.github.io/javamail/docs/api/javax/mail/internet/MimeMessage.html#setReplyTo-javax.mail.Address:A-

What your mail server allows is a different question - but part of the 
original question was how to enforce corporate mail standards on mail 
originating from z/OS.



Might these be publicized (not stored) on CBTTAPE.org to attract
users to Black Hill's storefront?


They could certainly be linked etc. from cbttape.org. I'm not sure 
whether they would be suitable for the CBT tape itself since it's really 
just a sample, not something you would use in production. I have some 
ideas for other Java utilities that could be candidates for the CBT tape 
however...


--
Andrew Rowley
Black Hill Software
+61 413 302 386

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: EXTERNAL: Re: PDSE dataset rename issue

[Jerry Whitteridge]

We have a LNKPDSE0 member we execute in IEACMD00 that adds a new linklist name, 
adds the PDSE libraries to the linklist and activates the new name. All other 
tasks key through automation off of the success of that linklist name before 
starting additional tasks.

(There are some IBM required PDSE libraries we leave in the IPL linklist - but 
we don't try to do dynamic  maintenance on those and build new IPL volumes for 
those. Choice is IPL linklist or dynamic refreshes - can't do both).

Jerry Whitteridge
Manager Mainframe Systems & Storage
Albertsons - Safeway Inc.
623 869 5523
Corporate Tieline - 85523

If you feel in control
you just aren't going fast enough.



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Jesse 1 Robinson
Sent: Wednesday, June 21, 2017 2:12 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: PDSE dataset rename issue

I must have snoozed through this thread in 2005 because I have no recollection. 
I trust that no linklist PDSE is desperately required before the first 'add' 
command can be executed. Where do you put them and what do they look like?

.
.
J.O.Skip Robinson
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.UA.EDU] On Behalf 
Of Jerry Whitteridge
Sent: Wednesday, June 21, 2017 12:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: EXTERNAL: Re: PDSE dataset rename issue

This reminded me of why we do NOT allow PDSE in the IPL Linklist and add them 
dynamically after IPL

Please look at

https://groups.google.com/forum/#!topic/bit.listserv.ibm-main/zY1MefkB9po

Where you will see mentioned:

Until yesterday I didn't realize a PDSE LNKLST'd at IPL could not be deleted, 
not even if removed from active LNKLST.  IBM pointed me to APARs
OW40072/OW57609/OW57671 which describe the inability to delete as a 'permanent 
restriction'.  These APARs are noted in PDSE usage Redbook, but haven't found 
any applicable info in MVS Init and Tuning.

When a LNKLST'd PDSE delete attempt, error recieved is:
  IEC614I SCRATCH FAILED - RC 008, DIAGNOSTIC INFORMATION IS (043D57D3) Chasing 
the '57D3' in DFP diagnosis shows:
  Unable to delete the data set because it's currently connected on
  this system.

It appears DFSMS does a 'global connect' for LNKLST'd PDSEs, but there is no 
'global disconnect' resource.

Peter Relson of IBM eluded to the issue on this list (June 2005), "A reason I 
did not mention PDSEs is that you cannot delete a PDSE that was in the IPL-time 
LNKLST regardless of whether it is no longer in any active LNKLST set.".


I suspect this is the OP's actual problem.

Jerry Whitteridge
Manager Mainframe Systems & Storage
Albertsons - Safeway Inc.
623 869 5523
Corporate Tieline - 85523

If you feel in control
you just aren't going fast enough.



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Tuesday, June 20, 2017 2:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: PDSE dataset rename issue

Ok, time for me to jump in and out, since it seemed nothing is happening...

To Venkat Kulkarni :

>... to add new SYS1.SIEKLNKE dataset into system.

Are you sure of the spelling?


>But this dataset was allocated to LLA and XCF. So, we unallocated to linklist 
>and stop LLA.

It is not enough. But see below my comments.


>After this, we tried renaming this dataset using ispf 3.4 to .old but system 
>didnt allowed and received below error.

If there is an enqueue, did you press PF01 to see who all is using it?


>IEC614I rename failed rc 08 diagnostic information 040B0426, 914

Is this the full message? if not, please post it fully from start to end and 
all lines. Also post any message(s) on the SYSLOG too.


You have gotten many replies and you also posted your answers, but I have more 
questions.

1. Did you looked EVERY WHERE that dataset is used / allocated? This includes 
your own TSO session.
2. Did you checked EVERY LPAR(s) in the SysPlex for usage by all XCFAS and LLA?
3. Do you have ALTER authority to the OLD and NEW names?
4. Do you have UPDATE access to the relevant Catalog where that entry is 
sitting?

5. There is a possibility that the dataset is cataloged, but the catalog is not 
in your system from where you tried to do the rename action.

(In other words, catalog is connected, but the catalog is managed in another 
system, meaning you could have your catalogs not setup properly across your 
sysplex.)

To highlight this, in my own two SysPlexes, we have a User Catalog which is 
shared between the two SysPlexes. RACF is setup so that ALTER is granted to one 
SysPlex on these catalog entries, but at most Update at other Sysplex to those 
same entries.

So you do the rename on the system where you have 

Re: PDSE dataset rename issue

[Jesse 1 Robinson]

I must have snoozed through this thread in 2005 because I have no recollection. 
I trust that no linklist PDSE is desperately required before the first 'add' 
command can be executed. Where do you put them and what do they look like?

.
.
J.O.Skip Robinson
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.UA.EDU] On Behalf 
Of Jerry Whitteridge
Sent: Wednesday, June 21, 2017 12:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: EXTERNAL: Re: PDSE dataset rename issue

This reminded me of why we do NOT allow PDSE in the IPL Linklist and add them 
dynamically after IPL

Please look at

https://groups.google.com/forum/#!topic/bit.listserv.ibm-main/zY1MefkB9po

Where you will see mentioned:

Until yesterday I didn't realize a PDSE LNKLST'd at IPL could not be deleted, 
not even if removed from active LNKLST.  IBM pointed me to APARs
OW40072/OW57609/OW57671 which describe the inability to delete as a 'permanent 
restriction'.  These APARs are noted in PDSE usage Redbook, but haven't found 
any applicable info in MVS Init and Tuning.

When a LNKLST'd PDSE delete attempt, error recieved is:
  IEC614I SCRATCH FAILED - RC 008, DIAGNOSTIC INFORMATION IS (043D57D3) Chasing 
the '57D3' in DFP diagnosis shows:
  Unable to delete the data set because it's currently connected on
  this system.

It appears DFSMS does a 'global connect' for LNKLST'd PDSEs, but there is no 
'global disconnect' resource.

Peter Relson of IBM eluded to the issue on this list (June 2005), "A reason I 
did not mention PDSEs is that you cannot delete a PDSE that was in the IPL-time 
LNKLST regardless of whether it is no longer in any active LNKLST set.".


I suspect this is the OP's actual problem.

Jerry Whitteridge
Manager Mainframe Systems & Storage
Albertsons - Safeway Inc.
623 869 5523
Corporate Tieline - 85523

If you feel in control
you just aren't going fast enough.



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Tuesday, June 20, 2017 2:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: PDSE dataset rename issue

Ok, time for me to jump in and out, since it seemed nothing is happening...

To Venkat Kulkarni :

>... to add new SYS1.SIEKLNKE dataset into system.

Are you sure of the spelling?


>But this dataset was allocated to LLA and XCF. So, we unallocated to linklist 
>and stop LLA.

It is not enough. But see below my comments.


>After this, we tried renaming this dataset using ispf 3.4 to .old but system 
>didnt allowed and received below error.

If there is an enqueue, did you press PF01 to see who all is using it?


>IEC614I rename failed rc 08 diagnostic information 040B0426, 914

Is this the full message? if not, please post it fully from start to end and 
all lines. Also post any message(s) on the SYSLOG too.


You have gotten many replies and you also posted your answers, but I have more 
questions.

1. Did you looked EVERY WHERE that dataset is used / allocated? This includes 
your own TSO session.
2. Did you checked EVERY LPAR(s) in the SysPlex for usage by all XCFAS and LLA?
3. Do you have ALTER authority to the OLD and NEW names?
4. Do you have UPDATE access to the relevant Catalog where that entry is 
sitting?

5. There is a possibility that the dataset is cataloged, but the catalog is not 
in your system from where you tried to do the rename action.

(In other words, catalog is connected, but the catalog is managed in another 
system, meaning you could have your catalogs not setup properly across your 
sysplex.)

To highlight this, in my own two SysPlexes, we have a User Catalog which is 
shared between the two SysPlexes. RACF is setup so that ALTER is granted to one 
SysPlex on these catalog entries, but at most Update at other Sysplex to those 
same entries.

So you do the rename on the system where you have ALTER access and there is NO 
enqueue at all.


>... it says about required authentication issue. but I feel, i have all 
>required authority to alter this dataset.

Really? See my comments above.


>Is it something to do with using 3.4 option and system check this dataset in 
>other system master catalog and doesnt allow us to rename or some other reason.

Probably, see my comments above.


Did you tried out Lizette Koehler's suggestion?

1) Is the SYS1.SIEKLNKE currently in the LINKLST?  If so, are you just 
refreshing the library?
2) If SYS1.SIEKLNKE does not current exist, you could build a new LINKLST and 
add it to the new list.


>now, I thought of creating new dataset in different volume as current one and 
>then uncatalog the current dataset and then rename the new dataset to current 
>one. I hope this should work.

No, you said it is in another system Master Cataolg. Better check all your 
Catalog 

Re: VSAM file as GDS

[Frank Swarbrick]

Developer did more testing and found that even though it successfully created 
generation 1 when an attempt was made to create an additional generation it 
failed.  :-(

IEF344I TESTREP STEP01 FILEOUT - ALLOCATION FAILED DUE TO DATA FACILITY SYSTEM 
ERROR

IGD17101I DATA SET PROD.CONNDEF.PATM.BKP.G0001V00

NOT DEFINED BECAUSE DUPLICATE NAME EXISTS IN CATALOG

RETURN CODE IS 8 REASON CODE IS 38 IGG0CLEH

IGD17219I UNABLE TO CONTINUE DEFINE OF DATA SET


From: IBM Mainframe Discussion List  on behalf of 
Frank Swarbrick 
Sent: Wednesday, June 21, 2017 2:24 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: VSAM file as GDS

Learn something new every day.  Another developer created a GDG 
(PROD.CONNDEF.PATM.BKP) and then a job step that has the following:
//STEP02   EXEC PGM=IDCAMS,COND=(4,LT)
//FILEIN   DD DSN=PROD.ONLINE.CONNDEF.PATM,
//DISP=SHR
//FILEOUT  DD DSN=PROD.CONNDEF.PATM.BKP(+1),
//LIKE=PROD.ONLINE.CONNDEF.PATM,
//DISP=(NEW,CATLG,DELETE)
//SYSINDD DSN=PROD.PARM(REPRO),
//DISP=SHR
//SYSPRINT DD SYSOUT=*
I though for sure this would not work, as PROD.ONLINE.CONNDEF.PATM is a VSAM 
KSDS.  But it appears it in fact did work:
PROD.CONNDEF.PATM.BKP
PROD.CONNDEF.PATM.BKP.G0001V00
PROD.CONNDEF.PATM.BKP.G0001V00.DATA
PROD.CONNDEF.PATM.BKP.G0001V00.INDEX


I'm not sure how comfortable I am with it, though.  Any harm in doing this?

Frank

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Store Clock Fast really can give duplicates

[Gord Tomlin]

On 2017-06-21 15:50, Tony Harminc wrote:

Muphry's law?

^ Murphy's Law in action.

Not this time, at least not yet.  Muphry's is rather more specific
than Murphy's.

https://en.wikipedia.org/wiki/Muphry's_law


[typing very carefully] Interesting...thanks!

--

Regards, Gord Tomlin
Action Software International
(a division of Mazda Computer Corporation)
Tel: (905) 470-7113, Fax: (905) 470-6507

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

VSAM file as GDS

[Frank Swarbrick]

Learn something new every day.  Another developer created a GDG 
(PROD.CONNDEF.PATM.BKP) and then a job step that has the following:
//STEP02   EXEC PGM=IDCAMS,COND=(4,LT)
//FILEIN   DD DSN=PROD.ONLINE.CONNDEF.PATM,
//DISP=SHR
//FILEOUT  DD DSN=PROD.CONNDEF.PATM.BKP(+1),
//LIKE=PROD.ONLINE.CONNDEF.PATM,
//DISP=(NEW,CATLG,DELETE)
//SYSINDD DSN=PROD.PARM(REPRO),
//DISP=SHR
//SYSPRINT DD SYSOUT=*
I though for sure this would not work, as PROD.ONLINE.CONNDEF.PATM is a VSAM 
KSDS.  But it appears it in fact did work:
PROD.CONNDEF.PATM.BKP
PROD.CONNDEF.PATM.BKP.G0001V00
PROD.CONNDEF.PATM.BKP.G0001V00.DATA
PROD.CONNDEF.PATM.BKP.G0001V00.INDEX


I'm not sure how comfortable I am with it, though.  Any harm in doing this?

Frank

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: PL/I and C (was Re: Simple (?) C question)

[Bernd Oppolzer]

See below ...

Am 21.06.2017 um 22:13 schrieb Frank Swarbrick:

Interesting!  Is this (1 and 2) actually addressed anywhere official that 
discusses PL/I and C ILC?  One would hope so...  I imagine that PL/I could 
simply call the C free() function itself, in any case.


in fact, I don't know if this is documented anywhere.

I realized it last year only when we had a storage lead in a PL/1 batch job
which involved C too, and I observed after some checking, that there was
no increase in the LE User Heaps. The culprit turned out to be some
PL/1 routines, and their ALLOCs used up the LE Anywhere Heap, so I
had to add support for the LE Anywhere and Below Heap to my tools;
I thought up until then that they are only used by LE itself, but not by
the "user" routines. Wrong ...

Don't know if you can call the C free() function directly from C,
but there are LE functions doing the storage allocation and free business
(I don't recall their names, must be in the LE Vendor interface book),
and they should work regardless of the heap type. Maybe even PL/1 FREE
doesn't care if the area is User heap or LE Anywhere heap ... the layout
of the control blocks is the same ... but I don't know; if PL/1 FREE simply
calls the aforementioned LE function, all will be OK.

This presentation is very interesting:

http://www-03.ibm.com/systems/resources/Stack+and+Heap.pdf




I'm not looking to make anything in particular work in PL/I, but rather thinking about 
how the new "dynamic-length elementary items" supported by the latest COBOL 
standard (2014) could work when interfacing with C strings (and PL/I variable length 
strings, for that matter).  I thought it would be useful to know what PL/I does in this 
regard.

Frank

From: IBM Mainframe Discussion List  on behalf of Bernd 
Oppolzer 
Sent: Wednesday, June 21, 2017 2:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: PL/I and C (was Re: Simple (?) C question)

Hi Frank,

1.) yes, the C area acquired by malloc must be freed by someone

2.) unfortunately, the PL/1 FREE statement cannot do it, because,
as I recently observed while checking some PL/1 modules for storage leaks,
PL/1 stores its heap areas (allocated by PL/1 ALLOC / FREE) in the LE
ANYWHERE HEAP,
but C - with malloc - uses one of the (in theory many) LE USER HEAPs,
so PL/1 FREE will not be able to FREE the C malloc areas. At least, that's
what I think. You will IMO have to provide a C function that frees the
area on behalf of the PL/1 caller (using C free). At least, I believe
that's
what you should do.

3.) at one of my former customer's site, we decided to write our own
storage management, callable from all languages. Of course, it is based
on normal GETMAIN / FREEMAIN. If you do this carefully, you will even
be able to outperform the LE storage management (to some small percent
values). With this solution, you don't have such problems as outlined
above.

4.) for my private Stanford Pascal compiler project (the compiler runs
on MVS and CMS on Hercules, but even on today's z/OS), I rewrote the
LE storage management in Pascal, from some descriptions and presentations
available from IBM. This took me some weeks last year, but it works without
problems. Look here: http://bernd-oppolzer.de/job9.htm
Oppolzer - Informatik / Stanford Pascal 
Compiler
bernd-oppolzer.de
Updated version of the Stanford Pascal Compiler designed to run on VM/370 Rel. 
6 under the Hercules emulator. It should also run on today's z/VM and some, or 
all ...



5.) I also wrote some diagnose routines (for LE on z/OS) that check for
storage leaks
on the fly (while the programs run).

Please call me offline, if you want to know more.

Kind regards

Bernd


Am 21.06.2017 um 21:01 schrieb Frank Swarbrick:

I know we have some PL/I experts here, and I can't seem to subscribe to the 
PL/I listserv, so I'll ask here.  I am not a PL/I programmer, but I've studied 
it to some degree.  I believe the following is a valid PL/I program that would 
invoke the C language get_static_string() function (as well as one called 
get_dynamic_string() that does a malloc() and returns it's result).

pli_calling_C:
procedure

dcl s_strext('get_static_string')
 entry( entry returns( byvalue pointer ) )
 options( byvalue nodescriptor );
dcl d_strext('get_dynamic_string')
 entry( entry returns( byvalue pointer ) )
 options( byvalue nodescriptor );
dcl str1 char(*) varz based(str1ptr), str1ptr pointer;
dcl str2 char(*) varz based(str2ptr), str2ptr pointer;

str1ptr = s_str();
display(str1);
str2ptr = d_str();
display(str2);
end;

My question is, can/must the PL/I program do free(str2ptr) in order to release 
the storage for the dynamically allocated string?  (And obviously NOT do this 
for str1ptr.)

Side request... Could someone post the PL/I 

Re: PL/I and C (was Re: Simple (?) C question)

[Frank Swarbrick]

Interesting!  Is this (1 and 2) actually addressed anywhere official that 
discusses PL/I and C ILC?  One would hope so...  I imagine that PL/I could 
simply call the C free() function itself, in any case.

I'm not looking to make anything in particular work in PL/I, but rather 
thinking about how the new "dynamic-length elementary items" supported by the 
latest COBOL standard (2014) could work when interfacing with C strings (and 
PL/I variable length strings, for that matter).  I thought it would be useful 
to know what PL/I does in this regard.

Frank

From: IBM Mainframe Discussion List  on behalf of 
Bernd Oppolzer 
Sent: Wednesday, June 21, 2017 2:04 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: PL/I and C (was Re: Simple (?) C question)

Hi Frank,

1.) yes, the C area acquired by malloc must be freed by someone

2.) unfortunately, the PL/1 FREE statement cannot do it, because,
as I recently observed while checking some PL/1 modules for storage leaks,
PL/1 stores its heap areas (allocated by PL/1 ALLOC / FREE) in the LE
ANYWHERE HEAP,
but C - with malloc - uses one of the (in theory many) LE USER HEAPs,
so PL/1 FREE will not be able to FREE the C malloc areas. At least, that's
what I think. You will IMO have to provide a C function that frees the
area on behalf of the PL/1 caller (using C free). At least, I believe
that's
what you should do.

3.) at one of my former customer's site, we decided to write our own
storage management, callable from all languages. Of course, it is based
on normal GETMAIN / FREEMAIN. If you do this carefully, you will even
be able to outperform the LE storage management (to some small percent
values). With this solution, you don't have such problems as outlined
above.

4.) for my private Stanford Pascal compiler project (the compiler runs
on MVS and CMS on Hercules, but even on today's z/OS), I rewrote the
LE storage management in Pascal, from some descriptions and presentations
available from IBM. This took me some weeks last year, but it works without
problems. Look here: http://bernd-oppolzer.de/job9.htm
Oppolzer - Informatik / Stanford Pascal 
Compiler
bernd-oppolzer.de
Updated version of the Stanford Pascal Compiler designed to run on VM/370 Rel. 
6 under the Hercules emulator. It should also run on today's z/VM and some, or 
all ...



5.) I also wrote some diagnose routines (for LE on z/OS) that check for
storage leaks
on the fly (while the programs run).

Please call me offline, if you want to know more.

Kind regards

Bernd


Am 21.06.2017 um 21:01 schrieb Frank Swarbrick:
> I know we have some PL/I experts here, and I can't seem to subscribe to the 
> PL/I listserv, so I'll ask here.  I am not a PL/I programmer, but I've 
> studied it to some degree.  I believe the following is a valid PL/I program 
> that would invoke the C language get_static_string() function (as well as one 
> called get_dynamic_string() that does a malloc() and returns it's result).
>
> pli_calling_C:
>procedure
>
>dcl s_strext('get_static_string')
> entry( entry returns( byvalue pointer ) )
> options( byvalue nodescriptor );
>dcl d_strext('get_dynamic_string')
> entry( entry returns( byvalue pointer ) )
> options( byvalue nodescriptor );
>dcl str1 char(*) varz based(str1ptr), str1ptr pointer;
>dcl str2 char(*) varz based(str2ptr), str2ptr pointer;
>
>str1ptr = s_str();
>display(str1);
>str2ptr = d_str();
>display(str2);
> end;
>
> My question is, can/must the PL/I program do free(str2ptr) in order to 
> release the storage for the dynamically allocated string?  (And obviously NOT 
> do this for str1ptr.)
>
> Side request... Could someone post the PL/I "JNI" copybook?
>
> Thanks, Frank
>
> 
> From: Frank Swarbrick
> Sent: Tuesday, June 20, 2017 9:47 AM
> To: IBM Mainframe Discussion List
> Subject: Re: Simple (?) C question
>
>
> Thanks John.  I know of no code that does this, nor do I intend to implement 
> any.  What I was really trying to determine is if a routine could possibly 
> (rightly or wrongly) return a pointer to a field that was statically 
> allocated rather than dynamically allocated.  Which would mean that the 
> caller should not, for example, attempt a free() on that pointer.  I've been 
> pondering the COBOL 2014 standard and how it might interact with C in this 
> regard.
>
> Thanks to everyone who answered.
>
> Frank
>
> 
> From: IBM Mainframe Discussion List  on behalf of 
> John McKown 
> Sent: Monday, June 19, 2017 7:59 PM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Simple (?) C question
>
> On Mon, Jun 19, 2017 at 4:25 PM, Frank Swarbrick <
> frank.swarbr...@outlook.com> wrote:
>
>> I know there are at least a few 

Re: PL/I and C (was Re: Simple (?) C question)

[Bernd Oppolzer]

Hi Frank,

1.) yes, the C area acquired by malloc must be freed by someone

2.) unfortunately, the PL/1 FREE statement cannot do it, because,
as I recently observed while checking some PL/1 modules for storage leaks,
PL/1 stores its heap areas (allocated by PL/1 ALLOC / FREE) in the LE 
ANYWHERE HEAP,

but C - with malloc - uses one of the (in theory many) LE USER HEAPs,
so PL/1 FREE will not be able to FREE the C malloc areas. At least, that's
what I think. You will IMO have to provide a C function that frees the
area on behalf of the PL/1 caller (using C free). At least, I believe 
that's

what you should do.

3.) at one of my former customer's site, we decided to write our own
storage management, callable from all languages. Of course, it is based
on normal GETMAIN / FREEMAIN. If you do this carefully, you will even
be able to outperform the LE storage management (to some small percent
values). With this solution, you don't have such problems as outlined 
above.


4.) for my private Stanford Pascal compiler project (the compiler runs
on MVS and CMS on Hercules, but even on today's z/OS), I rewrote the
LE storage management in Pascal, from some descriptions and presentations
available from IBM. This took me some weeks last year, but it works without
problems. Look here: http://bernd-oppolzer.de/job9.htm

5.) I also wrote some diagnose routines (for LE on z/OS) that check for 
storage leaks

on the fly (while the programs run).

Please call me offline, if you want to know more.

Kind regards

Bernd


Am 21.06.2017 um 21:01 schrieb Frank Swarbrick:

I know we have some PL/I experts here, and I can't seem to subscribe to the 
PL/I listserv, so I'll ask here.  I am not a PL/I programmer, but I've studied 
it to some degree.  I believe the following is a valid PL/I program that would 
invoke the C language get_static_string() function (as well as one called 
get_dynamic_string() that does a malloc() and returns it's result).

pli_calling_C:
   procedure

   dcl s_strext('get_static_string')
entry( entry returns( byvalue pointer ) )
options( byvalue nodescriptor );
   dcl d_strext('get_dynamic_string')
entry( entry returns( byvalue pointer ) )
options( byvalue nodescriptor );
   dcl str1 char(*) varz based(str1ptr), str1ptr pointer;
   dcl str2 char(*) varz based(str2ptr), str2ptr pointer;

   str1ptr = s_str();
   display(str1);
   str2ptr = d_str();
   display(str2);
end;

My question is, can/must the PL/I program do free(str2ptr) in order to release 
the storage for the dynamically allocated string?  (And obviously NOT do this 
for str1ptr.)

Side request... Could someone post the PL/I "JNI" copybook?

Thanks, Frank


From: Frank Swarbrick
Sent: Tuesday, June 20, 2017 9:47 AM
To: IBM Mainframe Discussion List
Subject: Re: Simple (?) C question


Thanks John.  I know of no code that does this, nor do I intend to implement 
any.  What I was really trying to determine is if a routine could possibly 
(rightly or wrongly) return a pointer to a field that was statically allocated 
rather than dynamically allocated.  Which would mean that the caller should 
not, for example, attempt a free() on that pointer.  I've been pondering the 
COBOL 2014 standard and how it might interact with C in this regard.

Thanks to everyone who answered.

Frank


From: IBM Mainframe Discussion List  on behalf of John 
McKown 
Sent: Monday, June 19, 2017 7:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Simple (?) C question

On Mon, Jun 19, 2017 at 4:25 PM, Frank Swarbrick <
frank.swarbr...@outlook.com> wrote:


I know there are at least a few C developers here, so I was wondering if
you could answer a question.  Is the following valid C?  (I'm not asking if
one should actually do it; only if its valid at all.)
char *get_static_string(void) {
 static char str[81] = "This is a statically allocated C string";
 return str;
}


printf("%s", get_static_string());


I don't have a C compiler available at work else I'd try it myself.

Frank



You have gotten some good answers. So I will just interject a bit of,
perhaps off center, comment. Your code, as written compiles just fine. But
it is basically very dangerous. The reason is that you are returning a
pointer which could be used to overwrite storage. This is also known as "a
bad thing" and is basically an attack vector by malicious code. I don't
know the actual intent of your question. But I would suggest using the
#pragma string(readonly) in your example. E.g. compile "get_static_string"
in its own compilation unit (i.e. by itself)

#pragma strings(readonly)
const char *get_static_string() {
 const static char[] = "This is a statically allocated C string"; // let
the compiler figure out the length;
 return str;
}


I can hear you saying: "But, really, I need up be able to 

Re: Store Clock Fast really can give duplicates

[Tony Harminc]

On 21 June 2017 at 14:10, Gord Tomlin  wrote:
> On 2017-06-21 11:58, Tony Harminc wrote:
>>
>> Muphry's law?
>
> ^ Murphy's Law in action.

Not this time, at least not yet.  Muphry's is rather more specific
than Murphy's.

https://en.wikipedia.org/wiki/Muphry's_law

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: EXTERNAL: Re: PDSE dataset rename issue

[Jerry Whitteridge]

This reminded me of why we do NOT allow PDSE in the IPL Linklist and add them 
dynamically after IPL

Please look at

https://groups.google.com/forum/#!topic/bit.listserv.ibm-main/zY1MefkB9po

Where you will see mentioned:

Until yesterday I didn't realize a PDSE LNKLST'd at IPL could not be
deleted, not even if removed from active LNKLST.  IBM pointed me to APARs
OW40072/OW57609/OW57671 which describe the inability to delete as
a 'permanent restriction'.  These APARs are noted in PDSE usage Redbook,
but haven't found any applicable info in MVS Init and Tuning.

When a LNKLST'd PDSE delete attempt, error recieved is:
  IEC614I SCRATCH FAILED - RC 008, DIAGNOSTIC INFORMATION IS (043D57D3)
Chasing the '57D3' in DFP diagnosis shows:
  Unable to delete the data set because it's currently connected on
  this system.

It appears DFSMS does a 'global connect' for LNKLST'd PDSEs, but there is
no 'global disconnect' resource.

Peter Relson of IBM eluded to the issue on this list (June 2005), "A
reason I did not mention PDSEs is that you cannot delete a PDSE that was
in the IPL-time LNKLST regardless of whether it is no longer in any active
LNKLST set.".


I suspect this is the OP's actual problem.

Jerry Whitteridge
Manager Mainframe Systems & Storage
Albertsons - Safeway Inc.
623 869 5523
Corporate Tieline - 85523

If you feel in control
you just aren't going fast enough.



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Elardus Engelbrecht
Sent: Tuesday, June 20, 2017 2:25 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: EXTERNAL: Re: PDSE dataset rename issue

Ok, time for me to jump in and out, since it seemed nothing is happening...

To Venkat Kulkarni :

>... to add new SYS1.SIEKLNKE dataset into system.

Are you sure of the spelling?


>But this dataset was allocated to LLA and XCF. So, we unallocated to linklist 
>and stop LLA.

It is not enough. But see below my comments.


>After this, we tried renaming this dataset using ispf 3.4 to .old but system 
>didnt allowed and received below error.

If there is an enqueue, did you press PF01 to see who all is using it?


>IEC614I rename failed rc 08 diagnostic information 040B0426, 914

Is this the full message? if not, please post it fully from start to end and 
all lines. Also post any message(s) on the SYSLOG too.


You have gotten many replies and you also posted your answers, but I have more 
questions.

1. Did you looked EVERY WHERE that dataset is used / allocated? This includes 
your own TSO session.
2. Did you checked EVERY LPAR(s) in the SysPlex for usage by all XCFAS and LLA?
3. Do you have ALTER authority to the OLD and NEW names?
4. Do you have UPDATE access to the relevant Catalog where that entry is 
sitting?

5. There is a possibility that the dataset is cataloged, but the catalog is not 
in your system from where you tried to do the rename action.

(In other words, catalog is connected, but the catalog is managed in another 
system, meaning you could have your catalogs not setup properly across your 
sysplex.)

To highlight this, in my own two SysPlexes, we have a User Catalog which is 
shared between the two SysPlexes. RACF is setup so that ALTER is granted to one 
SysPlex on these catalog entries, but at most Update at other Sysplex to those 
same entries.

So you do the rename on the system where you have ALTER access and there is NO 
enqueue at all.


>... it says about required authentication issue. but I feel, i have all 
>required authority to alter this dataset.

Really? See my comments above.


>Is it something to do with using 3.4 option and system check this dataset in 
>other system master catalog and doesnt allow us to rename or some other reason.

Probably, see my comments above.


Did you tried out Lizette Koehler's suggestion?

1) Is the SYS1.SIEKLNKE currently in the LINKLST?  If so, are you just 
refreshing the library?
2) If SYS1.SIEKLNKE does not current exist, you could build a new LINKLST and 
add it to the new list.


>now, I thought of creating new dataset in different volume as current one and 
>then uncatalog the current dataset and then rename the new dataset to current 
>one. I hope this should work.

No, you said it is in another system Master Cataolg. Better check all your 
Catalog entries in all systems before proceeding. Ask your Storage Admin Team 
for assistance.


>But  I am still surprised that why after un allocating the linklist and then P 
>LLA command, system is not allowing me to rename current dataset.

I am not surprised. Did you check all LPARs and all SysPlexes where that 
dataset is used/allocated?


As Giliad Wilf said, this is a "pinned' dataset, you will have trouble renaming 
that dataset. You're better off to setup new PROGxx members with NEW names and 
IPL all and every LPARs.  In this way you can then get rid of the old name.

Thus, make a NEW copy, change your PROGxx and IPL everywhere. Then you can then 
delete/rename the old dataset.

PL/I and C (was Re: Simple (?) C question)

[Frank Swarbrick]

I know we have some PL/I experts here, and I can't seem to subscribe to the 
PL/I listserv, so I'll ask here.  I am not a PL/I programmer, but I've studied 
it to some degree.  I believe the following is a valid PL/I program that would 
invoke the C language get_static_string() function (as well as one called 
get_dynamic_string() that does a malloc() and returns it's result).

pli_calling_C:
  procedure

  dcl s_strext('get_static_string')
   entry( entry returns( byvalue pointer ) )
   options( byvalue nodescriptor );
  dcl d_strext('get_dynamic_string')
   entry( entry returns( byvalue pointer ) )
   options( byvalue nodescriptor );
  dcl str1 char(*) varz based(str1ptr), str1ptr pointer;
  dcl str2 char(*) varz based(str2ptr), str2ptr pointer;

  str1ptr = s_str();
  display(str1);
  str2ptr = d_str();
  display(str2);
end;

My question is, can/must the PL/I program do free(str2ptr) in order to release 
the storage for the dynamically allocated string?  (And obviously NOT do this 
for str1ptr.)

Side request... Could someone post the PL/I "JNI" copybook?

Thanks, Frank


From: Frank Swarbrick
Sent: Tuesday, June 20, 2017 9:47 AM
To: IBM Mainframe Discussion List
Subject: Re: Simple (?) C question


Thanks John.  I know of no code that does this, nor do I intend to implement 
any.  What I was really trying to determine is if a routine could possibly 
(rightly or wrongly) return a pointer to a field that was statically allocated 
rather than dynamically allocated.  Which would mean that the caller should 
not, for example, attempt a free() on that pointer.  I've been pondering the 
COBOL 2014 standard and how it might interact with C in this regard.

Thanks to everyone who answered.

Frank


From: IBM Mainframe Discussion List  on behalf of 
John McKown 
Sent: Monday, June 19, 2017 7:59 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Simple (?) C question

On Mon, Jun 19, 2017 at 4:25 PM, Frank Swarbrick <
frank.swarbr...@outlook.com> wrote:

> I know there are at least a few C developers here, so I was wondering if
> you could answer a question.  Is the following valid C?  (I'm not asking if
> one should actually do it; only if its valid at all.)
> char *get_static_string(void) {
> static char str[81] = "This is a statically allocated C string";
> return str;
> }
>
>
> printf("%s", get_static_string());
>
>
> I don't have a C compiler available at work else I'd try it myself.
>
> Frank
>
>
You have gotten some good answers. So I will just interject a bit of,
perhaps off center, comment. Your code, as written compiles just fine. But
it is basically very dangerous. The reason is that you are returning a
pointer which could be used to overwrite storage. This is also known as "a
bad thing" and is basically an attack vector by malicious code. I don't
know the actual intent of your question. But I would suggest using the
#pragma string(readonly) in your example. E.g. compile "get_static_string"
in its own compilation unit (i.e. by itself)

#pragma strings(readonly)
const char *get_static_string() {
const static char[] = "This is a statically allocated C string"; // let
the compiler figure out the length;
return str;
}


I can hear you saying: "But, really, I need up be able to update this
string on occasion." If so, then I would greatly suggest that you create a
"compilation unit" (single file containing source which is compiled
independently ) such as:

#
file static_string.c

#if ! defined(MAXSTRLEN)
#define MAXSTRLEN 100
#endif
#include 

static char str[MAXSTRLEN];

const char *get_static_string(void) {
   return str;
}

int set_static_string(char *set_to_value) {
   int len_to_set = strnlen(set_to_value,MAXSTRLEN);
   if (len_to_set >= MAXSTRLEN)  // string too long!
   return 1; // tell caller NO GO!
   memcpy(str,set_to_value,len_to_set); // fast copy
   return 0;
}

Since the variable "str" is defined as "static" and outside of any
function definition, it is "global" to the "compilation unit", but is not
known outside of it (i.e. it is not an external name). You compile the
above to "object" code. You may be able to bind it into a LOADLIB, but I
think you'll get some "external reference not found" type messages for
"main".

Anyway, the above could be similar to:

# file use_static_string.c

#include 
#include 
#include 
#include 
const char *get_static_string(void);
int set_static_string(char *);
int main(int argc, char *argv[]){
   char set_to_1[]="Set to this value";
   char set_to_2[]="Set to another value";
   const char *return_static_string;
   int retRC;
   retRC=set_static_string(set_to_1);
   if (retRC != 0) {
   printf("retRC=%d\n",retRC);
   exit(1);
   }
   return_static_string=get_static_string();
   

Re: extract syslog data

[Jesse 1 Robinson]

I've used FILTER for years for panels like job display. I had no idea it worked 
for operlog. The entire mainframe staff here is blown away. Thanks!

.
.
J.O.Skip Robinson
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.UA.EDU] On Behalf 
Of Lizette Koehler
Sent: Wednesday, June 21, 2017 7:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: (External):Re: extract syslog data

One other option.

In SDSF is the FILTER function on the top menu.  If you have specific messages 
or jobs or other you want rather than all lines in a particular time frame, you 
can use that to cut down on the amount of data.

All is detailed in the TOC for SDSF.  I find that when I am in a specific 
function in SDSF, if I enter an INVALID command, then use the HELP Key (PF1) I 
will be presented with the functions available for that panel.  That way I do 
not need to know what they are and easier to find the details.



Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
> On Behalf Of Lizette Koehler
> Sent: Wednesday, June 21, 2017 7:20 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: extract syslog data
> 
> Where is your syslog located?
> 
> If still in JES2 Spool, and you have SDSF, then the PRINT command in 
> SDSF will work.  This can print to a file or you can print to your TSO 
> Session, the use XDC to print to a dataset of your choice
> 
> 
> 
> If it is in an external dataset, you have the following options (no 
> particular order)
> 
>REXX
>DFSORT
>SAS
>COBOL
>ISPF EDIT (if the file is not very large)
>PL/1
>SAS
>IDCAMS
>Also check the cbttape.org and see if there are any tools there you 
> might use
> 
> Basically, if it is in a seq file, you can use any tool you like to 
> copy the data.  You just need to know the first line you want to copy 
> to the last line you want to copy.
> 
> In ISPF EDIT that is a RELATIVE LINE NUMBER on the VIEW or EDIT Panel
> 
> Everything is pretty much dependent on where your SYSLOG is and 
> whether or not you need to create your own process.
> 
> Use a function you are familiar.
> 
> 
> Lizette
> 
> 
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List 
> > [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of william janulin
> > Sent: Wednesday, June 21, 2017 6:55 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: extract syslog data
> >
> > To list;
> >   Does anyone know of a utility that can be used to extract zOS 
> > syslog data for a specificdate and time period or which manual I 
> > cold find the
> info?
> >  I am hoping I will not have to use cut & paste to get the 
> > informationneeded for a PMR I have open.
> > Thank you in advance, Bill J.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Store Clock Fast really can give duplicates

[PINION, RICHARD W.]

No Muphry's was Murphy's younger brother, along with Darrel and his other
brother Darrel.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Gord Tomlin
Sent: Wednesday, June 21, 2017 2:11 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Store Clock Fast really can give duplicates

On 2017-06-21 11:58, Tony Harminc wrote:
> Muphry's law?

^ Murphy's Law in action.

--

Regards, Gord Tomlin
Action Software International
(a division of Mazda Computer Corporation)
Tel: (905) 470-7113, Fax: (905) 470-6507

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN
FIRST TENNESSEE

Confidentiality notice: 
This e-mail message, including any attachments, may contain legally privileged 
and/or confidential information. If you are not the intended recipient(s), or 
the employee or agent responsible for delivery of this message to the intended 
recipient(s), you are hereby notified that any dissemination, distribution, or 
copying of this e-mail message is strictly prohibited. If you have received 
this message in error, please immediately notify the sender and delete this 
e-mail message from your computer.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Store Clock Fast really can give duplicates

[Gord Tomlin]

On 2017-06-21 11:58, Tony Harminc wrote:

Muphry's law?


^ Murphy's Law in action.

--

Regards, Gord Tomlin
Action Software International
(a division of Mazda Computer Corporation)
Tel: (905) 470-7113, Fax: (905) 470-6507

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: ERBSCAN problem

[J R]

Its just that it was a temporary dataset allocated to SYSPRINT that got the B37 
abend. 

> On Jun 21, 2017, at 12:05, Mark Pace  wrote:
> 
> I'm not sure how I would that, or how to point ERBSCAN to use that dataset.
> 
>> On Wed, Jun 21, 2017 at 11:26 AM, J R  wrote:
>> 
>> Have you tried preallocating a large SYSPRINT dataset?

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Store Clock Fast really can give duplicates

[Phil Smith]

Tony Harminc wrote:
>Or "trying to test STCKF and compare it to STCK"?

Sigh, yes. ONE OF THOSE! (Thanks for catching that. Must be a Monday.)

"220, 221, whatever it takes..."

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: ERBSCAN problem

[Mark Pace]

I used DDLIST and member to search for ERBSCAN and found it was a REXX exec
and I was able to modify the temp file allocations.  It works fine now.

On Wed, Jun 21, 2017 at 12:05 PM, Mark Pace  wrote:

> I'm not sure how I would that, or how to point ERBSCAN to use that dataset.
>
> On Wed, Jun 21, 2017 at 11:26 AM, J R  wrote:
>
>> Have you tried preallocating a large SYSPRINT dataset?
>>
>>
>>
>> > On Jun 21, 2017, at 11:05, Mark Pace  wrote:
>> >
>> > I'm trying to run an ERBSCAN against a really large SMF file.
>> >
>> > Please Wait... Copying to temporary VSAM dataset...
>> >
>> > Then after a minute.
>> >
>> > IEC030I B37-04,IFG0554A,MARPACE,IKJACCNT,SYSPRINT,B420,TMPL05,
>> > SYS17172.T110243.RA000.MARPACE.R0116499
>> > ***
>> >
>> > So my impression is that the Temporary dataset was defined to small and
>> ran
>> > out of extents.  Is there some place where I change the default size of
>> the
>> > temporary dataset?
>> >
>> >
>> >
>> > --
>> > The postings on this site are my own and don’t necessarily represent
>> > Mainline’s positions or opinions
>> >
>> > Mark D Pace
>> > Senior Systems Engineer
>> > Mainline Information Systems
>> >
>> > --
>> > For IBM-MAIN subscribe / signoff / archive access instructions,
>> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>> --
>> For IBM-MAIN subscribe / signoff / archive access instructions,
>> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>>
>
>
>
> --
> The postings on this site are my own and don’t necessarily represent
> Mainline’s positions or opinions
>
> Mark D Pace
> Senior Systems Engineer
> Mainline Information Systems
>
>
>
>


-- 
The postings on this site are my own and don’t necessarily represent
Mainline’s positions or opinions

Mark D Pace
Senior Systems Engineer
Mainline Information Systems

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: ERBSCAN problem

[Mark Pace]

I'm not sure how I would that, or how to point ERBSCAN to use that dataset.

On Wed, Jun 21, 2017 at 11:26 AM, J R  wrote:

> Have you tried preallocating a large SYSPRINT dataset?
>
>
>
> > On Jun 21, 2017, at 11:05, Mark Pace  wrote:
> >
> > I'm trying to run an ERBSCAN against a really large SMF file.
> >
> > Please Wait... Copying to temporary VSAM dataset...
> >
> > Then after a minute.
> >
> > IEC030I B37-04,IFG0554A,MARPACE,IKJACCNT,SYSPRINT,B420,TMPL05,
> > SYS17172.T110243.RA000.MARPACE.R0116499
> > ***
> >
> > So my impression is that the Temporary dataset was defined to small and
> ran
> > out of extents.  Is there some place where I change the default size of
> the
> > temporary dataset?
> >
> >
> >
> > --
> > The postings on this site are my own and don’t necessarily represent
> > Mainline’s positions or opinions
> >
> > Mark D Pace
> > Senior Systems Engineer
> > Mainline Information Systems
> >
> > --
> > For IBM-MAIN subscribe / signoff / archive access instructions,
> > send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>



-- 
The postings on this site are my own and don’t necessarily represent
Mainline’s positions or opinions

Mark D Pace
Senior Systems Engineer
Mainline Information Systems

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Store Clock Fast really can give duplicates

[Tony Harminc]

On 21 June 2017 at 11:20, Phil Smith  wrote:
> Of course I meant "trying to test STCKE and compare it to STCK".

Or "trying to test STCKF and compare it to STCK"?

Muphry's law? (No, I did *not* mean...)

Tony H.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Orphan control blocks

[John Ganci]

Resend: My original reply had subject line "Re: Orphan control blocks". 
Resending with original subject line. Sorry about that.

This *may* be the classical problem described in Principles of Operation, 
SA22-7832-10. 

Look at the description of COMPARE AND SWAP and COMPARE DOUBLE AND SWAP 
beginning on page 7-127. In particular, note 4 in the Programming Notes on page 
7-128 -- 7-129. 

Finally, Appendix A has sample code you should examine. See the "Free Pool 
Manipulation" section that begins on page A-50. Compare the code you supplied 
with the ADD TO FREE LIST Routine on page A-51.

Regards,

John Ganci

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: ERBSCAN problem

[J R]

Have you tried preallocating a large SYSPRINT dataset?  



> On Jun 21, 2017, at 11:05, Mark Pace  wrote:
> 
> I'm trying to run an ERBSCAN against a really large SMF file.
> 
> Please Wait... Copying to temporary VSAM dataset...
> 
> Then after a minute.
> 
> IEC030I B37-04,IFG0554A,MARPACE,IKJACCNT,SYSPRINT,B420,TMPL05,
> SYS17172.T110243.RA000.MARPACE.R0116499
> ***
> 
> So my impression is that the Temporary dataset was defined to small and ran
> out of extents.  Is there some place where I change the default size of the
> temporary dataset?
> 
> 
> 
> -- 
> The postings on this site are my own and don’t necessarily represent
> Mainline’s positions or opinions
> 
> Mark D Pace
> Senior Systems Engineer
> Mainline Information Systems
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Orphan control blocks

[John Ganci]

This *may* be the classical problem described in Principles of Operation, 
SA22-7832-10. 

Look at the description of COMPARE AND SWAP and COMPARE DOUBLE AND SWAP 
beginning on page 7-127. In particular, Note 4 in the Programming Notes on page 
7-128 -- 7-129. 

Finally, Appendix A has sample code you should examine. See the "Free Pool 
Manipulation" section that begins on page A-50. Compare the code you supplied 
with the ADD TO FREE LIST Routine on page A-51.

Regards,

John Ganci

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Store Clock Fast really can give duplicates

[Phil Smith]

Of course I meant "trying to test STCKE and compare it to STCK".


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

ERBSCAN problem

[Mark Pace]

I'm trying to run an ERBSCAN against a really large SMF file.

 Please Wait... Copying to temporary VSAM dataset...

Then after a minute.

IEC030I B37-04,IFG0554A,MARPACE,IKJACCNT,SYSPRINT,B420,TMPL05,
SYS17172.T110243.RA000.MARPACE.R0116499
***

So my impression is that the Temporary dataset was defined to small and ran
out of extents.  Is there some place where I change the default size of the
temporary dataset?



-- 
The postings on this site are my own and don’t necessarily represent
Mainline’s positions or opinions

Mark D Pace
Senior Systems Engineer
Mainline Information Systems

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: extract syslog data

[william janulin]

Lizette,
It is in JES2. I was able to print the selected time period using the PRINT to 
dataset option which allowed me to then FTP the log to IBM support.
Thank you for responding. 

regards, Bill J.
 

On Wednesday, June 21, 2017 10:19 AM, Lizette Koehler 
 wrote:
 

 Where is your syslog located?

If still in JES2 Spool, and you have SDSF, then the PRINT command in SDSF will 
work.  This can print to a file or you can print to your TSO Session, the use 
XDC to print to a dataset of your choice



If it is in an external dataset, you have the following options (no particular 
order)

  REXX
  DFSORT
  SAS
  COBOL
  ISPF EDIT (if the file is not very large)
  PL/1
  SAS
  IDCAMS
  Also check the cbttape.org and see if there are any tools there you might use

Basically, if it is in a seq file, you can use any tool you like to copy the 
data.  You just need to know the first line you want to copy to the last line 
you want to copy.

In ISPF EDIT that is a RELATIVE LINE NUMBER on the VIEW or EDIT Panel

Everything is pretty much dependent on where your SYSLOG is and whether or not 
you need to create your own process.

Use a function you are familiar.


Lizette

  

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of william janulin
> Sent: Wednesday, June 21, 2017 6:55 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: extract syslog data
> 
> To list;
>  Does anyone know of a utility that can be used to extract zOS syslog data
> for a specificdate and time period or which manual I cold find the info?
>  I am hoping I will not have to use cut & paste to get the informationneeded
> for a PMR I have open.
> Thank you in advance, Bill J.
> 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

   

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: extract syslog data

[Lizette Koehler]

One other option.

In SDSF is the FILTER function on the top menu.  If you have specific messages 
or jobs or other you want rather than all lines in a particular time frame, you 
can use that to cut down on the amount of data.

All is detailed in the TOC for SDSF.  I find that when I am in a specific 
function in SDSF, if I enter an INVALID command, then use the HELP Key (PF1) I 
will be presented with the functions available for that panel.  That way I do 
not need to know what they are and easier to find the details.



Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Lizette Koehler
> Sent: Wednesday, June 21, 2017 7:20 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: extract syslog data
> 
> Where is your syslog located?
> 
> If still in JES2 Spool, and you have SDSF, then the PRINT command in SDSF
> will work.  This can print to a file or you can print to your TSO Session,
> the use XDC to print to a dataset of your choice
> 
> 
> 
> If it is in an external dataset, you have the following options (no
> particular order)
> 
>REXX
>DFSORT
>SAS
>COBOL
>ISPF EDIT (if the file is not very large)
>PL/1
>SAS
>IDCAMS
>Also check the cbttape.org and see if there are any tools there you might
> use
> 
> Basically, if it is in a seq file, you can use any tool you like to copy the
> data.  You just need to know the first line you want to copy to the last line
> you want to copy.
> 
> In ISPF EDIT that is a RELATIVE LINE NUMBER on the VIEW or EDIT Panel
> 
> Everything is pretty much dependent on where your SYSLOG is and whether or
> not you need to create your own process.
> 
> Use a function you are familiar.
> 
> 
> Lizette
> 
> 
> 
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of william janulin
> > Sent: Wednesday, June 21, 2017 6:55 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: extract syslog data
> >
> > To list;
> >   Does anyone know of a utility that can be used to extract zOS syslog
> > data for a specificdate and time period or which manual I cold find the
> info?
> >  I am hoping I will not have to use cut & paste to get the
> > informationneeded for a PMR I have open.
> > Thank you in advance, Bill J.
> >
> 
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send email to
> lists...@listserv.ua.edu with the message: INFO IBM-MAIN

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: extract syslog data

[Lizette Koehler]

Where is your syslog located?

If still in JES2 Spool, and you have SDSF, then the PRINT command in SDSF will 
work.  This can print to a file or you can print to your TSO Session, the use 
XDC to print to a dataset of your choice



If it is in an external dataset, you have the following options (no particular 
order)

   REXX
   DFSORT
   SAS
   COBOL
   ISPF EDIT (if the file is not very large)
   PL/1
   SAS
   IDCAMS
   Also check the cbttape.org and see if there are any tools there you might use

Basically, if it is in a seq file, you can use any tool you like to copy the 
data.  You just need to know the first line you want to copy to the last line 
you want to copy.

In ISPF EDIT that is a RELATIVE LINE NUMBER on the VIEW or EDIT Panel

Everything is pretty much dependent on where your SYSLOG is and whether or not 
you need to create your own process.

Use a function you are familiar.


Lizette

   

> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of william janulin
> Sent: Wednesday, June 21, 2017 6:55 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: extract syslog data
> 
> To list;
>   Does anyone know of a utility that can be used to extract zOS syslog data
> for a specificdate and time period or which manual I cold find the info?
>  I am hoping I will not have to use cut & paste to get the informationneeded
> for a PMR I have open.
> Thank you in advance, Bill J.
> 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: extract syslog data

[william janulin]

Thank you for the response. Yes, the SDSF print function works very nice. It 
prvides a panel where you can enter a date and time rangeperfect!
Regards, Bill J.
 

On Wednesday, June 21, 2017 10:03 AM, Elardus Engelbrecht 
 wrote:
 

 william janulin wrote:

>  Does anyone know of a utility that can be used to extract zOS syslog data 
>for a specific date and time period or which manual I cold find the info?

If your SYSLOG for a specific date/time is still kept in JES SPOOL, you can use 
SDSF Print function.


> I am hoping I will not have to use cut & paste to get the informationneeded 
> for a PMR I have open.

SDSF Print function is very handy, no need to cut/copy/paste. Just open the 
function, select your start/end lines, print and then print close.

Do you have any Spool grabber utility? Something like BMC Control-D or such 
product?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

   

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

extract syslog data com169.856.612

[Bavo Devogeleer]

Dear,


 you can use idcams to extract some lines from syslog file


 //DUMPS1 EXEC  PGM=IDCAMS,REGION=4000K  

//SYSPRINT  DD  SYSOUT=X

//IND   DD  DISP=SHR,   

//  DSN= YOUR INPUT SYSLOG FILE NAME

//OUTD  DD  UNIT=3390,SPACE=(CYL,(200,100),RLSE),   

//  DISP=(NEW,CATLG,DELETE),

//  DCB=(YOUR INPUT SYSLOG FILE NAME  ),

//  DSN= YOUR OUTPUT FILENAME   

//SYSIN  DD  *  

  REPRO IFILE(IND) OFILE(OUTD) SKIP(2531000) COUNT(4)   

/*  


regards


Bavo.


 


 


 


 
- Origineel bericht: com169.854.772 -



From: william janulin (008d52e04f2e-dmarc-requ...@listserv.ua.edu)

To: IBM-MAIN@LISTSERV.UA.EDU

Copy: claude.cuvel...@colruytgroup.com, bavo.devogel...@colruytgroup.com

Subject: extract syslog data

Date: 21 juni 2017 (15:55)



 

To list;

  Does anyone know of a utility that can be used to extract zOS syslog data for 
a specificdate and time period or which manual I cold find the info?

I am hoping I will not have to use cut & paste to get the informationneeded for 
a PMR I have open.

Thank you in advance, Bill J.



--

For IBM-MAIN subscribe / signoff / archive access instructions,

send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

 





Dit bericht is onderworpen aan de voorwaarden beschikbaar op onze website
Ce message est soumis aux conditions disponibles sur  notre site web
This message is subject to the terms and conditions available on  our website

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: extract syslog data

[Elardus Engelbrecht]

william janulin wrote:

>  Does anyone know of a utility that can be used to extract zOS syslog data 
>for a specific date and time period or which manual I cold find the info?

If your SYSLOG for a specific date/time is still kept in JES SPOOL, you can use 
SDSF Print function.


> I am hoping I will not have to use cut & paste to get the informationneeded 
> for a PMR I have open.

SDSF Print function is very handy, no need to cut/copy/paste. Just open the 
function, select your start/end lines, print and then print close.

Do you have any Spool grabber utility? Something like BMC Control-D or such 
product?

Groete / Greetings
Elardus Engelbrecht

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

extract syslog data

[william janulin]

To list;
  Does anyone know of a utility that can be used to extract zOS syslog data for 
a specificdate and time period or which manual I cold find the info?
 I am hoping I will not have to use cut & paste to get the informationneeded 
for a PMR I have open.
Thank you in advance, Bill J.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: IBM customer anchor

[Paul Gilmartin]

On Wed, 21 Jun 2017 08:36:17 -0400, Peter Relson wrote:

>>one problem we kept running into was that not everyone 
>>registered their use with IBM and apparently we had some 
>>people's favorite offset number, so occasionally we 
>>would have people step on us.
>
>If you have any detailed information on this (such as anything that might 
>identify the culprit), perhaps you could share it offline with me.
>
>I truly find it rather hard to believe that anyone would be so 
>irresponsible as to do this..
> 
And there's little practical defense.  Requiring authentication won't
work because the offender was probably APF-authorized.  Is this
perhaps a license violation?  But it's not worth the legal fees to
pursue.

Name/token has a similar weakness.  Might the vendor rely on
embedding a registered trademark or domain name (16 characters
is too few) in the name?  But enforcement remains a problem.

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: CSSMTP user exit and external email

[Paul Gilmartin]

On Wed, 21 Jun 2017 21:50:47 +1000, Andrew Rowley wrote:
>
>I have written up a sample Java program to send email from z/OS via
>Gmail here:
>https://www.blackhillsoftware.com/news/2017/06/21/sending-email-from-zos-using-java/
>
>Java on z/OS is a giant leap forward in ease of doing things - when I
>first decided to test this, I Googled "java send email via Gmail" and
>had a test program working within 30 minutes.
> 
Nice.  I see:
final String username = "smtp-username";
final String password = "smtp-password";

Rather than hard-coding, could these be extracted from RACF (or other?)
database?  Or kept in suitably protected user-specific files?

What about headers?  Ideally, I might expect:
From: z/OS-ID
Sender: "smtp-username"

or:
Reply-to: z/OS-ID

But would GMail or a corporate mail server tolerate these, which might appear
to be used for forgeries or mail-bombing?

Hardcoding these or a corporate server should not be a problem:
props.put("mail.smtp.host", "smtp.gmail.com");
props.put("mail.smtp.port", "587");

Might these be publicized (not stored) on CBTTAPE.org to attract
users to Black Hill's storefront?

-- gil

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: Estae and the Linkage Stack

[Peter Relson]

ESTAE is not associated with the "task"; it is more granular than that. 
It is associated with an RB and a linkage stack level.

When the RB ends, any ESTAE associated with the RB is removed by the 
system.
When the linkage stack level with which the ESTAE is associated "goes 
away", any ESTAE associated with that linkage stack level goes away (where 
z/OS gets control to do this processing due to the unstack suppression bit 
that Greg mentioned).

As you can surmise, when you create an ESTAE(X), the system records "which 
RB" and "what is the linkage stack level".
For an ARR or IEAARR ESTAE-type recovery routine, RTM figures out based on 
the linkage stack entry's PC-number information (so it does not apply to a 
BAKR-created linkage stack entry) whether there is an ARR or whether it is 
one of the PC numbers for IEAARR.

Peter Relson
z/OS Core Technology Design


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: IBM customer anchor

[Peter Relson]

>one problem we kept running into was that not everyone 
>registered their use with IBM and apparently we had some 
>people's favorite offset number, so occasionally we 
>would have people step on us.

If you have any detailed information on this (such as anything that might 
identify the culprit), perhaps you could share it offline with me.

I truly find it rather hard to believe that anyone would be so 
irresponsible as to do this..

Peter Relson
z/OS Core Technology Design


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: CSSMTP user exit and external email

[Jousma, David]

Andrew,  thank-you very much for taking the time to put up the sample.   

Dave

_
Dave Jousma
Manager Mainframe Engineering, Assistant Vice President
david.jou...@53.com
1830 East Paris, Grand Rapids, MI  49546 MD RSCB2H
p 616.653.8429
f 616.653.2717

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Andrew Rowley
Sent: Wednesday, June 21, 2017 7:51 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: CSSMTP user exit and external email

On 20/06/2017 09:30 PM, Jousma, David wrote:
> Sounds interesting.  Where would I learn more about this?
>
I have written up a sample Java program to send email from z/OS via Gmail here:
https://www.blackhillsoftware.com/news/2017/06/21/sending-email-from-zos-using-java/

Java on z/OS is a giant leap forward in ease of doing things - when I first 
decided to test this, I Googled "java send email via Gmail" and had a test 
program working within 30 minutes.

--
For IBM-MAIN subscribe / signoff / archive access instructions, send email to 
lists...@listserv.ua.edu with the message: INFO IBM-MAIN


This e-mail transmission contains information that is confidential and may be 
privileged.   It is intended only for the addressee(s) named above. If you 
receive this e-mail in error, please do not read, copy or disseminate it in any 
manner. If you are not the intended recipient, any disclosure, copying, 
distribution or use of the contents of this information is prohibited. Please 
reply to the message immediately by informing the sender that the message was 
misdirected. After replying, please erase it from your computer system. Your 
assistance in correcting this error is appreciated.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Re: CSSMTP user exit and external email

[Andrew Rowley]

On 20/06/2017 09:30 PM, Jousma, David wrote:

Sounds interesting.  Where would I learn more about this?

I have written up a sample Java program to send email from z/OS via 
Gmail here:

https://www.blackhillsoftware.com/news/2017/06/21/sending-email-from-zos-using-java/

Java on z/OS is a giant leap forward in ease of doing things - when I 
first decided to test this, I Googled "java send email via Gmail" and 
had a test program working within 30 minutes.


--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN

Does VCs still invest in legacy technology?

[ITschak Mugzach]

I wonder if  this industry still attract venture capital (or private
equity) and whether there are vcs expertise in legacy texhnology
inveatments.

ITachak

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN