Re: TSO Command to issue message to Outtrap

[Joseph Reichman]

I have used it to capture data in test I.E list command where I can interrogate 
the data at 
A breakpoint 



> On Nov 2, 2016, at 3:13 PM, Dyck, Lionel B. (TRA)  wrote:
> 
> Does anyone know of any TSO command (or REXX function) that will let me send 
> text to the screen that can be captured by OUTTRAP?
> 
> What I'm trying to do is have a rexx dialog that does something like this 
> (very simplified):
> 
> Call outtrap 't.'
> Write 'starting xyz'
> 'xyz'<=== tso command
> Call outtrap 'off'
> Do I = 1 to t.0;say t.i;end
> 
> 
> --
> Lionel B. Dyck (TRA Contractor)
> Mainframe Systems Programmer 
> Enterprise Infrastructure Support (Station 200) (005OP6.3.10)
> VA OI Service Delivery & Engineering
> 
> 
> --
> 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: [EXTERNAL] Re: TSO Command to issue message to Outtrap

[Bill Godfrey]

There's the source code to the SENDTOME command, which does what you want.
http://www.tsotimes.com/holdold/articles/archive/fall03/sendtomesc.html
You might know about that already, as that page has a link to your site.

Bill

On Thu, 3 Nov 2016 09:17:30 -0500, Dyck, Lionel B. (TRA)  
wrote:

>The use of OUTTRAP is easy and I use it frequently.  What I was trying to do 
>is to add messages to the trap stem from within the exec.
>
>For example:
>
>Call outtrap 'trap.'
>Msg 'call listd for sys1.parmlib'
>'listd sys1.parmlib'
>Msg 'call ended for listd'
>Call outtrap 'off'
>
>In this example the two msg lines would be commands to send those messages to 
>be trapped but there is nothing that I can do that will do that within this 
>exec.  The example of calling a secondary exec and then trapping that output 
>works but not in the primary exec like this.
>

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

Re: SMF RECORD TYPE : HELP

[Ronald Hawkins]

John,
Have you tried D U ... ALLOC COMMAND?
Ron

Sent from Yahoo Mail on Android 
 
  On Thu, Nov 3, 2016 at 4:52, John 
Dawes<00ff0e22811f-dmarc-requ...@listserv.ua.edu> wrote:   G'Day,

Could someone suggest how I could obtain information about a certain DASD 
volume?  I am trying to trouble shoot a problem of a job failure when 
attempting to copy a volume using the following parms.

COPY INDYNAM(SYS012) OUTDYNAM(BCD012) CANCELERROR      - 
    PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY -    

I get the following message:

ADR306E (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT VOLUME BCD012 
 IS IN USE. TASK IS TERMINATED

I am trying to find out what resource was using the volume at that time.  I 
thought that SMF would be a solution however I don't see a SMF record type for 
DASD.

Any suggestions would be very welcome.

Thanks.

--
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: Question on TZ and European time change

[Norbert Friemel]

On Thu, 3 Nov 2016 13:14:13 -0700, Charles Mills wrote:

>Thanks much. That gives me two things to tell the customer to look at.
>
>Is the D in CEDT in your post a typo or are you looking at a different IBM 
>recommendation than I am?
>
>Does anyone happen to know what the default date is if you specify the short 
>form CET1CEST rather than the long form CET1CEST,M3.5.0,M10.5.0?
>
>Charles

'TZ=CET-1CEST,M3.5.0/2:00,M10.5.0/3:00'

http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.cbcpx01/cbc1p2559.htm
" If this daylight savings time rule is omitted altogether, the values in the 
rule default to the standard American daylight savings time rules starting at 
02:00:00 the second Sunday in March and ending at 02:00:00 the first Sunday in 
November."

https://en.wikipedia.org/wiki/Summer_Time_in_Europe

Norbert Friemel

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

Re: Question on TZ and European time change

[Charles Mills]

The below was supposed to be an internal e-mail not the reply to the list, but 
you get the idea.

Thanks @John.

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Charles Mills
Sent: Thursday, November 03, 2016 1:31 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on TZ and European time change

Hmmm. The IBM Web site is wrong.

Here is what they want:

ZONE('CET-1CEST,M3.5.0,M10.5.0')

 

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

Re: Question on TZ and European time change

[Charles Mills]

Hmmm. The IBM Web site is wrong.

 

Here is what they want:

 

ZONE('CET-1CEST,M3.5.0,M10.5.0')

 

Gives the correct value:

 

16308 21:26:52.293 CZA0216I MODIFY processing completed

 

9:29 PM

Thursday, November 3, 2016 (GMT+1)

Time in Paris, France

 

Without the dates it is in fact one hour off.

 

Charles

 

-Original Message-
From: Charles Mills [mailto:charl...@mcn.org] 
Sent: Thursday, November 03, 2016 1:14 PM
To: 'IBM Mainframe Discussion List'
Subject: RE: Question on TZ and European time change

 

Thanks much. That gives me two things to tell the customer to look at.

 

Is the D in CEDT in your post a typo or are you looking at a different IBM 
recommendation than I am?

 

Does anyone happen to know what the default date is if you specify the short 
form CET1CEST rather than the long form CET1CEST,M3.5.0,M10.5.0?

 

Charles

 

-Original Message-

From: IBM Mainframe Discussion List [  
mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of John McKown

Sent: Thursday, November 03, 2016 12:50 PM

To:   IBM-MAIN@LISTSERV.UA.EDU

Subject: Re: Question on TZ and European time change

 

On Thu, Nov 3, 2016 at 2:32 PM, Charles Mills <  
charl...@mcn.org> wrote:

 

> Thanks @John, good points that I failed to cover in my OP.

> 

> The application runs POSIX(ON) (hence my reference to TZ [no 

> underscore]) and yes, issues the code below with no error reported.

> 

> int seRes = 0;

> seRes = setenv("TZ", Time_TZset.c_str(), 1);

> if (seRes != 0) Msg::Print(::Msgs[260], strerror(errno));  //

> "160E Error returned from setenv(\"TZ\"); time functions may not work

> correctly: %1$s

> 

> Charles

> 

> 

​I wrote up a Q C program on a z/OS 2.2 system. The output shows:

 

:JOARMC:/u/joarmc/junk$

./test-time

rc=0timeval=Thu Nov  3 14:44:07 2016

 

rc=0timeval=Thu Nov  3 14:44:07 2016

 

:JOARMC:/u/joarmc/junk$

./test-time

rc=0timeval=Thu Nov  3 14:44:23 2016

 

rc=0timeval=Thu Nov  3 14:44:23 2016

 

:JOARMC:/u/joarmc/junk$

TZ=CET-1CEST,M3.5.0,M10.5.0 ./test-time

rc=0timeval=Thu Nov  3 20:44:27 2016

 

rc=0timeval=Thu Nov  3 20:44:27 2016

 

:JOARMC:/u/joarmc/junk$

TZ=CET-1CEST ./test-time

rc=0timeval=Thu Nov  3 21:44:36 2016

 

rc=0timeval=Thu Nov  3 21:44:36 2016​

 

 

 

​Note that I got the TZ=CEST-1CEDT,M3.5.0,M10.5.0 from the IBM site:

 

 
http://www.ibm.com/support/knowledgecenter/SS2RWS_1.11.0/com.ibm.zsecure.doc_1.11/zsec111_install104.html

Using the TZ above got what appears to be the correct answer.

 

What I think this means is that whatever is determining the "switch over"

date on z/OS UNIX is not set up correctly. ​

 

The code I used is:

 

#define _LARGE_TIME_API

#define _ALL_SOURCE

#define _POSIX

#include 

#include 

#include 

#include 

int main(int argc, char *argv[]) {

struct timeval64 tp1;

   struct timeval64 tp2;

int rc;

rc=gettimeofday64(,NULL);

printf("rc=%d\ttimeval=%s\n",rc,ctime64(_sec));

tzset();

rc=gettimeofday64(,NULL);

printf("rc=%d\ttimeval=%s\n",rc,ctime64(_sec));

}

 

 

--

Heisenberg may have been here.

 

Unicode:   http://xkcd.com/1726/

 

Maranatha! <><

John McKown

 

--

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: Question on TZ and European time change

[Charles Mills]

Thanks much. That gives me two things to tell the customer to look at.

Is the D in CEDT in your post a typo or are you looking at a different IBM 
recommendation than I am?

Does anyone happen to know what the default date is if you specify the short 
form CET1CEST rather than the long form CET1CEST,M3.5.0,M10.5.0?

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Thursday, November 03, 2016 12:50 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on TZ and European time change

On Thu, Nov 3, 2016 at 2:32 PM, Charles Mills  wrote:

> Thanks @John, good points that I failed to cover in my OP.
>
> The application runs POSIX(ON) (hence my reference to TZ [no 
> underscore]) and yes, issues the code below with no error reported.
>
> int seRes = 0;
> seRes = setenv("TZ", Time_TZset.c_str(), 1);
> if (seRes != 0) Msg::Print(::Msgs[260], strerror(errno));  //
> "160E Error returned from setenv(\"TZ\"); time functions may not work
> correctly: %1$s
>
> Charles
>
>
​I wrote up a Q C program on a z/OS 2.2 system. The output shows:

:JOARMC:/u/joarmc/junk$
./test-time
rc=0timeval=Thu Nov  3 14:44:07 2016

rc=0timeval=Thu Nov  3 14:44:07 2016

:JOARMC:/u/joarmc/junk$
./test-time
rc=0timeval=Thu Nov  3 14:44:23 2016

rc=0timeval=Thu Nov  3 14:44:23 2016

:JOARMC:/u/joarmc/junk$
TZ=CET-1CEST,M3.5.0,M10.5.0 ./test-time
rc=0timeval=Thu Nov  3 20:44:27 2016

rc=0timeval=Thu Nov  3 20:44:27 2016

:JOARMC:/u/joarmc/junk$
TZ=CET-1CEST ./test-time
rc=0timeval=Thu Nov  3 21:44:36 2016

rc=0timeval=Thu Nov  3 21:44:36 2016​



​Note that I got the TZ=CEST-1CEDT,M3.5.0,M10.5.0 from the IBM site:
http://www.ibm.com/support/knowledgecenter/SS2RWS_1.11.0/com.ibm.zsecure.doc_1.11/zsec111_install104.html
Using the TZ above got what appears to be the correct answer.

What I think this means is that whatever is determining the "switch over"
date on z/OS UNIX is not set up correctly. ​

The code I used is:

#define _LARGE_TIME_API
#define _ALL_SOURCE
#define _POSIX
#include 
#include 
#include 
#include 
int main(int argc, char *argv[]) {
struct timeval64 tp1;
struct timeval64 tp2;
int rc;
rc=gettimeofday64(,NULL);
printf("rc=%d\ttimeval=%s\n",rc,ctime64(_sec));
tzset();
rc=gettimeofday64(,NULL);
printf("rc=%d\ttimeval=%s\n",rc,ctime64(_sec));
}


--
Heisenberg may have been here.

Unicode: http://xkcd.com/1726/

Maranatha! <><
John McKown

--
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: OLD Manual - any one aware of something more current VSE to z/os

[Michael O'Byrne]

If you do a Google search on "dos to mvs conversion guide" you will find a 
number of references. 
SG24-2043 - VSE to OS/390 Migration Workbook appears to be a follow on 
manual to GG66-3113 and is available at the IBM Publications site for 
download (BookManager only).  If you add DL/1 to the search, you will get 
some information on DL/1 as well. 

When I was doing DOS to MVS conversions for IBM (30+ years ago) the 
recommendation would be to use IMS-DB to support DL/1 (hierarchical 
database mapped to hierarchical).   Today, I would recommend evaluating a 
conversion to DB2 or perhaps the use of a product which maps IMS DB to 
DB2. 



Michael C. O'Byrne
Senior Software Analyst - Enterprise Server
Foot Locker Corporate Services
7800 W Brown Deer Rd, Milwaukee, WI 53223
(414) 357-4094



From:   August Carideo/RYE/US 
To: IBM-MAIN@listserv.ua.edu
Date:   11/03/2016 02:20 PM
Subject:OLD Manual - any one aware of something more current VSE 
to z/os
Sent by:IBM Mainframe Discussion List 



Believe it or not I have kept this manual published in 1989  because some 
things never change especially concept wise.
I was wondering if anyone is aware of something more up to date, (was 
going to search the IBM red books) or any suggestions where else to look.
The Manual was from the Washington Systems Center, Technical Bulletin, 
GG66-3113-00, Enterprise and Application Enabling System Support
VSE to MVS Differences and Migration Guide
Has anyone recently performed a VSE to Z/os Migration ? which included 
DL/1
Thanks,
Augie


--
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: Question on TZ and European time change

[John McKown]

On Thu, Nov 3, 2016 at 2:32 PM, Charles Mills  wrote:

> Thanks @John, good points that I failed to cover in my OP.
>
> The application runs POSIX(ON) (hence my reference to TZ [no underscore])
> and yes, issues the code below with no error reported.
>
> int seRes = 0;
> seRes = setenv("TZ", Time_TZset.c_str(), 1);
> if (seRes != 0) Msg::Print(::Msgs[260], strerror(errno));  //
> "160E Error returned from setenv(\"TZ\"); time functions may not work
> correctly: %1$s
>
> Charles
>
>
​I wrote up a Q C program on a z/OS 2.2 system. The output shows:

:JOARMC:/u/joarmc/junk$
./test-time
rc=0timeval=Thu Nov  3 14:44:07 2016

rc=0timeval=Thu Nov  3 14:44:07 2016

:JOARMC:/u/joarmc/junk$
./test-time
rc=0timeval=Thu Nov  3 14:44:23 2016

rc=0timeval=Thu Nov  3 14:44:23 2016

:JOARMC:/u/joarmc/junk$
TZ=CET-1CEST,M3.5.0,M10.5.0 ./test-time
rc=0timeval=Thu Nov  3 20:44:27 2016

rc=0timeval=Thu Nov  3 20:44:27 2016

:JOARMC:/u/joarmc/junk$
TZ=CET-1CEST ./test-time
rc=0timeval=Thu Nov  3 21:44:36 2016

rc=0timeval=Thu Nov  3 21:44:36 2016​



​Note that I got the TZ=CEST-1CEDT,M3.5.0,M10.5.0 from the IBM site:
http://www.ibm.com/support/knowledgecenter/SS2RWS_1.11.0/com.ibm.zsecure.doc_1.11/zsec111_install104.html
Using the TZ above got what appears to be the correct answer.

What I think this means is that whatever is determining the "switch over"
date on z/OS UNIX is not set up correctly. ​

The code I used is:

#define _LARGE_TIME_API
#define _ALL_SOURCE
#define _POSIX
#include 
#include 
#include 
#include 
int main(int argc, char *argv[]) {
struct timeval64 tp1;
struct timeval64 tp2;
int rc;
rc=gettimeofday64(,NULL);
printf("rc=%d\ttimeval=%s\n",rc,ctime64(_sec));
tzset();
rc=gettimeofday64(,NULL);
printf("rc=%d\ttimeval=%s\n",rc,ctime64(_sec));
}


-- 
Heisenberg may have been here.

Unicode: http://xkcd.com/1726/

Maranatha! <><
John McKown

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

Re: Weird problem hoping to be saved by SMP/E

[Tom Marchant]

On Thu, 3 Nov 2016 12:48:03 -0500, Paul Gilmartin wrote:

>But my thought processes have been contaminated by the superior (in
>this case) facilities of VMSES/E.  VMSES/E has no ACCEPT nore any
>analogue if the DLIB zone.  This enables multi-layer VMFREMOV
>(analog of RESTORE).  Suppose a function that used to work fails
>and I suspect it was broken by service.  I can VMFREMOV to the
>state of a week ago and re-test with the failing input.  If it continues
>to fail, I can further VMFREMOV to a month ago.  And so on.
>Can't do likewise with SMP/E.  RESTORE can't be used, by itself
>to revert to an arbitrary prior level.

This is why my preferred method of installing service is to clone my target 
and distribution zones, and apply the service to the clone. When it looks 
like the APPLY was successful, I'd IPL (for z/OS) or otherwise activate (for 
other kinds of products). When I'm satisfied that the old zones are no longer 
needed, I'd delete the old zones.

-- 
Tom Marchant

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

FW: OLD Manual - any one aware of something more current VSE to z/os

[August Carideo/RYE/US]

Found this so far, it's a bit newer

http://www.redbooks.ibm.com/redbooks/pdfs/sg242043.pdf


Believe it or not I have kept this manual published in 1989  because some 
things never change especially concept wise.
I was wondering if anyone is aware of something more up to date, (was going to 
search the IBM red books) or any suggestions where else to look.
The Manual was from the Washington Systems Center, Technical Bulletin, 
GG66-3113-00, Enterprise and Application Enabling System Support
VSE to MVS Differences and Migration Guide
Has anyone recently performed a VSE to Z/os Migration ? which included DL/1
Thanks,
Augie


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

Re: Question on TZ and European time change

[Charles Mills]

Thanks @John, good points that I failed to cover in my OP.

The application runs POSIX(ON) (hence my reference to TZ [no underscore]) and 
yes, issues the code below with no error reported.

int seRes = 0;
seRes = setenv("TZ", Time_TZset.c_str(), 1);
if (seRes != 0) Msg::Print(::Msgs[260], strerror(errno));  // "160E 
Error returned from setenv(\"TZ\"); time functions may not work correctly: %1$s

Charles

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John McKown
Sent: Thursday, November 03, 2016 12:05 PM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Question on TZ and European time change

On Thu, Nov 3, 2016 at 1:29 PM, Charles Mills  wrote:

> I am supporting a customer in Europe. They are reporting that the 
> timestamps in our messages -- which are produced from the C library 
> routines
> gettimeofday64() + localtime64() -- were correct during the summer but 
> did not change to standard time this past weekend. TZ is apparently 
> set to 'CET-1CEST' (without the quotes).
>
> What should I be looking for?
>
> Thanks,
>
> Charles
>
>
​I don't have a way to test this readily, but reading about
gettimeofday64() from

http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00/gettmdy.htm

it appears that gettimeofday64() does not do a tzset() automatically (whereas 
gettimeofday does, but if and only if _ALL_SOURCE is #DEFINEd).

For localtime64(), from
http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00/localt.htm
If your application runs POSIX(ON), then it should honor TZ. But if it run 
POSIX(OFF), then _TZ (leading underscore) is required.
also:
[quote]
The localtime() function converts calendar time (that is, seconds elapsed since 
the epoch) to broken-down time, expressed as local time, using time zone 
information provided by the TZ or _TZ environment variable or the LC_TOD 
category of the current locale:

   - When neither TZ nor _TZ is defined, the current locale is interrogated
   for time zone information. If neither TZ nor _TZ is defined and LC_TOD time
   zone information is not present in the current locale, a default value is
   applied to local time. POSIX programs simply default to Coordinated
   Universal Time (UTC), while non-POSIX programs establish an offset from UTC
   based on the setting of the system clock. For more information about
   customizing a time zone to work with local time, see “Customizing a time
   zone” in z/OS XL C/C++ Programming Guide
   

   .

​[quote/]​

​Perhaps your code needs to an explicit tzset() before invoking
gettimeofday64() or localtime64(), but I don't really know.


--
Heisenberg may have been here.

Unicode: http://xkcd.com/1726/

Maranatha! <><
John McKown

--
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

OLD Manual - any one aware of something more current VSE to z/os

[August Carideo/RYE/US]

Believe it or not I have kept this manual published in 1989  because some 
things never change especially concept wise.
I was wondering if anyone is aware of something more up to date, (was going to 
search the IBM red books) or any suggestions where else to look.
The Manual was from the Washington Systems Center, Technical Bulletin, 
GG66-3113-00, Enterprise and Application Enabling System Support
VSE to MVS Differences and Migration Guide
Has anyone recently performed a VSE to Z/os Migration ? which included DL/1
Thanks,
Augie


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

Re: Question on TZ and European time change

[John McKown]

On Thu, Nov 3, 2016 at 1:29 PM, Charles Mills  wrote:

> I am supporting a customer in Europe. They are reporting that the
> timestamps
> in our messages -- which are produced from the C library routines
> gettimeofday64() + localtime64() -- were correct during the summer but did
> not change to standard time this past weekend. TZ is apparently set to
> 'CET-1CEST' (without the quotes).
>
> What should I be looking for?
>
> Thanks,
>
> Charles
>
>
​I don't have a way to test this readily, but reading about
gettimeofday64() from

http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00/gettmdy.htm

it appears that gettimeofday64() does not do a tzset() automatically
(whereas gettimeofday does, but if and only if _ALL_SOURCE is #DEFINEd).

For localtime64(), from
http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.bpxbd00/localt.htm
If your application runs POSIX(ON), then it should honor TZ. But if it run
POSIX(OFF), then _TZ (leading underscore) is required.
also:
[quote]
The localtime() function converts calendar time (that is, seconds elapsed
since the epoch) to broken-down time, expressed as local time, using time
zone information provided by the TZ or _TZ environment variable or the
LC_TOD category of the current locale:

   - When neither TZ nor _TZ is defined, the current locale is interrogated
   for time zone information. If neither TZ nor _TZ is defined and LC_TOD time
   zone information is not present in the current locale, a default value is
   applied to local time. POSIX programs simply default to Coordinated
   Universal Time (UTC), while non-POSIX programs establish an offset from UTC
   based on the setting of the system clock. For more information about
   customizing a time zone to work with local time, see “Customizing a time
   zone” in z/OS XL C/C++ Programming Guide
   

   .

​[quote/]​

​Perhaps your code needs to an explicit tzset() before invoking
gettimeofday64() or localtime64(), but I don't really know.


-- 
Heisenberg may have been here.

Unicode: http://xkcd.com/1726/

Maranatha! <><
John McKown

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

Question on TZ and European time change

[Charles Mills]

I am supporting a customer in Europe. They are reporting that the timestamps
in our messages -- which are produced from the C library routines
gettimeofday64() + localtime64() -- were correct during the summer but did
not change to standard time this past weekend. TZ is apparently set to
'CET-1CEST' (without the quotes). 

What should I be looking for?

Thanks,

Charles 

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

Re: Weird problem hoping to be saved by SMP/E

[Paul Gilmartin]

On Thu, 3 Nov 2016 11:19:56 -0500, Tom Marchant wrote:

>On Wed, 2 Nov 2016 09:54:49 -0600, Paul Gilmartin wrote:
>
>>I wish that LINK LMODS could appear in a SYSMOD
>>rather than only in SMPCNTL.
>
>I don't see why, but ok.
> 
Simpler instructions from the supplier to the customer.  If LINK LMODS appeared
in a SYSMOD, it would be performed in a routine APPLY, with no need for
a ++HOLD SYSTEM advising the customer of the need to perform a LINK LMODS
to make the change take effect.

>>Even better if a SYSMOD containing
>>LINK LMODS could be RESTORed.
>
>What would that mean? If LINK LMODS creates the target load module from the 
>distribution zone, and RESTORE takes the elements from the distribution zone, 
>what would be the result of such a RESTORE?
>
"Put it back the way it was before".

Will LINK LMODS also use elements from the GLOBAL zone that
have not been ACCEPTed?  (There should be an option to control
this.)

But my thought processes have been contaminated by the superior (in
this case) facilities of VMSES/E.  VMSES/E has no ACCEPT nore any
analogue if the DLIB zone.  This enables multi-layer VMFREMOV
(analog of RESTORE).  Suppose a function that used to work fails
and I suspect it was broken by service.  I can VMFREMOV to the
state of a week ago and re-test with the failing input.  If it continues
to fail, I can further VMFREMOV to a month ago.  And so on.
Can't do likewise with SMP/E.  RESTORE can't be used, by itself
to revert to an arbitrary prior level.

Create an new target zone and APPLY up to that prior state,
providing that no intervening PTFs have been purged?  Ugh!
(The not-purged condition is always a requirement.)

-- gil

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

Re: SMF RECORD TYPE : HELP

[John Dawes]

We ar e running RELEASE z/OS 02.01.00.  The target volume (DASD) is for 
Flashcopy only.  We have had this type of problem intermittently for other 
volumes as well.

On Thu, 3/11/16, Lizette Koehler  wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 9:06 AM
 
 What version of z/OS are
 you running?
 
 
 So, I might try the following
 
 If you have an automation
 tool, this works easier
 
 Start the displays when the JOB enters the
 system
 
 1)  D
 GRS,DEV=         This can be imbedded in
 the JCL with the // command JCL Card or issued as an MVS
 Command
 
 2)  D
 U,,ALLOC,,1      This can be imbedded in the JCL with
 the // command JCL Card or issued as an MVS Command
 
 3)  Add
 PARM='UTILMSG=YES'
 
 4)  Review the volume to see what is on it. 
 Any catalogs, DB2 Tables, zFS or HFS files that might be
 enqueued?
 
 5)  Is BCD012 a
 tape or disk?  Is it purely a flashcopy volume? Or do you
 allow it to be used by other activities?
 
 6)  Is this first time this job has had an
 issue or is this a reoccurring event?
 
 7)  As others have stated, RMF Panels could
 help
 
 
 Lizette
 
 
 
 
 
 >
 -Original Message-
 > From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On
 > Behalf Of John Dawes
 > Sent: Thursday, November 03, 2016 4:53
 AM
 > To: IBM-MAIN@LISTSERV.UA.EDU
 > Subject: SMF RECORD TYPE : HELP
 > 
 > G'Day,
 > 
 > Could someone
 suggest how I could obtain information about a certain
 DASD
 > volume?  I am trying to trouble
 shoot a problem of a job failure when
 >
 attempting to copy a volume using the following parms.
 > 
 > COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012) CANCELERROR      -
 >      PURGE ALLEXCP ALLDATA(*) OPT(4)
 ADMIN FCNOCOPY -
 > 
 >
 I get the following message:
 > 
 > ADR306E (043)-SBRTN(01), UNABLE TO COPY
 THE VOLUME BECAUSE OUTPUT VOLUME
 >
 BCD012  IS IN USE. TASK IS TERMINATED
 >
 
 > I am trying to find out what resource
 was using the volume at that time.  I
 >
 thought that SMF would be a solution however I don't see
 a SMF record type for
 > DASD.
 > 
 > Any suggestions
 would be very welcome.
 > 
 > Thanks.
 
 --
 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: SMF RECORD TYPE : HELP

[John Dawes]

Lizette,

I checked with our Capacity Performance group and they informed me that the 
data is retained for a day.  Thanks for the info.

On Thu, 3/11/16, Lizette Koehler  wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 9:15 AM
 
 If they set up the RMF
 ISPF application in your environment - Most shops use a
 REXX/CLIST to access it.
 
 In
 my shop we created RMFIII as the REXX/CLIST.  However, you
 shop might be different.  You need to have datasets that
 use SERBxxx allocated to your TSO Session.  See if your
 sysprog can help.
 
 This link
 shows the RMF libraries that are allocated (dynamically or
 hard coded in the TSO Logon Proc) to your TSO Session to use
 the RMF Panels
 
 
http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.erbb200/exec.htm
 
 Unless the libraries are
 allocated, you cannot use the RMF Panels.
 
 The second issue is how large
 are the RMF monitor VSAM Files?  If they are too small,
 then the option will not be able to retain sufficient data
 to do past analysis.
 
 If you
 have SAS/MXG or SAS/MICS, then you can run the dasd reports
 for RMF.
 
 Lizette
 
 
 
 
 
 
 >
 -Original Message-
 > From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On
 > Behalf Of John Dawes
 > Sent: Thursday, November 03, 2016 5:36
 AM
 > To: IBM-MAIN@LISTSERV.UA.EDU
 > Subject: Re: SMF RECORD TYPE : HELP
 > 
 > Thanks for the
 suggestion.  I am not familiar on how to use.  I sure
 would
 > like to try.
 >
 
 > Is it interactive via ISPF?
 > 
 >
 
 > On Thu, 3/11/16, Campbell Jay 
 wrote:
 > 
 >  Subject:
 Re: SMF RECORD TYPE : HELP
 >  To: IBM-MAIN@LISTSERV.UA.EDU
 >  Received: Thursday, 3 November, 2016,
 8:32 AM
 > 
 >  How
 about  RMF
 >  panels   3 - 2
 - 5 ?
 >  Put in
 > 
 jobname - then set time for when job was running
 > 
 >  Jay Campbell
 >  MSSD – IZSSB – IOSSS
 > 
 >  -Original
 Message-
 >  From: IBM Mainframe
 Discussion List [mailto:IBM-MAIN@listserv.ua.edu] 
 On
 > Behalf Of John Dawes
 >  Sent: Thursday,
 > 
 November 03, 2016 8:23 AM
 >  To: IBM-MAIN@listserv.ua.edu
 >  Subject: Re: SMF RECORD TYPE : HELP
 > 
 >  Yes, I tried
 that.  However,
 >  when I issued the
 command it was too late (3 minutes after  the job
 > abend).  This is why I thought by 
 reading SMF  records would have some info
 > on the volume.
 > 
 > 
 > 
 
 >  On Thu, 3/11/16, Blake, Daniel J [CTR]
 <00f1be92566d-dmarc-
 > requ...@listserv.ua.edu>
 >  wrote:
 > 
 >   Subject: Re: SMF
 >  RECORD TYPE : HELP
 >   To: IBM-MAIN@LISTSERV.UA.EDU
 >   Received: Thursday, 3
 November, 2016, 7:56  AM
 > 
 >   Have you tried the
 >  alloc
 >   command from the console or
 SDSF?
 > 
 >   D U,,ALLOC,devaddr,1
 > 
 >   Thank
 You
 > 
 > 
 > 
 >   ;-D
 an
 > 
 > 
 > 
 > 
 > 
 >  -Original
 Message-
 >   From: IBM
 >  Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
 On Behalf Of
 > John Dawes
 >   Sent: Thursday,
 >   November 03, 2016 7:53 AM
 >   To:
 >  IBM-MAIN@LISTSERV.UA.EDU
 >   Subject: SMF RECORD TYPE :
 HELP
 > 
 >   G'Day,
 > 
 > 
 >   Could someone suggest how I
 could obtain  information about a certain DASD
 > volume?  I am trying to  trouble shoot a
 problem of a job failure when
 >
 attempting  to  copy a volume using the following
 parms.
 > 
 >   COPY INDYNAM(SYS012)
 >  OUTDYNAM(BCD012)
 >   CANCELERROR      -
 > 
 >      PURGE
 ALLEXCP
 >  ALLDATA(*) OPT(4) ADMIN
 FCNOCOPY
 >   -
 > 
 >   I get
 the following
 >   message:
 > 
 > 
 >  ADR306E
 >   (043)-SBRTN(01), UNABLE TO
 COPY THE
 >  VOLUME BECAUSE OUTPUT 
 VOLUME BCD012  IS IN USE. TASK IS  TERMINATED
 > 
 >   I am
 trying to
 >  find out what
 >   resource was using the
 volume
 >  at that time.  I thought
 that  SMF would be a solution  however I don't see
 a
 > SMF record  type for DASD.
 > 
 >   Any
 > 
 >  suggestions would
 be very welcome.
 > 
 >   Thanks.
 >
 
 
 --
 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: Weird problem hoping to be saved by SMP/E

[Tom Marchant]

On Wed, 2 Nov 2016 09:54:49 -0600, Paul Gilmartin wrote:

>I wish that LINK LMODS could appear in a SYSMOD
>rather than only in SMPCNTL.

I don't see why, but ok.

>Even better if a SYSMOD containing
>LINK LMODS could be RESTORed.

What would that mean? If LINK LMODS creates the target load module from the 
distribution zone, and RESTORE takes the elements from the distribution zone, 
what would be the result of such a RESTORE?

--
Tom Marchant

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

Re: : Looking for some direction on USS / JAVA / C / COBOL and or Assembler please.

[Jim]

Hello Denis,

Thank you for your response. 

I found out about COBOL 64 / 31 a couple of hours after I'd posted .. 

I've written a 64 bit assembler program that in turn calls the 31 bit COBOL 
program. 
Have not had a chance to test it just yet .. 

In any event, thank you very much for your response. 

Kind Regards,

Jim

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Denis
Sent: Thursday, November 03, 2016 02:28
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: : Looking for some direction on USS / JAVA / C / COBOL and or 
Assembler please.

Hi Jim,
 
you cannot mix 64bit Java and 31bit COBOL. As of now there is no COBOL compiler 
that creates 64bit code.
Please switch to the 31bit JVM.
In addition, you can code JNI calls in COBOL, no C wrapper required and compile 
it using JCL.
Please note, that C can produce 64bit code and as such can be used with the 
64bit JVM. But without Assembler you cannot call the 64bit C module from COBOL 
(which is 31bit).
 
You can also find samples of COBOL/Java in the redbook:
New Ways of Running Batch Applications on z/OS: Volume 4 IBM IMS

Although it mentiones IMS and Batch, COBOL/Java interoperability is a Language 
Environment Feature, which is not limited to IMS or Batch.
All the compiles in the Book are done with JCL.

By the way, there is a Java Doc in preparation with samples and discussions for 
COBOL/Java which is expected to be released around mid November, which will 
replace and enhance information from the mentioned redbook.

Denis.

 
-Original Message-
From: Jim 
To: IBM-MAIN 
Sent: Wed, Nov 2, 2016 10:15 pm
Subject: Re : Looking for some direction on USS /  JAVA / C / COBOL and or 
Assembler please.

Listers,

For brevity ... I've been trying to get the Standalone Java vol 2 example of 
JAVA calling COBOL (and assembler) via a C glue working, unsuccessfully ..  

I'm on a  z/OS 2.2 box, Java 7 x64 only .. I can install 31bit java am hoping I 
won't be limited to that ... 

I've compiled my skeletons, both assembler and COBOL under native z/OS and 
included RENT, DYNAM(DLL) and AMODE64. 


For the Java part .. it's a simple javac programname.java followed by a javah 
programname (class name)... for the C part ... I've been using the below .. 

c89 -c -o programname.o -W "c,langlvl(extended)",lp64 -W c,expo,lp64,dll 
-DNEEDSIEE754 -DNEEDSLONGLONG -I/usr/lpp/java/J7.0_64/include programname.c
c89 -Wl,lp64,dll -o libprogramname.so programname.o 
"//'HLQ.PDSE.OBJ(COBOLPROGRAM | ASSEMBLERPROGRAM)'"

With the 'lp64' included .. for the 2nd step (link) .. I keep getting ..

IEW2480W A711 EXTERNAL SYMBOL CEELLIST OF TYPE LD WAS ALREADY DEFINED AS A   
  SYMBOL OF TYPE LD IN SECTION CEEBLLST.
 IEW2482W A712 THE ORIGINAL DEFINITION WAS IN A MODULE IDENTIFIED BY DDNAME   
  C8921.  THE DUPLICATE DEFINITION IS IN SECTION CELQLLST  IN A MODULE
  IDENTIFIED BY DDNAME SYSLIB.   
 IEW2491E 9373 CLASSES C_WSA and C_WSA64 ARE BOTH PRESENT IN THE MODULE.  
FSUM3065 The LINKEDIT step ended with return code 8.  

I do see that both, the COBOL and assembler objects (under z/OS) are amode 64 / 
rmode any ... I do not know how to do the same under USS but am going by the 
options provided to 'c89' ... 

If I remove the 'lp64' option ... it compiles / links fine .. but when I try to 
run (java programname) .. I get a class not found error followed by a 
java.lang.unspecifiedlinkerror ... this is on the java System.loadLibrary 
statement ... when I changed it to System.load specifying the full path ... I 
got an EDC5253S An AMODE64 application is attempting to load an AMODE31 DLL 
load module .. 

Any advice / direction would be appreciated  ...

Kind Regards.

Jim 

--
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



-
No virus found in this message.
Checked by AVG - www.avg.com
Version: 2016.0.7859 / Virus Database: 4664/13341 - Release Date: 11/03/16

-
No virus found in this message.
Checked by AVG - www.avg.com
Version: 2016.0.7859 / Virus Database: 4664/13341 - Release Date: 11/03/16

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

Re: Xposted from TCP/IP list SSL Problems, please help

[Ward, Mike S]

The problem was resolved by ensuring that ICSF comes up before TN3270. Once 
TN3270 comes up it never checks ICSF services again unless you recycle it.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Jacobs - Listserv
Sent: Thursday, October 27, 2016 11:40 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Xposted from TCP/IP list SSL Problems, please help

WAG, Does TCP/IP have read access to the private key in the PKDS?
CSFKEYS resource.

Mark Jacobs

> Ward, Mike S 
> October 27, 2016 at 12:33 PM
> Hello list I have a small problem that I was hoping I could get some
> help with.
>
> System is z/OS V1.13 running on a Z13s W01 soon to be V2.2, but not
> yet and not soon enough.
>
> We are using system SSL/TLS not AT/TLS for FTP and TN3270. We have
> Crypto express 5 cards with a CEX5C coprocessor.
>
> I wanted to take advantage of the crypto cards so I imported the
>
> RSA cerftificate we were using using the PCICC(*) option. This is
> supposed to take the private key and place it in the PKDS which is
> supposed to perform better than using software ssl encryption.
>
> To my dismay TN3270 will no longer support a SSL\TLS connection,
> however Secure FTP has no problem. I ensured that nothing was changed
> in the keyring and that the correct SITE certificate shows up there. I
> also made sure that TN3270 and FTP are pointing to the same keyring.
>
> The RACF display of the keyring shows this:
>
> Digital ring information for user TCPIP:
>
> Ring:
> >SharedRing<
> Certificate Label Name Cert Owner USAGE DEFAULT
>    --- X
> Cert 2048 Authority CERTAUTH CERTAUTH NO
>
> TCPIPSharedSite SITE PERSONAL YES
>
>
> The above is correct.
>
> The access from FTP is shown below: IP addresses and userid's changed
> to protect the innocent.
>
> Oct 26 14:21:30 JESH01 ftpd[33555196]: EZYFS50I ID=FTPD100119 CONN
> starts Client IPaddr=999.99.1.27 hostname=UNKNOWN Oct 26 14:21:30
> JESH01 ftps[33555196]: EZYFS54I ID=FTPD100119 SECURE OK
> Mechanism=TLS-P Oct 26 14:21:30 JESH01 ftps[33555196]: EZYFS56I
> ID=FTPD100119 ACCESS OK USERID=XX Oct 26 14:21:31 JESH01
> ftps[33555195]: EZYFS67I ID=FTPD100119 ALLOC OK Use HFS
> filename=/u/log/2016/10/24/ftp.log
>
> We ran an SSL trace and this is what we get:
>
> Job,TN3270 Process 0016 Thread 001C crypto_rsa_private_decrypt
> Stored,private key support is not available , SSF1, MESSAGE 0004
> 14:43:03.790222 SSL_ERROR ,
> Job,TN3270 Process 0016 Thread 001C read_v3_client_key_exchang
> Unable,to decrypt pre-master secret: Error 0x0335301a
>
>
> The trace looks good until we get the Error 0x0335301a.
>
> 0335301A No private key.
> Explanation: A private key request cannot be processed because the
> database entry does not contain a private key. This error can occur if
> the private key is stored in the Integrated Cryptographic Service
> Facility
> (ICSF) but the CSF started task is not running.
> User response: Verify that the CSF started task is running if the
> private key is stored in ICSF. Otherwise, repeat the failing request
> using a database entry containing a private key.
>
> I'm at a loss ICSF is up and running, and the crypto cards are
> supposed to have the PCICC coprocessors.
>
> Secure Tn3270 does not work, but secure FTP does.
>
> I'm at a loss any idea's welcome.
>
> Thanks
>
> ==
> This email, and any files transmitted with it, is confidential and
> intended solely for the use of the individual or entity to which it is
> addressed. If you have received this email in error, please notify the
> system manager. This message contains confidential information and is
> intended only for the individual named. If you are not the named
> addressee, you should not disseminate, distribute or copy this e-mail.
> Please notify the sender immediately by e-mail if you have received
> this message by mistake and delete this e-mail from your system. If
> you are not the intended recipient, you are notified that disclosing,
> copying, distributing or taking any action in reliance on the contents
> of this information is strictly prohibited.
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> Please be alert for any emails that may ask you for login information
> or directs you to login via a link. If you believe this message is a
> phish or aren't sure whether this message is trustworthy, please send
> the original message as an attachment to 'phish...@timeinc.com'.
>

--

Mark Jacobs
Time Customer Service
Global Technology Services

The standard you walk past is the standard you accept.
Lt. Gen. David Morrison


--
For IBM-MAIN subscribe / signoff / archive 

Re: DB2 Shutdown Problem

[Steve Carlson (Contractor)]

Thanks I will check this out.

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

Re: DB2 Shutdown Problem

[Steve Carlson]

Thanks for this information. I will check this out.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Vernooij, Kees (ITOPT1) - KLM
Sent: Thursday, November 03, 2016 6:24 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DB2 Shutdown Problem

That's an old one, we ran into this 25 years ago. To my surprise the default is 
currently still YES.

Kees.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Jacobs - Listserv
Sent: 03 November, 2016 14:03
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DB2 Shutdown Problem

Check your SMF options, If DDCONS(NO) is not set, that may be your problem.

> Steve Carlson (Contractor)  November 3, 
> 2016 at 9:00 AM When trying to shut down the DB2 regions on our 
> Development LPAR the
> DB2M1 regions are taking over 1 hour to shut down. I have also noticed 
> that over 9000 SMF Type 30 records for the DBM1 STC's are being 
> generated during this time. Here is a list of the DB2 STC's:
> DB2YADMT
> DB2YDBM1
> DB2YDIST
> DB2YIRLM
> DB2YMSTR
> DB2YWLM2
>
>
> The following commands were issued before shutting down this DB2 region:
>
> -DB2Y DISPLAY THREAD(*)
> -DB2Y DIS UTILITY(*)
> -DB2Y DIS DDF
>
> All of the STC's except for DB2YDBM1 come down within about 10 
> minutes. Also these STC's have been up and running for over 60 days 
> and are at Release 10. The DB2YDBM1 takes over 1 hour to come down.
>
> Has anyone else seen this problem, and what did you do to resolve this 
> problem?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions, send 
> email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> Please be alert for any emails that may ask you for login information 
> or directs you to login via a link. If you believe this message is a 
> phish or aren't sure whether this message is trustworthy, please send 
> the original message as an attachment to 'phish...@timeinc.com'.
>

-- 

Mark Jacobs
Time Customer Service
Global Technology Services

The standard you walk past is the standard you accept.
Lt. Gen. David Morrison


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

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286




--
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: DB2 Shutdown Problem

[Elardus Engelbrecht]

Vernooij, Kees (ITOPT1) - KLM wrote:

>That's an old one, we ran into this 25 years ago. To my surprise the default 
>is currently still YES. 

Yip, thats a golden oldie! Look at II07124 and OY25606 and perhaps others too.


John McKown said in 2005: "We have DDCONS set to NO. Why? Because with DDCONS 
set to YES, our long running started tasks (such as NET and CA-7) took too long 
to terminate."

... and in 2006 this gem: "I think that DDCONS(YES) has something in it about 
efficient as a bubble sort of 100,000 records. Yuck!"

Oh, someone told me last week about this one where DDCONS(NO) can resolve this 
problem:
 
'Slowdown in CICS TS every 15 minutes with resource manager waits and DB2 
hanging' in Tech Note Reference #: 1206955 (year 2014) 


Steve Carlson wrote:

> When trying to shut down the DB2 regions on our Development LPAR the DB2M1 
> regions are taking over 1 hour to shut down. I have also noticed that over 
> 9000 SMF Type 30 records for the DBM1 STC's are being generated during this 
> time.

That is an old neverending story. As others kindly suggested, change your SMF 
settings. You may need to stop/start your DB2 subsystems to get the last SMF 
records out _AFTER_ you changed your SMF settings with T SMF=??.


>Also these STC's have been up and running for over 60 days and are at Release 
>10. 

Release does not matter. Since what DB2 release did these problems happen?


> Has anyone else seen this problem, and what did you do to resolve this 
> problem? 

Not only with DB2, in fact, any [usually longrunning] STCs with lots of 
datasets are having this problem.

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

Re: [EXTERNAL] Re: TSO Command to issue message to Outtrap

[Dyck, Lionel B. (TRA)]

The use of OUTTRAP is easy and I use it frequently.  What I was trying to do is 
to add messages to the trap stem from within the exec.

For example:

Call outtrap 'trap.'
Msg 'call listd for sys1.parmlib'
'listd sys1.parmlib'
Msg 'call ended for listd'
Call outtrap 'off'

In this example the two msg lines would be commands to send those messages to 
be trapped but there is nothing that I can do that will do that within this 
exec.  The example of calling a secondary exec and then trapping that output 
works but not in the primary exec like this.


--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer 
Enterprise Infrastructure Support (Station 200) (005OP6.3.10)
VA OI Service Delivery & Engineering


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

Re: TSO Command to issue message to Outtrap

[Elardus Engelbrecht]

Dyck, Lionel B. wrote:

>Nice - it does work - thank you.  I don't know why I haven't been able to get 
>outtrap to capture say's before.  I will have to look closer.  Great example. 

Charles (Chuck) Hardee sample is working. In fact, OUTTRAP has been discussed 
previously in IBM-MAIN.

Check Mark Zelden's website. There are some similar REXX programs which do the 
same type of capturing.

I use this little example gem to do a nice LISTCAT of something in ISPF. I have 
many such REXX programs getting info from ISPF, SDSF, etc. all of them using 
OUTTRAP. This example has been heavely trimmed for posting here.

/* REXX */
ARG NAME  
PROF NOPREF   
ADDRESS TSO   
IF NAME = '' THEN DO  
  SAY 'Please enter dataset name to list:'
  PARSE UPPER PULL NAME   
END   
ADDRESS ISPEXEC "CONTROL ERRORS RETURN"   
DDNM = USERID()'.DD'||RANDOM(1,9) 
JUNK = MSG(OFF)   
/*  ISSUE LISTCAT CMD AND TRAP OUTPUT  */ 
JUNK=OUTTRAP(LINE.)   
"LISTC ALL ENT("||NAME||")" 
RETCODE = RC  
JUNK=OUTTRAP('OFF')   
ADDRESS ISPEXEC "LMINIT DATAID(LIST) DATASET("||DDNM||")" 
ADDRESS ISPEXEC "BROWSE DATAID("||LIST")"
ADDRESS ISPEXEC "LMFREE DATAID("||LIST")"
"DELETE "||DDNM  
JUNK = MSG(OFF)  
ZDLMSG = 'LISTED RC='||RETCODE   
ADDRESS ISPEXEC "VPUT ZDLMSG SHARED" 

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

Re: Cancel STARTING

[Rob Schramm]

Actually, I am pretty sure C STARTING works if there is only one.

Rob

On Wed, Nov 2, 2016, 2:52 PM Gibney, Dave  wrote:

> Also,  looking into why there are STARTING tasks and stopping it would be
> a good idea :)
>
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Lizette Koehler
> > Sent: Wednesday, November 02, 2016 10:20 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Cancel STARTING
> >
> > Not sure of your question.
> >
> > However,  C STARTING,A=
> >
> > Says to cancel the task STARTING in the Address Space 
> >
> > You may have multiple tasks in Starting Status, this allows you to
> cancel a
> > specific STARTING in an specific ASID.
> >
> > If you do CANCEL STARTING, I think z/OS would not know what to do with
> that.
> >
> >
> > Lizette
> >
> >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > > On Behalf Of Nathan Astle
> > > Sent: Wednesday, November 02, 2016 10:14 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Cancel STARTING
> > >
> > > Hi
> > >
> > > Apology for asking a dummy question.
> > >
> > > When we have multiple STC in starting status. We issue C
> > > STARTING,A=
> > >
> > > Does it mean we are cancelling just based on Cancel status ?
> > >
> > > Nathan
> >
> > --
> > 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
>
-- 

Rob Schramm

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

Re: Cancel STARTING

[Vernooij, Kees (ITOPT1) - KLM]

Sure, it does. 
Only if there are more than one, you need A= to tell MVS which one must be 
cancelled.

Kees.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Rob Schramm
Sent: 03 November, 2016 14:58
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: Cancel STARTING

Actually, I am pretty sure C STARTING works if there is only one.

Rob

On Wed, Nov 2, 2016, 2:52 PM Gibney, Dave  wrote:

> Also,  looking into why there are STARTING tasks and stopping it would be
> a good idea :)
>
> > -Original Message-
> > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > On Behalf Of Lizette Koehler
> > Sent: Wednesday, November 02, 2016 10:20 AM
> > To: IBM-MAIN@LISTSERV.UA.EDU
> > Subject: Re: Cancel STARTING
> >
> > Not sure of your question.
> >
> > However,  C STARTING,A=
> >
> > Says to cancel the task STARTING in the Address Space 
> >
> > You may have multiple tasks in Starting Status, this allows you to
> cancel a
> > specific STARTING in an specific ASID.
> >
> > If you do CANCEL STARTING, I think z/OS would not know what to do with
> that.
> >
> >
> > Lizette
> >
> >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
> > > On Behalf Of Nathan Astle
> > > Sent: Wednesday, November 02, 2016 10:14 AM
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Cancel STARTING
> > >
> > > Hi
> > >
> > > Apology for asking a dummy question.
> > >
> > > When we have multiple STC in starting status. We issue C
> > > STARTING,A=
> > >
> > > Does it mean we are cancelling just based on Cancel status ?
> > >
> > > Nathan
> >
> > --
> > 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
>
-- 

Rob Schramm

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

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286




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

Re: Weird problem hoping to be saved by SMP/E

[Rob Schramm]

LOL.

Kurt,

Many thanks for the most direct and easy solution.  The systems are now as
they should have been.

Rob Schramm

On Thu, Nov 3, 2016, 8:27 AM Kurt Quackenbush  wrote:

> > Is this really as simple as
> >
> > LINK LMODS(module1)
> >  CHECK.
> >
> > And it will just relink the load module?
>
> Yes, that's the function of the LINK command.
>
> Well, of course you have to remove CHECK for SMP/E to perform the actual
> link edit operation.  Doh!
>
> Kurt Quackenbush -- IBM, SMP/E Development
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
-- 

Rob Schramm

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

Re: DB2 Shutdown Problem

[Vernooij, Kees (ITOPT1) - KLM]

That's an old one, we ran into this 25 years ago. To my surprise the default is 
currently still YES.

Kees.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Mark Jacobs - Listserv
Sent: 03 November, 2016 14:03
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: DB2 Shutdown Problem

Check your SMF options, If DDCONS(NO) is not set, that may be your problem.

> Steve Carlson (Contractor) 
> November 3, 2016 at 9:00 AM
> When trying to shut down the DB2 regions on our Development LPAR the 
> DB2M1 regions are taking over 1 hour to shut down. I have also noticed 
> that over 9000 SMF Type 30 records for the DBM1 STC's are being 
> generated during this time. Here is a list of the DB2 STC's:
> DB2YADMT
> DB2YDBM1
> DB2YDIST
> DB2YIRLM
> DB2YMSTR
> DB2YWLM2
>
>
> The following commands were issued before shutting down this DB2 region:
>
> -DB2Y DISPLAY THREAD(*)
> -DB2Y DIS UTILITY(*)
> -DB2Y DIS DDF
>
> All of the STC's except for DB2YDBM1 come down within about 10 
> minutes. Also these STC's have been up and running for over 60 days 
> and are at Release 10. The DB2YDBM1 takes over 1 hour to come down.
>
> Has anyone else seen this problem, and what did you do to resolve this 
> problem?
>
> --
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
>
>
> Please be alert for any emails that may ask you for login information 
> or directs you to login via a link. If you believe this message is a 
> phish or aren't sure whether this message is trustworthy, please send 
> the original message as an attachment to 'phish...@timeinc.com'.
>

-- 

Mark Jacobs
Time Customer Service
Global Technology Services

The standard you walk past is the standard you accept.
Lt. Gen. David Morrison


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

For information, services and offers, please visit our web site: 
http://www.klm.com. This e-mail and any attachment may contain confidential and 
privileged material intended for the addressee only. If you are not the 
addressee, you are notified that no part of the e-mail or any attachment may be 
disclosed, copied or distributed, and that any other action related to this 
e-mail or attachment is strictly prohibited, and may be unlawful. If you have 
received this e-mail by error, please notify the sender immediately by return 
e-mail, and delete this message. 

Koninklijke Luchtvaart Maatschappij NV (KLM), its subsidiaries and/or its 
employees shall not be liable for the incorrect or incomplete transmission of 
this e-mail or any attachments, nor responsible for any delay in receipt. 
Koninklijke Luchtvaart Maatschappij N.V. (also known as KLM Royal Dutch 
Airlines) is registered in Amstelveen, The Netherlands, with registered number 
33014286




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

Re: SMF RECORD TYPE : HELP

[Blake, Daniel J [CTR]]

OK, add an SDSF step before your FDR dump step, then one after your FDR dump 
step.  Rerun the job.

//COMMAND1  EXEC PGM=ISFAFD
//ISFOUT  DD  SYSOUT=*
//ISFIN   DD  *
  /D ALLOC,,devaddr,1
/*
//*
//FDRABR step here
//FDR 
//* 
//COMMAND2  EXEC PGM=ISFAFD
//ISFOUT  DD  SYSOUT=*
//ISFIN   DD  *
  /D ALLOC,,devaddr,1
/*



;-D an 

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:23 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SMF RECORD TYPE : HELP

Yes, I tried that.  However, when I issued the command it was too late (3 
minutes after the job abend).  This is why I thought by  reading SMF records 
would have some info on the volume.
 

On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 7:56 AM
 
 Have you tried the alloc
 command from the console or SDSF?
 
 D U,,ALLOC,devaddr,1
 
 Thank You
 
 
 ;-D an
 
 
  
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 7:53 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: SMF RECORD TYPE : HELP
 
 G'Day,
 
 Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting to  copy a volume using the following parms.
 
 COPY INDYNAM(SYS012) OUTDYNAM(BCD012)
 CANCELERROR      - 
  
    PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY
 -    
 
 I get the following
 message:
 
 ADR306E
 (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS 
IN USE. TASK IS TERMINATED
 
 I am trying to find out what
 resource was using the volume at that time.  I thought that  SMF would be a 
solution however I don't see a SMF record  type for DASD.
 
 Any
 suggestions would be very welcome.
 
 Thanks.
 
 --
 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


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

Re: SMF RECORD TYPE : HELP

[Lizette Koehler]

If they set up the RMF ISPF application in your environment - Most shops use a 
REXX/CLIST to access it.

In my shop we created RMFIII as the REXX/CLIST.  However, you shop might be 
different.  You need to have datasets that use SERBxxx allocated to your TSO 
Session.  See if your sysprog can help.

This link shows the RMF libraries that are allocated (dynamically or hard coded 
in the TSO Logon Proc) to your TSO Session to use the RMF Panels

http://www.ibm.com/support/knowledgecenter/SSLTBW_2.1.0/com.ibm.zos.v2r1.erbb200/exec.htm

Unless the libraries are allocated, you cannot use the RMF Panels.

The second issue is how large are the RMF monitor VSAM Files?  If they are too 
small, then the option will not be able to retain sufficient data to do past 
analysis.

If you have SAS/MXG or SAS/MICS, then you can run the dasd reports for RMF.

Lizette






> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of John Dawes
> Sent: Thursday, November 03, 2016 5:36 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: SMF RECORD TYPE : HELP
> 
> Thanks for the suggestion.  I am not familiar on how to use.  I sure would
> like to try.
> 
> Is it interactive via ISPF?
> 
> 
> On Thu, 3/11/16, Campbell Jay  wrote:
> 
>  Subject: Re: SMF RECORD TYPE : HELP
>  To: IBM-MAIN@LISTSERV.UA.EDU
>  Received: Thursday, 3 November, 2016, 8:32 AM
> 
>  How about  RMF
>  panels   3 - 2 - 5 ?
>  Put in
>  jobname - then set time for when job was running
> 
>  Jay Campbell
>  MSSD – IZSSB – IOSSS
> 
>  -Original Message-
>  From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]  On
> Behalf Of John Dawes
>  Sent: Thursday,
>  November 03, 2016 8:23 AM
>  To: IBM-MAIN@listserv.ua.edu
>  Subject: Re: SMF RECORD TYPE : HELP
> 
>  Yes, I tried that.  However,
>  when I issued the command it was too late (3 minutes after  the job
> abend).  This is why I thought by  reading SMF  records would have some info
> on the volume.
> 
> 
>  
>  On Thu, 3/11/16, Blake, Daniel J [CTR] <00f1be92566d-dmarc-
> requ...@listserv.ua.edu>
>  wrote:
> 
>   Subject: Re: SMF
>  RECORD TYPE : HELP
>   To: IBM-MAIN@LISTSERV.UA.EDU
>   Received: Thursday, 3 November, 2016, 7:56  AM
> 
>   Have you tried the
>  alloc
>   command from the console or SDSF?
> 
>   D U,,ALLOC,devaddr,1
> 
>   Thank You
> 
> 
> 
>   ;-D an
> 
> 
> 
> 
> 
>  -Original Message-
>   From: IBM
>  Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On Behalf Of
> John Dawes
>   Sent: Thursday,
>   November 03, 2016 7:53 AM
>   To:
>  IBM-MAIN@LISTSERV.UA.EDU
>   Subject: SMF RECORD TYPE : HELP
> 
>   G'Day,
> 
> 
>   Could someone suggest how I could obtain  information about a certain DASD
> volume?  I am trying to  trouble shoot a problem of a job failure when
> attempting  to  copy a volume using the following parms.
> 
>   COPY INDYNAM(SYS012)
>  OUTDYNAM(BCD012)
>   CANCELERROR  -
> 
>  PURGE ALLEXCP
>  ALLDATA(*) OPT(4) ADMIN FCNOCOPY
>   -
> 
>   I get the following
>   message:
> 
> 
>  ADR306E
>   (043)-SBRTN(01), UNABLE TO COPY THE
>  VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS  TERMINATED
> 
>   I am trying to
>  find out what
>   resource was using the volume
>  at that time.  I thought that  SMF would be a solution  however I don't see a
> SMF record  type for DASD.
> 
>   Any
> 
>  suggestions would be very welcome.
> 
>   Thanks.
> 

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

Re: DB2 Shutdown Problem

[Lizette Koehler]

If you were not aware, there is a list dedicated to DB2.  To join, which is 
free, go to IDUG.ORG to join.

Lizette


> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of Steve Carlson (Contractor)
> Sent: Thursday, November 03, 2016 6:00 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: DB2 Shutdown Problem
> 
> When trying to shut down the DB2 regions on our Development LPAR the DB2M1
> regions are taking over 1 hour to shut down. I have also noticed that over
> 9000 SMF Type 30 records for the DBM1 STC's are being generated during this
> time. Here is a list of the DB2 STC's:
> DB2YADMT
> DB2YDBM1
> DB2YDIST
> DB2YIRLM
> DB2YMSTR
> DB2YWLM2
> 
> 
> The following commands were issued before shutting down this DB2 region:
> 
> -DB2Y DISPLAY THREAD(*)
> -DB2Y DIS UTILITY(*)
> -DB2Y DIS DDF
> 
> All of the STC's except for DB2YDBM1 come down within about 10 minutes. Also
> these STC's have been up and running for over 60 days and are at Release 10.
> The DB2YDBM1 takes over 1 hour to come down.
> 
> Has anyone else seen this problem, and what did you do to resolve this
> problem?
> 

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

Re: SMF RECORD TYPE : HELP

[Lizette Koehler]

What version of z/OS are you running?


So, I might try the following

If you have an automation tool, this works easier

Start the displays when the JOB enters the system

1)  D GRS,DEV= This can be imbedded in the JCL with the // command 
JCL Card or issued as an MVS Command

2)  D U,,ALLOC,,1  This can be imbedded in the JCL with the // command 
JCL Card or issued as an MVS Command

3)  Add PARM='UTILMSG=YES'

4)  Review the volume to see what is on it.  Any catalogs, DB2 Tables, zFS or 
HFS files that might be enqueued?

5)  Is BCD012 a tape or disk?  Is it purely a flashcopy volume? Or do you allow 
it to be used by other activities?

6)  Is this first time this job has had an issue or is this a reoccurring event?

7)  As others have stated, RMF Panels could help


Lizette





> -Original Message-
> From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On
> Behalf Of John Dawes
> Sent: Thursday, November 03, 2016 4:53 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: SMF RECORD TYPE : HELP
> 
> G'Day,
> 
> Could someone suggest how I could obtain information about a certain DASD
> volume?  I am trying to trouble shoot a problem of a job failure when
> attempting to copy a volume using the following parms.
> 
> COPY INDYNAM(SYS012) OUTDYNAM(BCD012) CANCELERROR  -
>  PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY -
> 
> I get the following message:
> 
> ADR306E (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT VOLUME
> BCD012  IS IN USE. TASK IS TERMINATED
> 
> I am trying to find out what resource was using the volume at that time.  I
> thought that SMF would be a solution however I don't see a SMF record type for
> DASD.
> 
> Any suggestions would be very welcome.
> 
> Thanks.

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

Re: DB2 Shutdown Problem

[Mark Jacobs - Listserv]

Check your SMF options, If DDCONS(NO) is not set, that may be your problem.


Steve Carlson (Contractor) 
November 3, 2016 at 9:00 AM
When trying to shut down the DB2 regions on our Development LPAR the 
DB2M1 regions are taking over 1 hour to shut down. I have also noticed 
that over 9000 SMF Type 30 records for the DBM1 STC's are being 
generated during this time. Here is a list of the DB2 STC's:

DB2YADMT
DB2YDBM1
DB2YDIST
DB2YIRLM
DB2YMSTR
DB2YWLM2


The following commands were issued before shutting down this DB2 region:

-DB2Y DISPLAY THREAD(*)
-DB2Y DIS UTILITY(*)
-DB2Y DIS DDF

All of the STC's except for DB2YDBM1 come down within about 10 
minutes. Also these STC's have been up and running for over 60 days 
and are at Release 10. The DB2YDBM1 takes over 1 hour to come down.


Has anyone else seen this problem, and what did you do to resolve this 
problem?


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


Please be alert for any emails that may ask you for login information 
or directs you to login via a link. If you believe this message is a 
phish or aren't sure whether this message is trustworthy, please send 
the original message as an attachment to 'phish...@timeinc.com'.




--

Mark Jacobs
Time Customer Service
Global Technology Services

The standard you walk past is the standard you accept.
Lt. Gen. David Morrison


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

DB2 Shutdown Problem

[Steve Carlson (Contractor)]

When trying to shut down the DB2 regions on our Development LPAR the DB2M1 
regions are taking over 1 hour to shut down. I have also noticed that over 9000 
SMF Type 30 records for the DBM1 STC's are being generated during this time. 
Here is a list of the DB2 STC's:
DB2YADMT
DB2YDBM1
DB2YDIST
DB2YIRLM
DB2YMSTR
DB2YWLM2


The following commands were issued before shutting down this DB2 region:

-DB2Y DISPLAY THREAD(*)
-DB2Y DIS UTILITY(*)
-DB2Y DIS DDF
 
All of the STC's except for DB2YDBM1 come down within about 10 minutes. Also 
these STC's have been up and running for over 60 days and are at Release 10. 
The DB2YDBM1 takes over 1 hour to come down.

Has anyone else seen this problem, and what did you do to resolve this problem?

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

Re: SMF RECORD TYPE : HELP

[Blaicher, Christopher Y.]

SMF type 30 records have a section in them on DASD.  Recorded by unit number in 
the EXCP section.

Chris Blaicher
Technical Architect
Mainframe Development
Syncsort Incorporated
50 Tice Boulevard, Woodcliff Lake, NJ 07677
P: 201-930-8234  |  M: 512-627-3803
E: cblaic...@syncsort.com

www.syncsort.com





-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Campbell Jay
Sent: Thursday, November 3, 2016 8:46 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: SMF RECORD TYPE : HELP

SPOOL shouldn't matter.
Must have had RMFGAT running at the time.
No idea how long your RMF repository holds data.

Jay Campbell
MSSD – IZSSB – IOSSS


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:40 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: SMF RECORD TYPE : HELP

 I was able to access the panel however the job is no longer in the spool 
because it has been sent to $AVRS.


On Thu, 3/11/16, Campbell Jay  wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 8:32 AM

 How about  RMF
 panels   3 - 2 - 5 ?
 Put in
 jobname - then set time for when job was running

 Jay Campbell
 MSSD – IZSSB – IOSSS

 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 8:23 AM
 To: IBM-MAIN@listserv.ua.edu
 Subject: Re: SMF RECORD TYPE : HELP

 Yes, I tried that.  However,
 when I issued the command it was too late (3 minutes after  the job abend).  
This is why I thought by  reading SMF  records would have some info on the 
volume.


 
 On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu>
 wrote:

  Subject: Re: SMF
 RECORD TYPE : HELP
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Thursday, 3 November, 2016, 7:56  AM

  Have you tried the
 alloc
  command from the console or SDSF?

  D U,,ALLOC,devaddr,1

  Thank You



  ;-D an





 -Original Message-
  From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On Behalf Of John 
Dawes
  Sent: Thursday,
  November 03, 2016 7:53 AM
  To:
 IBM-MAIN@LISTSERV.UA.EDU
  Subject: SMF RECORD TYPE : HELP

  G'Day,


  Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting  to  copy a volume using the following parms.

  COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012)
  CANCELERROR  -

 PURGE ALLEXCP
 ALLDATA(*) OPT(4) ADMIN FCNOCOPY
  -

  I get the following
  message:


 ADR306E
  (043)-SBRTN(01), UNABLE TO COPY THE
 VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS  TERMINATED

  I am trying to
 find out what
  resource was using the volume
 at that time.  I thought that  SMF would be a solution  however I don't see a 
SMF record  type for DASD.

  Any

 suggestions would be very welcome.

  Thanks.


 --
  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

 --
 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





ATTENTION: -

The information contained in this message (including any files transmitted with 
this message) may contain proprietary, trade secret or other confidential 
and/or legally privileged information. Any pricing information contained in 
this message or in any files transmitted with this message is always 
confidential and cannot be shared with any third parties without prior written 
approval from Syncsort. This message is intended to be read only by the 
individual or entity to whom it is addressed or 

Re: SMF RECORD TYPE : HELP

[Campbell Jay]

SPOOL shouldn't matter.
Must have had RMFGAT running at the time.
No idea how long your RMF repository holds data.

Jay Campbell
MSSD – IZSSB – IOSSS


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:40 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: SMF RECORD TYPE : HELP

 I was able to access the panel however the job is no longer in the spool 
because it has been sent to $AVRS.


On Thu, 3/11/16, Campbell Jay  wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 8:32 AM
 
 How about  RMF
 panels   3 - 2 - 5 ?
 Put in
 jobname - then set time for when job was running
 
 Jay Campbell
 MSSD – IZSSB – IOSSS
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 8:23 AM
 To: IBM-MAIN@listserv.ua.edu
 Subject: Re: SMF RECORD TYPE : HELP
 
 Yes, I tried that.  However,
 when I issued the command it was too late (3 minutes after  the job abend).  
This is why I thought by  reading SMF  records would have some info on the 
volume.
 
 
 
 On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu>
 wrote:
 
  Subject: Re: SMF
 RECORD TYPE : HELP
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Thursday, 3 November, 2016, 7:56  AM
  
  Have you tried the
 alloc
  command from the console or SDSF?
  
  D U,,ALLOC,devaddr,1
  
  Thank You
 
 
  
  ;-D an
 
 
  
   
 
 -Original Message-
  From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On Behalf Of John 
Dawes
  Sent: Thursday,
  November 03, 2016 7:53 AM
  To:
 IBM-MAIN@LISTSERV.UA.EDU
  Subject: SMF RECORD TYPE : HELP
  
  G'Day,
 
 
  Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting  to  copy a volume using the following parms.
  
  COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012)
  CANCELERROR      - 
   
     PURGE ALLEXCP
 ALLDATA(*) OPT(4) ADMIN FCNOCOPY
  -    
  
  I get the following
  message:
  
 
 ADR306E
  (043)-SBRTN(01), UNABLE TO COPY THE
 VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS  TERMINATED
  
  I am trying to
 find out what
  resource was using the volume
 at that time.  I thought that  SMF would be a solution  however I don't see a 
SMF record  type for DASD.
  
  Any
 
 suggestions would be very welcome.
  
  Thanks.
  
 
 --
  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
 
 --
 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: SMF RECORD TYPE : HELP

[John Dawes]

 I was able to access the panel however the job is no longer in the spool 
because it has been sent to $AVRS.


On Thu, 3/11/16, Campbell Jay  wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 8:32 AM
 
 How about  RMF 
 panels   3 - 2 - 5 ?
 Put in
 jobname - then set time for when job was running
 
 Jay Campbell
 MSSD – IZSSB – IOSSS
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
 On Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 8:23 AM
 To: IBM-MAIN@listserv.ua.edu
 Subject: Re: SMF RECORD TYPE : HELP
 
 Yes, I tried that.  However,
 when I issued the command it was too late (3 minutes after
 the job abend).  This is why I thought by  reading SMF
 records would have some info on the volume.
 
 
 
 On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu>
 wrote:
 
  Subject: Re: SMF
 RECORD TYPE : HELP
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Thursday, 3 November, 2016, 7:56
 AM
  
  Have you tried the
 alloc
  command from the console or SDSF?
  
  D U,,ALLOC,devaddr,1
  
  Thank You
 
 
  
  ;-D an
 
 
  
   
 
 -Original Message-
  From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
 On Behalf Of John Dawes
  Sent: Thursday,
  November 03, 2016 7:53 AM
  To:
 IBM-MAIN@LISTSERV.UA.EDU
  Subject: SMF RECORD TYPE : HELP
  
  G'Day,
 
 
  Could someone suggest how I could obtain 
 information about a certain DASD volume?  I am trying to 
 trouble shoot a problem of a job failure when attempting
 to  copy a volume using the following parms.
  
  COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012)
  CANCELERROR      - 
   
     PURGE ALLEXCP
 ALLDATA(*) OPT(4) ADMIN FCNOCOPY
  -    
  
  I get the following
  message:
  
 
 ADR306E
  (043)-SBRTN(01), UNABLE TO COPY THE
 VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS
 TERMINATED
  
  I am trying to
 find out what
  resource was using the volume
 at that time.  I thought that  SMF would be a solution
 however I don't see a SMF record  type for DASD.
  
  Any
 
 suggestions would be very welcome.
  
  Thanks.
  
 
 --
  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
 
 --
 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: SMF RECORD TYPE : HELP

[Campbell Jay]

Our setup is

Jay Campbell
MSSD – IZSSB – IOSSS



-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:36 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: SMF RECORD TYPE : HELP

Thanks for the suggestion.  I am not familiar on how to use.  I sure would like 
to try.

Is it interactive via ISPF?


On Thu, 3/11/16, Campbell Jay  wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 8:32 AM
 
 How about  RMF
 panels   3 - 2 - 5 ?
 Put in
 jobname - then set time for when job was running
 
 Jay Campbell
 MSSD – IZSSB – IOSSS
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 8:23 AM
 To: IBM-MAIN@listserv.ua.edu
 Subject: Re: SMF RECORD TYPE : HELP
 
 Yes, I tried that.  However,
 when I issued the command it was too late (3 minutes after  the job abend).  
This is why I thought by  reading SMF  records would have some info on the 
volume.
 
 
 
 On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu>
 wrote:
 
  Subject: Re: SMF
 RECORD TYPE : HELP
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Thursday, 3 November, 2016, 7:56  AM
  
  Have you tried the
 alloc
  command from the console or SDSF?
  
  D U,,ALLOC,devaddr,1
  
  Thank You
 
 
  
  ;-D an
 
 
  
   
 
 -Original Message-
  From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On Behalf Of John 
Dawes
  Sent: Thursday,
  November 03, 2016 7:53 AM
  To:
 IBM-MAIN@LISTSERV.UA.EDU
  Subject: SMF RECORD TYPE : HELP
  
  G'Day,
 
 
  Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting  to  copy a volume using the following parms.
  
  COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012)
  CANCELERROR      - 
   
     PURGE ALLEXCP
 ALLDATA(*) OPT(4) ADMIN FCNOCOPY
  -    
  
  I get the following
  message:
  
 
 ADR306E
  (043)-SBRTN(01), UNABLE TO COPY THE
 VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS  TERMINATED
  
  I am trying to
 find out what
  resource was using the volume
 at that time.  I thought that  SMF would be a solution  however I don't see a 
SMF record  type for DASD.
  
  Any
 
 suggestions would be very welcome.
  
  Thanks.
  
 
 --
  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
 
 --
 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: SMF RECORD TYPE : HELP

[John Dawes]

Thanks for the suggestion.  I am not familiar on how to use.  I sure would like 
to try.

Is it interactive via ISPF?


On Thu, 3/11/16, Campbell Jay  wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 8:32 AM
 
 How about  RMF 
 panels   3 - 2 - 5 ?
 Put in
 jobname - then set time for when job was running
 
 Jay Campbell
 MSSD – IZSSB – IOSSS
 
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu]
 On Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 8:23 AM
 To: IBM-MAIN@listserv.ua.edu
 Subject: Re: SMF RECORD TYPE : HELP
 
 Yes, I tried that.  However,
 when I issued the command it was too late (3 minutes after
 the job abend).  This is why I thought by  reading SMF
 records would have some info on the volume.
 
 
 
 On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu>
 wrote:
 
  Subject: Re: SMF
 RECORD TYPE : HELP
  To: IBM-MAIN@LISTSERV.UA.EDU
  Received: Thursday, 3 November, 2016, 7:56
 AM
  
  Have you tried the
 alloc
  command from the console or SDSF?
  
  D U,,ALLOC,devaddr,1
  
  Thank You
 
 
  
  ;-D an
 
 
  
   
 
 -Original Message-
  From: IBM
 Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] 
 On Behalf Of John Dawes
  Sent: Thursday,
  November 03, 2016 7:53 AM
  To:
 IBM-MAIN@LISTSERV.UA.EDU
  Subject: SMF RECORD TYPE : HELP
  
  G'Day,
 
 
  Could someone suggest how I could obtain 
 information about a certain DASD volume?  I am trying to 
 trouble shoot a problem of a job failure when attempting
 to  copy a volume using the following parms.
  
  COPY INDYNAM(SYS012)
 OUTDYNAM(BCD012)
  CANCELERROR      - 
   
     PURGE ALLEXCP
 ALLDATA(*) OPT(4) ADMIN FCNOCOPY
  -    
  
  I get the following
  message:
  
 
 ADR306E
  (043)-SBRTN(01), UNABLE TO COPY THE
 VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS IN USE. TASK IS
 TERMINATED
  
  I am trying to
 find out what
  resource was using the volume
 at that time.  I thought that  SMF would be a solution
 however I don't see a SMF record  type for DASD.
  
  Any
 
 suggestions would be very welcome.
  
  Thanks.
  
 
 --
  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
 
 --
 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: SMF RECORD TYPE : HELP

[Campbell Jay]

How about  RMF  panels   3 - 2 - 5 ?
Put in jobname - then set time for when job was running

Jay Campbell
MSSD – IZSSB – IOSSS

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@listserv.ua.edu] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 8:23 AM
To: IBM-MAIN@listserv.ua.edu
Subject: Re: SMF RECORD TYPE : HELP

Yes, I tried that.  However, when I issued the command it was too late (3 
minutes after the job abend).  This is why I thought by  reading SMF records 
would have some info on the volume.
 

On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 7:56 AM
 
 Have you tried the alloc
 command from the console or SDSF?
 
 D U,,ALLOC,devaddr,1
 
 Thank You
 
 
 ;-D an
 
 
  
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]  On 
Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 7:53 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: SMF RECORD TYPE : HELP
 
 G'Day,
 
 Could someone suggest how I could obtain  information about a certain DASD 
volume?  I am trying to  trouble shoot a problem of a job failure when 
attempting to  copy a volume using the following parms.
 
 COPY INDYNAM(SYS012) OUTDYNAM(BCD012)
 CANCELERROR      - 
  
    PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY
 -    
 
 I get the following
 message:
 
 ADR306E
 (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT  VOLUME BCD012  IS 
IN USE. TASK IS TERMINATED
 
 I am trying to find out what
 resource was using the volume at that time.  I thought that  SMF would be a 
solution however I don't see a SMF record  type for DASD.
 
 Any
 suggestions would be very welcome.
 
 Thanks.
 
 --
 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

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

Re: Weird problem hoping to be saved by SMP/E

[Kurt Quackenbush]

Is this really as simple as

LINK LMODS(module1)
 CHECK.

And it will just relink the load module?


Yes, that's the function of the LINK command.

Well, of course you have to remove CHECK for SMP/E to perform the actual 
link edit operation.  Doh!


Kurt Quackenbush -- IBM, SMP/E Development

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

Re: SMF RECORD TYPE : HELP

[John Dawes]

Yes, I tried that.  However, when I issued the command it was too late (3 
minutes after the job abend).  This is why I thought by  reading SMF records 
would have some info on the volume.
 

On Thu, 3/11/16, Blake, Daniel J [CTR] 
<00f1be92566d-dmarc-requ...@listserv.ua.edu> wrote:

 Subject: Re: SMF RECORD TYPE : HELP
 To: IBM-MAIN@LISTSERV.UA.EDU
 Received: Thursday, 3 November, 2016, 7:56 AM
 
 Have you tried the alloc
 command from the console or SDSF?
 
 D U,,ALLOC,devaddr,1
 
 Thank You
 
 
 ;-D an
 
 
  
 -Original Message-
 From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU]
 On Behalf Of John Dawes
 Sent: Thursday,
 November 03, 2016 7:53 AM
 To: IBM-MAIN@LISTSERV.UA.EDU
 Subject: SMF RECORD TYPE : HELP
 
 G'Day,
 
 Could someone suggest how I could obtain
 information about a certain DASD volume?  I am trying to
 trouble shoot a problem of a job failure when attempting to
 copy a volume using the following parms.
 
 COPY INDYNAM(SYS012) OUTDYNAM(BCD012)
 CANCELERROR      - 
  
    PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY
 -    
 
 I get the following
 message:
 
 ADR306E
 (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT
 VOLUME BCD012  IS IN USE. TASK IS TERMINATED
 
 I am trying to find out what
 resource was using the volume at that time.  I thought that
 SMF would be a solution however I don't see a SMF record
 type for DASD.
 
 Any
 suggestions would be very welcome.
 
 Thanks.
 
 --
 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: SMF RECORD TYPE : HELP

[Blake, Daniel J [CTR]]

Have you tried the alloc command from the console or SDSF?

D U,,ALLOC,devaddr,1

Thank You


;-D an


 
-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of John Dawes
Sent: Thursday, November 03, 2016 7:53 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: SMF RECORD TYPE : HELP

G'Day,

Could someone suggest how I could obtain information about a certain DASD 
volume?  I am trying to trouble shoot a problem of a job failure when 
attempting to copy a volume using the following parms.

COPY INDYNAM(SYS012) OUTDYNAM(BCD012) CANCELERROR  - 
 PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY -

I get the following message:

ADR306E (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT VOLUME BCD012 
 IS IN USE. TASK IS TERMINATED

I am trying to find out what resource was using the volume at that time.  I 
thought that SMF would be a solution however I don't see a SMF record type for 
DASD.

Any suggestions would be very welcome.

Thanks.

--
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

SMF RECORD TYPE : HELP

[John Dawes]

G'Day,

Could someone suggest how I could obtain information about a certain DASD 
volume?  I am trying to trouble shoot a problem of a job failure when 
attempting to copy a volume using the following parms.

COPY INDYNAM(SYS012) OUTDYNAM(BCD012) CANCELERROR  - 
 PURGE ALLEXCP ALLDATA(*) OPT(4) ADMIN FCNOCOPY -

I get the following message:

ADR306E (043)-SBRTN(01), UNABLE TO COPY THE VOLUME BECAUSE OUTPUT VOLUME BCD012 
 IS IN USE. TASK IS TERMINATED

I am trying to find out what resource was using the volume at that time.  I 
thought that SMF would be a solution however I don't see a SMF record type for 
DASD.

Any suggestions would be very welcome.

Thanks.

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

Re: TSO Command to issue message to Outtrap

[Hardee, Chuck]

Glad to help.
C-

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration
EAS Information Technology

Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275
Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230
chuck.har...@thermofisher.com  | www.thermofisher.com

WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this 
e-mail or the information herein by anyone other than the intended recipient, 
or an employee or agent of a system responsible for delivering the message to 
the intended recipient, is prohibited. If you are not the intended recipient, 
please inform the sender and delete all copies.


-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (TRA)
Sent: Thursday, November 03, 2016 7:28 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: TSO Command to issue message to Outtrap

It appears the recursive nature of how you did it solves the problem.

Thank you

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer 
Enterprise Infrastructure Support (Station 200) (005OP6.3.10)
VA OI Service Delivery & Engineering

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Hardee, Chuck
Sent: Thursday, November 03, 2016 6:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: TSO Command to issue message to Outtrap

Lionel,

I don't know if this helps, but the following does, to a degree, what you want:
---
/* rexx */ 
if arg(1) \= "R" then do   
   rc = outtrap("said.")   
   call tsttrap "R"
   if said.0 > 0 then do   
  say "Captured "SAY" output:" 
  do said# = 1 to said.0   
 say right(said#,2)":" "|"said.said#"|"
 end   
  end  
   rc = outtrap("OFF") 
   end 
else do
   say "Line 1"
   say "line 2"
   say "Line 2"
   end 
exit   

--
Captured SAY output:
 1: |Line 1|
 2: |line 2|
 3: |Line 2|
*** 

Chuck

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration EAS Information Technology

Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 
(412) 877-2809 | FAX: +1 (412) 490-9230 chuck.har...@thermofisher.com  | 
www.thermofisher.com

WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this 
e-mail or the information herein by anyone other than the intended recipient, 
or an employee or agent of a system responsible for delivering the message to 
the intended recipient, is prohibited. If you are not the intended recipient, 
please inform the sender and delete all copies.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (TRA)
Sent: Thursday, November 03, 2016 7:11 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: TSO Command to issue message to Outtrap

Thank you to all who replied - push and queue don't work. Tried those before 
posting.  It appears that there isn't a putline command/function that I can use 
for this.

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer  Enterprise Infrastructure 
Support (Station 200) (005OP6.3.10) VA OI Service Delivery & Engineering

--
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

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

Re: TSO Command to issue message to Outtrap

[Dyck, Lionel B. (TRA)]

It appears the recursive nature of how you did it solves the problem.

Thank you

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer 
Enterprise Infrastructure Support (Station 200) (005OP6.3.10)
VA OI Service Delivery & Engineering

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Hardee, Chuck
Sent: Thursday, November 03, 2016 6:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: TSO Command to issue message to Outtrap

Lionel,

I don't know if this helps, but the following does, to a degree, what you want:
---
/* rexx */ 
if arg(1) \= "R" then do   
   rc = outtrap("said.")   
   call tsttrap "R"
   if said.0 > 0 then do   
  say "Captured "SAY" output:" 
  do said# = 1 to said.0   
 say right(said#,2)":" "|"said.said#"|"
 end   
  end  
   rc = outtrap("OFF") 
   end 
else do
   say "Line 1"
   say "line 2"
   say "Line 2"
   end 
exit   

--
Captured SAY output:
 1: |Line 1|
 2: |line 2|
 3: |Line 2|
*** 

Chuck

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration EAS Information Technology

Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 
(412) 877-2809 | FAX: +1 (412) 490-9230 chuck.har...@thermofisher.com  | 
www.thermofisher.com

WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this 
e-mail or the information herein by anyone other than the intended recipient, 
or an employee or agent of a system responsible for delivering the message to 
the intended recipient, is prohibited. If you are not the intended recipient, 
please inform the sender and delete all copies.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (TRA)
Sent: Thursday, November 03, 2016 7:11 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: TSO Command to issue message to Outtrap

Thank you to all who replied - push and queue don't work. Tried those before 
posting.  It appears that there isn't a putline command/function that I can use 
for this.

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer  Enterprise Infrastructure 
Support (Station 200) (005OP6.3.10) VA OI Service Delivery & Engineering

--
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: TSO Command to issue message to Outtrap

[Dyck, Lionel B. (TRA)]

Nice - it does work - thank you. 

I don't know why I haven't been able to get outtrap to capture say's before.  I 
will have to look closer.  Great example.

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer 
Enterprise Infrastructure Support (Station 200) (005OP6.3.10)
VA OI Service Delivery & Engineering

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Hardee, Chuck
Sent: Thursday, November 03, 2016 6:22 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: [EXTERNAL] Re: TSO Command to issue message to Outtrap

Lionel,

I don't know if this helps, but the following does, to a degree, what you want:
---
/* rexx */ 
if arg(1) \= "R" then do   
   rc = outtrap("said.")   
   call tsttrap "R"
   if said.0 > 0 then do   
  say "Captured "SAY" output:" 
  do said# = 1 to said.0   
 say right(said#,2)":" "|"said.said#"|"
 end   
  end  
   rc = outtrap("OFF") 
   end 
else do
   say "Line 1"
   say "line 2"
   say "Line 2"
   end 
exit   

--
Captured SAY output:
 1: |Line 1|
 2: |line 2|
 3: |Line 2|
*** 

Chuck

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration EAS Information Technology

Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275 Phone +1 (724) 517-2633 | Mobile +1 
(412) 877-2809 | FAX: +1 (412) 490-9230 chuck.har...@thermofisher.com  | 
www.thermofisher.com

WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this 
e-mail or the information herein by anyone other than the intended recipient, 
or an employee or agent of a system responsible for delivering the message to 
the intended recipient, is prohibited. If you are not the intended recipient, 
please inform the sender and delete all copies.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (TRA)
Sent: Thursday, November 03, 2016 7:11 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: TSO Command to issue message to Outtrap

Thank you to all who replied - push and queue don't work. Tried those before 
posting.  It appears that there isn't a putline command/function that I can use 
for this.

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer  Enterprise Infrastructure 
Support (Station 200) (005OP6.3.10) VA OI Service Delivery & Engineering

--
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: TSO Command to issue message to Outtrap

[Hardee, Chuck]

Lionel,

I don't know if this helps, but the following does, to a degree, what you want:
---
/* rexx */ 
if arg(1) \= "R" then do   
   rc = outtrap("said.")   
   call tsttrap "R"
   if said.0 > 0 then do   
  say "Captured "SAY" output:" 
  do said# = 1 to said.0   
 say right(said#,2)":" "|"said.said#"|"
 end   
  end  
   rc = outtrap("OFF") 
   end 
else do
   say "Line 1"
   say "line 2"
   say "Line 2"
   end 
exit   

--
Captured SAY output:
 1: |Line 1|
 2: |line 2|
 3: |Line 2|
*** 

Chuck

Charles (Chuck) Hardee
Senior Systems Engineer/Database Administration
EAS Information Technology

Thermo Fisher Scientific
300 Industry Drive | Pittsburgh, PA 15275
Phone +1 (724) 517-2633 | Mobile +1 (412) 877-2809 | FAX: +1 (412) 490-9230
chuck.har...@thermofisher.com  | www.thermofisher.com

WORLDWIDE CONFIDENTIALITY NOTE: Dissemination, distribution or copying of this 
e-mail or the information herein by anyone other than the intended recipient, 
or an employee or agent of a system responsible for delivering the message to 
the intended recipient, is prohibited. If you are not the intended recipient, 
please inform the sender and delete all copies.

-Original Message-
From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf 
Of Dyck, Lionel B. (TRA)
Sent: Thursday, November 03, 2016 7:11 AM
To: IBM-MAIN@LISTSERV.UA.EDU
Subject: Re: TSO Command to issue message to Outtrap

Thank you to all who replied - push and queue don't work. Tried those before 
posting.  It appears that there isn't a putline command/function that I can use 
for this.

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer 
Enterprise Infrastructure Support (Station 200) (005OP6.3.10)
VA OI Service Delivery & Engineering

--
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: TSO Command to issue message to Outtrap

[Dyck, Lionel B. (TRA)]

Thank you to all who replied - push and queue don't work. Tried those before 
posting.  It appears that there isn't a putline command/function that I can use 
for this.

--
Lionel B. Dyck (TRA Contractor)
Mainframe Systems Programmer 
Enterprise Infrastructure Support (Station 200) (005OP6.3.10)
VA OI Service Delivery & Engineering

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

Re: How set CVTLSO?

[Giliad Wilf]

On Wed, 2 Nov 2016 16:03:10 -0500, George Kozakos  wrote:
.
>The "epoch" on z/OS systems is 1900.
>
.
Right. It corresponds to a zeroed TOD.

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

Re: : Looking for some direction on USS / JAVA / C / COBOL and or Assembler please.

[Denis]

Hi Jim,
 
you cannot mix 64bit Java and 31bit COBOL. As of now there is no COBOL compiler 
that creates 64bit code.
Please switch to the 31bit JVM.
In addition, you can code JNI calls in COBOL, no C wrapper required and compile 
it using JCL.
Please note, that C can produce 64bit code and as such can be used with the 
64bit JVM. But without Assembler you cannot call the 64bit C module from COBOL 
(which is 31bit).
 
You can also find samples of COBOL/Java in the redbook:
New Ways of Running Batch Applications on z/OS: Volume 4 IBM IMS

Although it mentiones IMS and Batch, COBOL/Java interoperability is a Language 
Environment Feature, which is not limited to IMS or Batch.
All the compiles in the Book are done with JCL.

By the way, there is a Java Doc in preparation with samples and discussions for 
COBOL/Java which is expected to be released around mid November, which will 
replace and enhance information from the mentioned redbook.

Denis.

 
-Original Message-
From: Jim 
To: IBM-MAIN 
Sent: Wed, Nov 2, 2016 10:15 pm
Subject: Re : Looking for some direction on USS /  JAVA / C / COBOL and or 
Assembler please.

Listers,

For brevity ... I've been trying to get the Standalone Java vol 2 example of 
JAVA calling COBOL (and assembler) via a 
C glue working, unsuccessfully ..  

I'm on a  z/OS 2.2 box, Java 7 x64 only .. I can install 31bit java am hoping I 
won't be limited to that ... 

I've compiled my skeletons, both assembler and COBOL under native z/OS and 
included RENT, DYNAM(DLL) and AMODE64. 


For the Java part .. it's a simple javac programname.java followed by a javah 
programname (class name)... for the 
C part ... I've been using the below .. 

c89 -c -o programname.o -W "c,langlvl(extended)",lp64 -W c,expo,lp64,dll 
-DNEEDSIEE754 -DNEEDSLONGLONG -I/usr/lpp/java/J7.0_64/include programname.c
c89 -Wl,lp64,dll -o libprogramname.so programname.o 
"//'HLQ.PDSE.OBJ(COBOLPROGRAM | ASSEMBLERPROGRAM)'"

With the 'lp64' included .. for the 2nd step (link) .. I keep getting ..

IEW2480W A711 EXTERNAL SYMBOL CEELLIST OF TYPE LD WAS ALREADY DEFINED AS A   
  SYMBOL OF TYPE LD IN SECTION CEEBLLST.
 IEW2482W A712 THE ORIGINAL DEFINITION WAS IN A MODULE IDENTIFIED BY DDNAME   
  C8921.  THE DUPLICATE DEFINITION IS IN SECTION CELQLLST  IN A MODULE
  IDENTIFIED BY DDNAME SYSLIB.   
 IEW2491E 9373 CLASSES C_WSA and C_WSA64 ARE BOTH PRESENT IN THE MODULE.  
FSUM3065 The LINKEDIT step ended with return code 8.  

I do see that both, the COBOL and assembler objects (under z/OS) are amode 64 / 
rmode any ... I do not know how to do
the same under USS but am going by the options provided to 'c89' ... 

If I remove the 'lp64' option ... it compiles / links fine .. but when I try to 
run (java programname) .. I get a class not found error 
followed by a java.lang.unspecifiedlinkerror ... this is on the java 
System.loadLibrary statement ... when I changed it to 
System.load specifying the full path ... I got an EDC5253S An AMODE64 
application is attempting to load an AMODE31 DLL load
module .. 

Any advice / direction would be appreciated  ...

Kind Regards.

Jim 

--
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