Format PDS unloaded on an CD

2021-04-27 Thread Hilario Garcia
Hello everyone,

Many thanks to all your contributions to solve the problem of PDS, s, 
Sequential Files that were downloaded from a Z / OS in 2007. At present I have 
no possibility of being able to download them again using the correct way 
(AMATERSE and FTP binary ).

I have carried out many tests with many utilities (IEBCOPY, AMATERSE, DFDSS, 
IEBGENER, ...) with different DCB values in record format and length. All the 
tests and there have been many I have not been able to rescue the files in 
their original format.

Unfortunately I do not have the level of any of you with respect to the control 
blocks of the files.

Can someone advise me on how to recover the files in detail. I will appreciate 
your information.

Thank you very much in advance.

Kind Regards

Hilario

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


Re: Format PDS unloaded on an CD

2021-04-20 Thread Hilario Garcia
554 / 5000
Resultados de traducción
Hi Mike, Thank you very much for the information that you have sent me to
be able to recover files (mostly PDS) but there are also data files and PDS
LOADLIB. I'm going to get to work on it as you have indicated. The work is
very laborious and there are about 30 files with an undetermined number of
members, in addition to some files with data. I suppose that there is no
other way to recover the data since the format and the method in which it
was downloaded from Z / OS is unknown. Thank you very much in advance. Kind
Regards Hilario

El mar, 20 abr 2021 a las 6:20, Mike Schwab ()
escribió:

> On Mon, Apr 19, 2021 at 7:23 AM Joe Monk  wrote:
>
> >
> > So,  now  you know what  you  have. An ISPF panel library, that was
> > unloaded via  IEBCOPY, then IND$FILE to a PC without  specifying  CRLF
> then
> > back to the mainframe.
> >
> > Joe
> >
> Well, since this is going to be a text only, FB 80 PDS(e) file, open
> with a text editor such as NOTEPAD, NOTEPAD++, WORD, etc..
> Save as to a new name as plain text with TXT suffix so you don't lose
> the original file.
> Copy this job to the top down to the ./ ADD command.
>
> https://www.ibm.com/docs/en/zos/2.4.0?topic=examples-example-1-place-two-procedures-in-sys1proclib#u1438
> Select and delete a block of non- text data, hope you see a text name
> to put in a line  with ./ ADD NAME=, use AA001 if you don't find the
> name.
> G through the text and insert line splits as needed.  Some lines need
> leading blanks.
> When you get to the next block of non-text, you highlight and delete
> the non text, and put in the ./ ADD NAME= with the name or AA002 if
> not found.
> Repeat to the end of the file.
> Put in the ./ ENDUP card and save final results.
> Upload to to MVS / z/OS with ASCII CFLF. FB 80 3120.
> Create PDS with FB 80 and twice the space of the upload with directory
> space, put name in JCL.
> Copy in a site specific jobcard to the top and run to create a PDS
> with the names you saved or AA001-AA999.
> You will have to review to figure out the member names if you didn't
> find it in the PDS unload text.
>
> --
> 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: Format PDS unloaded on an CD

2021-04-19 Thread Hilario Garcia
Hello Joe,

Thank you very much for your information.

I understand that I have a format problem because apparently the files were
downloaded through IND $ FILE without the CRLF option.
How can I recreate them? The originals no longer exist in DASD.
Can you detail how I could solve it?

Thank you very much in advance.

Kind Regards

Hilario

El lun, 19 abr 2021 a las 18:07, Joe Monk () escribió:

> Hilario,
>
> So, you have a format problem. The format is IEBCOPY unload to  a
> sequential file on DASD. BUT that was then run thru IND$FILE TWICE, without
> specifying the CRLF option to insert CRLFs on the PC to denote record ends.
> So, you  have a  PC file there with  no end-of-record markers. Once you can
> re-create those, there is high probability  you can reverse the process to
> get it  back to a straight sequential file and re-run it  thru IEBCOPY.
>
> Joe
>
> On Mon, Apr 19, 2021 at 10:49 AM Hilario Garcia  wrote:
>
> > Hello Joe,
> >
> > The files were downloaded from a Z / OS in 2007. I don't know how and
> with
> > what format. You are correct.
> >
> > Would you recommend me to take any other action to solve the problem?
> >
> > Thank you very much in advance.
> >
> > Kind Regards
> >
> > Hilario
> >
> > El lun, 19 abr 2021 a las 14:23, Joe Monk ()
> > escribió:
> >
> > > OK ...  maybe now we're getting  somewhere...
> > >
> > > I think we  are having a case of deja vu here. Going back thru the
> > archives
> > > I found where the exact same dataset was created in 2007:
> > >
> > >  -Original Message-
> > >  From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
> > >  Behalf Of David Day
> > >  Sent: Thursday, May 24, 2007 5:34 PM
> > >  To: ibm-m...@bama.ua.edu
> > >  Subject: IEBCOPY Unloaded dataset to PC and back again...not
> successful
> > >
> > >  I used IEBCOPY to create a sequentail backup of an ISPF  panel
> > >  library.  I then used IND$FILE to transfer the dataset to my PC.
> > Thought
> > >  I'd test the backup out by transferring back to the mainframe, and got
> > the
> > >  following when I tried to use IEBCOPY to load the members back.
> > >
> > >  STEP1COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED STATEMENT
> > >  IEB1128I *** COPYR1 (1ST PDSU PHYSICAL RECORD)
> > >009400   1810 180C0100 00CA6D0F 02001810  |  _ |
> > >009410 0010  00509000 1810 3030200F 7FF8  | 8|
> > >009420 0020  0D0C000F E5A2 2250 0002006B  |Vs,|
> > >009430 0030  008F 0080 0F000B08 A912  |z   |
> > >009440 0040  7F00 80807FF8 8800 0012  | 8  h |
> > >009450 0050  6A78 1810 0200 9440  |  |   m |
> > >009460 0060  6AA8 0C0067E8 6AA0 8800  |  |y   Y  |   h |
> > >009470 00700002 3F000900  ||
> > >009480 0080  0612 20007FF8|  8|
> > >009490 0090   ||
> > >  IEB120I SYSUT1   VALIDATION ERROR
> > >  IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64
> > >  BYTES LONG - ACTUAL VALUE IS X'001810'
> > >
> > >   The IND$FILE for the GET or PUT operation did not specify CRLF as a
> > >  parameter.  Can someone tell me what I did wrong, or if there is a
> > >  'better' way to backup PDS data on a PC.  Thanks.
> > >
> > >  --Dave Day
> > >
> > >
> > > So,  now  you know what  you  have. An ISPF panel library, that was
> > > unloaded via  IEBCOPY, then IND$FILE to a PC without  specifying  CRLF
> > then
> > > back to the mainframe.
> > >
> > > Joe
> > >
> > >
> > > On Mon, Apr 19, 2021 at 4:04 AM Hilario Garcia 
> > wrote:
> > >
> > > > Hello,
> > > >
> > > > Thank you very much for your answer. I had already tried the solution
> > you
> > > > recommended and it gave me the following problem:
> > > >
> > > > IEBCOPY  COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED
> STATEMENT
> > > >
> > > > IEB1128I *** COPYR1 (1ST PDSU PHYSICAL RECORD)
> > > >
> > > >   0094A0 FFF8    7FE4 7FE0  |"U  "\
> |
> > > >
> > > >   0094B0 0008  00CA6D0F 020018B0 00509000 00807FF8  |  _  &
> "8|
> > > >
> > > >   0094C0 0018  3030200F 7FF8 2721000F E5A2  |  "8Vs
> |
> > > >
> > > >   0094D0 0028  2252 0002006B 00DE 0080  |   ,
> |
> > > >
> > &

Re: Format PDS unloaded on an CD

2021-04-19 Thread Hilario Garcia
Hello Joe,

The files were downloaded from a Z / OS in 2007. I don't know how and with
what format. You are correct.

Would you recommend me to take any other action to solve the problem?

Thank you very much in advance.

Kind Regards

Hilario

El lun, 19 abr 2021 a las 14:23, Joe Monk () escribió:

> OK ...  maybe now we're getting  somewhere...
>
> I think we  are having a case of deja vu here. Going back thru the archives
> I found where the exact same dataset was created in 2007:
>
>  -Original Message-
>  From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
>  Behalf Of David Day
>  Sent: Thursday, May 24, 2007 5:34 PM
>  To: ibm-m...@bama.ua.edu
>  Subject: IEBCOPY Unloaded dataset to PC and back again...not successful
>
>  I used IEBCOPY to create a sequentail backup of an ISPF  panel
>  library.  I then used IND$FILE to transfer the dataset to my PC.  Thought
>  I'd test the backup out by transferring back to the mainframe, and got the
>  following when I tried to use IEBCOPY to load the members back.
>
>  STEP1COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED STATEMENT
>  IEB1128I *** COPYR1 (1ST PDSU PHYSICAL RECORD)
>009400   1810 180C0100 00CA6D0F 02001810  |  _ |
>009410 0010  00509000 1810 3030200F 7FF8  | 8|
>009420 0020  0D0C000F E5A2 2250 0002006B  |Vs,|
>009430 0030  008F 0080 0F000B08 A912  |z   |
>009440 0040  7F00 80807FF8 8800 0012  | 8  h |
>009450 0050  6A78 1810 0200 9440  |  |   m |
>009460 0060  6AA8 0C0067E8 6AA0 8800  |  |y   Y  |   h |
>009470 00700002 3F000900  ||
>009480 0080  0612 20007FF8|  8|
>009490 0090   ||
>  IEB120I SYSUT1   VALIDATION ERROR
>  IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64
>  BYTES LONG - ACTUAL VALUE IS X'001810'
>
>   The IND$FILE for the GET or PUT operation did not specify CRLF as a
>  parameter.  Can someone tell me what I did wrong, or if there is a
>  'better' way to backup PDS data on a PC.  Thanks.
>
>  --Dave Day
>
>
> So,  now  you know what  you  have. An ISPF panel library, that was
> unloaded via  IEBCOPY, then IND$FILE to a PC without  specifying  CRLF then
> back to the mainframe.
>
> Joe
>
>
> On Mon, Apr 19, 2021 at 4:04 AM Hilario Garcia  wrote:
>
> > Hello,
> >
> > Thank you very much for your answer. I had already tried the solution you
> > recommended and it gave me the following problem:
> >
> > IEBCOPY  COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED STATEMENT
> >
> > IEB1128I *** COPYR1 (1ST PDSU PHYSICAL RECORD)
> >
> >   0094A0 FFF8    7FE4 7FE0  |"U  "\  |
> >
> >   0094B0 0008  00CA6D0F 020018B0 00509000 00807FF8  |  _  &"8|
> >
> >   0094C0 0018  3030200F 7FF8 2721000F E5A2  |  "8Vs  |
> >
> >   0094D0 0028  2252 0002006B 00DE 0080  |   ,|
> >
> >   0094E0 0038  01000B07 6930 7F00 80807FF8  |" "8|
> >
> >   0094F0 0048  8800 0011F000 6540 7FE4  |  h   0   "U|
> >
> >   009500 0058  0200 94E8 6570 0C14  |  mY|
> >
> >   009510 0068  6568 8800    |  h |
> >
> >   009520 0078   16000400 0611F000 20007FF8  |  0   "8|
> >
> >   009530 0088       ||
> >
> >   009540 0098       ||
> >
> > IEB120I SYSUT1   VALIDATION ERROR
> >
> > IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64
> BYTES
> > LONG
> > IEB1030I DDNAME SYSUT1   REFERS TO PDSU DATA SET ON VOLUME SS NAMED
> > IBMUSER.
> > IEB1030I DDNAME SYSUT2   REFERS TO PDS  DATA SET ON VOLUME SS NAMED
> > IBMUSER.
> > IEB166I NO MEMBERS LOADED TO DATA SET REFERENCED BY SYSUT2
> >
> > IEB151I JOB HAS TERMINATED WITH ERROR(S)
> >
> > IEB147I END OF JOB - 8 WAS HIGHEST SEVERITY CODE
> >
> >
> > Do you recommend any other possible solution.
> >
> > Thank you very much in advance.
> >
> > Kind Regards
> >
> > Hilario
> >
> > El lun, 19 abr 2021 a las 10:29, Styles, Andy (ITS zPlatform Services) (<
> > 00d68f765d25-dmarc-requ...@listserv.ua.edu>) escribió:
> >
> > > Classification: Public
> > >
> > > I wonder if these are IEBCOPY unload format - that is, IEBCOPY from a
> PDS
> > > to a PS.  It's been years since I had to deal with those, probably
> since
> > I
> > > installed products directly from a vendor tape (one of

Re: Format PDS unloaded on an CD

2021-04-19 Thread Hilario Garcia
Hello,

I have tried to upload the files through both the native FTP protocol and
through FILEZILLA. The problem is the same as the format of the file
received
is not correct.

Would you recommend me to take any other action to solve the problem?

Thank you very much in advance.

Kind Regards

Hilario


El lun, 19 abr 2021 a las 14:37, Barkow, Eileen (<
02bc504b1642-dmarc-requ...@listserv.ua.edu>) escribió:

> Another way to copy a PDS to the pc is with ftp.
>  cd to a pc directory  and run a  command line ftp program initiated from
> the pc and issue commands:  (I use MOVE IT FREELY):
>  cd  'MAINFRAME.PDS'
> ftp  ftp parmsHOST NAME PORT
>   mget(*)
>
> Each member will be downloaded to the pc directory.
>
> Eileen Barkow  ebar...@doitt.nyc.gov
> CICS systems
> Desk: 718-403-8649
> Cell:   917-436-0508
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Joe Monk
> Sent: Monday, April 19, 2021 8:23 AM
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Re: Format PDS unloaded on an CD
>
> OK ...  maybe now we're getting  somewhere...
>
> I think we  are having a case of deja vu here. Going back thru the
> archives I found where the exact same dataset was created in 2007:
>
>  -Original Message-
>  From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On  Behalf
> Of David Day
>  Sent: Thursday, May 24, 2007 5:34 PM
>  To: ibm-m...@bama.ua.edu
>  Subject: IEBCOPY Unloaded dataset to PC and back again...not successful
>
>  I used IEBCOPY to create a sequentail backup of an ISPF  panel  library.
> I then used IND$FILE to transfer the dataset to my PC.  Thought  I'd test
> the backup out by transferring back to the mainframe, and got the
> following when I tried to use IEBCOPY to load the members back.
>
>  STEP1COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED STATEMENT  IEB1128I ***
> COPYR1 (1ST PDSU PHYSICAL RECORD)
>009400   1810 180C0100 00CA6D0F 02001810  |  _ |
>009410 0010  00509000 1810 3030200F 7FF8  | 8|
>009420 0020  0D0C000F E5A2 2250 0002006B  |Vs,|
>009430 0030  008F 0080 0F000B08 A912  |z   |
>009440 0040  7F00 80807FF8 8800 0012  | 8  h |
>009450 0050  6A78 1810 0200 9440  |  |   m |
>009460 0060  6AA8 0C0067E8 6AA0 8800  |  |y   Y  |   h |
>009470 00700002 3F000900  ||
>009480 0080  0612 20007FF8|  8|
>009490 0090   ||
>  IEB120I SYSUT1   VALIDATION ERROR
>  IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64
> BYTES LONG - ACTUAL VALUE IS X'001810'
>
>   The IND$FILE for the GET or PUT operation did not specify CRLF as a
> parameter.  Can someone tell me what I did wrong, or if there is a
> 'better' way to backup PDS data on a PC.  Thanks.
>
>  --Dave Day
>
>
> So,  now  you know what  you  have. An ISPF panel library, that was
> unloaded via  IEBCOPY, then IND$FILE to a PC without  specifying  CRLF then
> back to the mainframe.
>
> Joe
>
>
> On Mon, Apr 19, 2021 at 4:04 AM Hilario Garcia  wrote:
>
> > Hello,
> >
> > Thank you very much for your answer. I had already tried the solution
> > you recommended and it gave me the following problem:
> >
> > IEBCOPY  COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED STATEMENT
> >
> > IEB1128I *** COPYR1 (1ST PDSU PHYSICAL RECORD)
> >
> >   0094A0 FFF8    7FE4 7FE0  |"U  "\  |
> >
> >   0094B0 0008  00CA6D0F 020018B0 00509000 00807FF8  |  _  &"8|
> >
> >   0094C0 0018  3030200F 7FF8 2721000F E5A2  |  "8Vs  |
> >
> >   0094D0 0028  2252 0002006B 00DE 0080  |   ,|
> >
> >   0094E0 0038  01000B07 6930 7F00 80807FF8  |" "8|
> >
> >   0094F0 0048  8800 0011F000 6540 7FE4  |  h   0   "U|
> >
> >   009500 0058  0200 94E8 6570 0C14  |  mY|
> >
> >   009510 0068  6568 8800    |  h |
> >
> >   009520 0078   16000400 0611F000 20007FF8  |  0   "8|
> >
> >   009530 0088       ||
> >
> >   009540 0098       ||
> >
> > IEB120I SYSUT1   VALIDATION ERROR
> >
> > IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64
> > BYTES LONG
> > IEB1030I DDNAME SYSUT1   REFERS TO PDSU DATA SET ON VOLUME SS NAMED
> > IBMUSER.
> > IEB1030I DDNAME SYSUT2   REFERS TO PDS  DATA SET ON VOLUME SS NAMED
> > IBMUSER.
> > IEB166I NO MEMBERS LOADED TO DATA SET REFERENCED BY SYSUT2
> >
> > IEB151I JOB HA

Re: Format PDS unloaded on an CD

2021-04-19 Thread Hilario Garcia
Hello,

I had tested multiple combinations:

RECFM LREL  BLKSIZE
FB 80   0
VB 256 6233
FB 1024   0
VS 32736 32740
FB 803120
.. Too other combinations of different values

In my opinion the files appear like a PDS unloaded with control blocks and
directory at the firsts records.

I will appreciate any suggestion.

Thanks in advance.

Kind regards.

Hilario



El lun, 19 abr 2021 a las 13:10, Andy Styles ()
escribió:

> What was the format (recfm, blksize, lrecl, dsorg) of the zOS dataset that
> you uploaded the CD copy to?
>
> Andy.
>
>
> On Mon, 19 Apr 2021, 10:04 Hilario Garcia,  wrote:
>
> > Hello,
> >
> > Thank you very much for your answer. I had already tried the solution you
> > recommended and it gave me the following problem:
> >
> > IEBCOPY  COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED STATEMENT
> >
> > IEB1128I *** COPYR1 (1ST PDSU PHYSICAL RECORD)
> >
> >   0094A0 FFF8    7FE4 7FE0  |"U  "\  |
> >
> >   0094B0 0008  00CA6D0F 020018B0 00509000 00807FF8  |  _  &"8|
> >
> >   0094C0 0018  3030200F 7FF8 2721000F E5A2  |  "8Vs  |
> >
> >   0094D0 0028  2252 0002006B 00DE 0080  |   ,|
> >
> >   0094E0 0038  01000B07 6930 7F00 80807FF8  |" "8|
> >
> >   0094F0 0048  8800 0011F000 6540 7FE4  |  h   0   "U|
> >
> >   009500 0058  0200 94E8 6570 0C14  |  mY|
> >
> >   009510 0068  6568 8800    |  h |
> >
> >   009520 0078   16000400 0611F000 20007FF8  |  0   "8|
> >
> >   009530 0088       ||
> >
> >   009540 0098       ||
> >
> > IEB120I SYSUT1   VALIDATION ERROR
> >
> > IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64
> BYTES
> > LONG
> > IEB1030I DDNAME SYSUT1   REFERS TO PDSU DATA SET ON VOLUME SS NAMED
> > IBMUSER.
> > IEB1030I DDNAME SYSUT2   REFERS TO PDS  DATA SET ON VOLUME SS NAMED
> > IBMUSER.
> > IEB166I NO MEMBERS LOADED TO DATA SET REFERENCED BY SYSUT2
> >
> > IEB151I JOB HAS TERMINATED WITH ERROR(S)
> >
> > IEB147I END OF JOB - 8 WAS HIGHEST SEVERITY CODE
> >
> >
> > Do you recommend any other possible solution.
> >
> > Thank you very much in advance.
> >
> > Kind Regards
> >
> > Hilario
> >
> > El lun, 19 abr 2021 a las 10:29, Styles, Andy (ITS zPlatform Services) (<
> > 00d68f765d25-dmarc-requ...@listserv.ua.edu>) escribió:
> >
> > > Classification: Public
> > >
> > > I wonder if these are IEBCOPY unload format - that is, IEBCOPY from a
> PDS
> > > to a PS.  It's been years since I had to deal with those, probably
> since
> > I
> > > installed products directly from a vendor tape (one of those round
> things
> > > with the write-protect ring).
> > >
> > > IEBCOPY seems to create unload format dasd datasets (here, at least) as
> > >
> > > Organization  . . . : PS
> > > Record format . . . : VS
> > > Record length . . . : 32736
> > > Block size  . . . . : 32740
> > >
> > > Worth uploading one of those files as binary and then using an IEBCOPY
> PS
> > > to PDS to reload it?
> > >
> > > Andy Styles
> > > z/Series System Programmer
> > >
> > > -Original Message-
> > > From: IBM Mainframe Discussion List  On
> Behalf
> > > Of Hilario Garcia
> > > Sent: 19 April 2021 06:42
> > > To: IBM-MAIN@LISTSERV.UA.EDU
> > > Subject: Fwd: Format PDS unloaded on an CD
> > >
> > > -- This email has reached the Bank via an external source --
> > >
> > >
> > > -- Forwarded message -
> > > De: Hilario Garcia 
> > > Date: lun, 19 abr 2021 a las 7:40
> > > Subject: Format PDS unloaded on an CD
> > > To: 
> > >
> > >
> > > Hello,
> > >
> > > Thank you very much for your contributions.
> > > I have done multiple tests with different utilities (XMIT, FTP, IND $
> > FILE,
> > > AMATERSE) and I have not been able to download them in a valid format.
> > > Attached I send in hexadecimal format the beginning of one of the PDS
> > > (loaded as FB, lrecl = 80) and it seems that at the beginning of the
> file
&

Re: Fwd: Format PDS unloaded on an CD

2021-04-19 Thread Hilario Garcia
Hello,

It could have been first downloaded to a cartridge and then copied to a CD.
The problem is that I do not have the original files but only this copy in
CD and the person who made it is gone. Anyway, if they were downloaded to a
cartridge, I understand that the most logical thing is that it will be done
with IEBCOPY, but
It seems that something is not right.
When doing FTP from the CD to the Z / OS in FB format and 80 bytes the
content can be seen but with control blocks.

Thank you for your comments. Any additional ideas that can help me download
them?

Thank you very much in advance.

Kind Regards

Hilario

El lun, 19 abr 2021 a las 11:11, Peter Sylvester ()
escribió:

> Hm, Doesn't this looks like an unloaded PDS via IEBCOPY? Was it unloaded
> initially to a tape? And
> then copied to the CD?
>
> /PS
>
> On 19/04/2021 07:42, Hilario Garcia wrote:
> > -- Forwarded message -
> > De: Hilario Garcia 
> > Date: lun, 19 abr 2021 a las 7:40
> > Subject: Format PDS unloaded on an CD
> > To: 
> >
> >
> > Hello,
> >
> > Thank you very much for your contributions.
> > I have done multiple tests with different utilities (XMIT, FTP, IND $
> FILE,
> > AMATERSE) and I have not been able to download them in a valid format.
> > Attached I send in hexadecimal format the beginning of one of the PDS
> > (loaded as FB, lrecl = 80) and it seems that at the beginning of the file
> > is the directory of a
> > PDS partitioned file. If the file is loaded as FB and 80 bytes long, you
> > can see the code in EBCDIC format. The original file is in format
> > binary and I have loaded it in binary.
> >
> > I would appreciate your help in this regard.
> >
> > Thank you very much in advance.
> >
> > Kind Regards
> >
> > Hilario
> >
> >
> >
> > --
> > 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: Format PDS unloaded on an CD

2021-04-19 Thread Hilario Garcia
Hello,

Thank you very much for your answer. I had already tried the solution you
recommended and it gave me the following problem:

IEBCOPY  COPY  INDD=SYSUT1,OUTDD=SYSUT2 GENERATED STATEMENT

IEB1128I *** COPYR1 (1ST PDSU PHYSICAL RECORD)

  0094A0 FFF8    7FE4 7FE0  |"U  "\  |

  0094B0 0008  00CA6D0F 020018B0 00509000 00807FF8  |  _  &"8|

  0094C0 0018  3030200F 7FF8 2721000F E5A2  |  "8Vs  |

  0094D0 0028  2252 0002006B 00DE 0080  |   ,|

  0094E0 0038  01000B07 6930 7F00 80807FF8  |" "8|

  0094F0 0048  8800 0011F000 6540 7FE4  |  h   0   "U|

  009500 0058  0200 94E8 6570 0C14  |  mY|

  009510 0068  6568 8800    |  h |

  009520 0078   16000400 0611F000 20007FF8  |  0   "8|

  009530 0088       ||

  009540 0098       ||

IEB120I SYSUT1   VALIDATION ERROR

IEB178I NOT AN IEBCOPY UNLOADED DATA SET - 1ST PHYSICAL RECORD NOT 64 BYTES
LONG
IEB1030I DDNAME SYSUT1   REFERS TO PDSU DATA SET ON VOLUME SS NAMED
IBMUSER.
IEB1030I DDNAME SYSUT2   REFERS TO PDS  DATA SET ON VOLUME SS NAMED
IBMUSER.
IEB166I NO MEMBERS LOADED TO DATA SET REFERENCED BY SYSUT2

IEB151I JOB HAS TERMINATED WITH ERROR(S)

IEB147I END OF JOB - 8 WAS HIGHEST SEVERITY CODE


Do you recommend any other possible solution.

Thank you very much in advance.

Kind Regards

Hilario

El lun, 19 abr 2021 a las 10:29, Styles, Andy (ITS zPlatform Services) (<
00d68f765d25-dmarc-requ...@listserv.ua.edu>) escribió:

> Classification: Public
>
> I wonder if these are IEBCOPY unload format - that is, IEBCOPY from a PDS
> to a PS.  It's been years since I had to deal with those, probably since I
> installed products directly from a vendor tape (one of those round things
> with the write-protect ring).
>
> IEBCOPY seems to create unload format dasd datasets (here, at least) as
>
> Organization  . . . : PS
> Record format . . . : VS
> Record length . . . : 32736
> Block size  . . . . : 32740
>
> Worth uploading one of those files as binary and then using an IEBCOPY PS
> to PDS to reload it?
>
> Andy Styles
> z/Series System Programmer
>
> -Original Message-
> From: IBM Mainframe Discussion List  On Behalf
> Of Hilario Garcia
> Sent: 19 April 2021 06:42
> To: IBM-MAIN@LISTSERV.UA.EDU
> Subject: Fwd: Format PDS unloaded on an CD
>
> -- This email has reached the Bank via an external source --
>
>
> -- Forwarded message -
> De: Hilario Garcia 
> Date: lun, 19 abr 2021 a las 7:40
> Subject: Format PDS unloaded on an CD
> To: 
>
>
> Hello,
>
> Thank you very much for your contributions.
> I have done multiple tests with different utilities (XMIT, FTP, IND $ FILE,
> AMATERSE) and I have not been able to download them in a valid format.
> Attached I send in hexadecimal format the beginning of one of the PDS
> (loaded as FB, lrecl = 80) and it seems that at the beginning of the file
> is the directory of a PDS partitioned file. If the file is loaded as FB and
> 80 bytes long, you can see the code in EBCDIC format. The original file is
> in format binary and I have loaded it in binary.
>
> I would appreciate your help in this regard.
>
> Thank you very much in advance.
>
> Kind Regards
>
> Hilario
>
>
>
> --
> 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
> Lloyds Banking Group plc. Registered Office: The Mound, Edinburgh EH1 1YZ.
> Registered in Scotland no. SC95000. Telephone: 0131 225 4555.
>
> Lloyds Bank plc. Registered Office: 25 Gresham Street, London EC2V 7HN.
> Registered in England and Wales no. 2065. Telephone 0207626 1500.
>
> Bank of Scotland plc. Registered Office: The Mound, Edinburgh EH1 1YZ.
> Registered in Scotland no. SC327000. Telephone: 03457 801 801.
>
> Lloyds Bank Corporate Markets plc. Registered office: 25 Gresham Street,
> London EC2V 7HN. Registered in England and Wales no. 10399850.
>
> Scottish Widows Schroder Personal Wealth Limited. Registered Office: 25
> Gresham Street, London EC2V 7HN. Registered in England and Wales no.
> 11722983.
>
> Lloyds Bank plc, Bank of Scotland plc and Lloyds Bank Corporate Markets
> plc are authorised by the Prudential Regulat

Fwd: Format PDS unloaded on an CD

2021-04-18 Thread Hilario Garcia
-- Forwarded message -
De: Hilario Garcia 
Date: lun, 19 abr 2021 a las 7:40
Subject: Format PDS unloaded on an CD
To: 


Hello,

Thank you very much for your contributions.
I have done multiple tests with different utilities (XMIT, FTP, IND $ FILE,
AMATERSE) and I have not been able to download them in a valid format.
Attached I send in hexadecimal format the beginning of one of the PDS
(loaded as FB, lrecl = 80) and it seems that at the beginning of the file
is the directory of a
PDS partitioned file. If the file is loaded as FB and 80 bytes long, you
can see the code in EBCDIC format. The original file is in format
binary and I have loaded it in binary.

I would appreciate your help in this regard.

Thank you very much in advance.

Kind Regards

Hilario



--
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
.­_¢.&°..Ø"8.."8Vs...ê.,.ú...Ø..#...±.Ø..»ØHì4à®
0C60001B0590087F3320007F2200EA0025060D0008006300F0008080088C5F4A
0ADF208000F8000F00F8710F52002200020B0E0010B790001000F000F0004B088440001F
 -- 
...®
000A
001F0B0C
 -- 



 -- 



 -- 
DEFADAC .ÚADAGDEF .p."...?PDADAG
CCC40FCCC400100907000603020200DC
0810456141300E14174560001F1709070F004F84050400741417
 -- 
SET ...ï...?...?.è.n.j..JFA1  ALCSIVP .k.¬..._.%..USASWG
ECE401050006003615090900DCCF44CDCECED400120905001300060600EECEEC
25300B5F1507004F162F4405010B16110013329570003F1306021F112F061D1C00421267
 -- 
ATMMRMIR...|UKPD  COBSIVP .k.¬...¡.¡..USASWG
CECD01020004000111030100EDDC44CDCECED4000109050013000A0A00EECEEC
13449499011F122F108F01050E0042740036229570013F1405021F112F081A1A00421267
 -- 
DEFADAC .m.€.í..USASWG..LNKENAB .ÚDFHZNEP ..
CCC40929002115020200EECEEC00DDDCDCC40FCCCEDCD400
4561413001AF1606046F146F55060600421267000810352551200E4689557001
 -- 
...â.À.À..AZR   DISPGWA .r.€.é...3..SASWG GWA   
23002314060600CED444CCEDCEC400010909003205000F00ECEEC4CEC444
CF119F009F2204040019900049277610023F1700093F103F91291300212670761000
 -- 
  .r.€...".ë..PDLNCDS   .q.¬...±...i.Á..USASWGLN
4400030909000715010100DCDDCCE44401030905001822080600EECEECDD
0002BF1701093F004F330E0200743534231F1403081F126F2009050042126735
 -- 
CSTUB .n."...'.h..USASWGLNKENAB ...ã...±.î.p.n..USASWG  
CEEEC400020901002723070800EECEECDDDCDCC400040022000815090900EECEEC44
323420034F1905051F146F001D18004212673525512003AF1406145F153F7647450542126700
 -- 
  ...\LNKOLM  ...í...".í.i.:..USASWGLNKOLSC 
44000EDD4400050022

Re: Format PDS unloaded on an CD

2021-04-18 Thread Hilario Garcia
El lun, 19 abr 2021 a las 7:40, Hilario Garcia ()
escribió:

> Hello,
>
> Thank you very much for your contributions.
> I have done multiple tests with different utilities (XMIT, FTP, IND $
> FILE, AMATERSE) and I have not been able to download them in a valid format.
> Attached I send in hexadecimal format the beginning of one of the PDS
> (loaded as FB, lrecl = 80) and it seems that at the beginning of the file
> is the directory of a
> PDS partitioned file. If the file is loaded as FB and 80 bytes long, you
> can see the code in EBCDIC format. The original file is in format
> binary and I have loaded it in binary.
>
> I would appreciate your help in this regard.
>
> Thank you very much in advance.
>
> Kind Regards
>
> Hilario
>
>
>
> --
> 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
.­_¢.&°..Ø"8.."8Vs...ê.,.ú...Ø..#...±.Ø..»ØHì4à®
0C60001B0590087F3320007F2200EA0025060D0008006300F0008080088C5F4A
0ADF208000F8000F00F8710F52002200020B0E0010B790001000F000F0004B088440001F
 -- 
...®
000A
001F0B0C
 -- 



 -- 



 -- 
DEFADAC .ÚADAGDEF .p."...?PDADAG
CCC40FCCC400100907000603020200DC
0810456141300E14174560001F1709070F004F84050400741417
 -- 
SET ...ï...?...?.è.n.j..JFA1  ALCSIVP .k.¬..._.%..USASWG
ECE401050006003615090900DCCF44CDCECED400120905001300060600EECEEC
25300B5F1507004F162F4405010B16110013329570003F1306021F112F061D1C00421267
 -- 
ATMMRMIR...|UKPD  COBSIVP .k.¬...¡.¡..USASWG
CECD01020004000111030100EDDC44CDCECED4000109050013000A0A00EECEEC
13449499011F122F108F01050E0042740036229570013F1405021F112F081A1A00421267
 -- 
DEFADAC .m.€.í..USASWG..LNKENAB .ÚDFHZNEP ..
CCC40929002115020200EECEEC00DDDCDCC40FCCCEDCD400
4561413001AF1606046F146F55060600421267000810352551200E4689557001
 -- 
...â.À.À..AZR   DISPGWA .r.€.é...3..SASWG GWA   
23002314060600CED444CCEDCEC400010909003205000F00ECEEC4CEC444
CF119F009F2204040019900049277610023F1700093F103F91291300212670761000
 -- 
  .r.€...".ë..PDLNCDS   .q.¬...±...i.Á..USASWGLN
4400030909000715010100DCDDCCE44401030905001822080600EECEECDD
0002BF1701093F004F330E0200743534231F1403081F126F2009050042126735
 -- 
CSTUB .n."...'.h..USASWGLNKENAB ...ã...±.î.p.n..USASWG  
CEEEC400020901002723070800EECEECDDDCDCC400040022000815090900EECEEC44
323420034F1905051F146F001D18004212673525512003AF1406145F153F7647450542126700
 -- 
  ...\LNKOLM  ...í...".í.i.:..USASWGLNKOLSC 
44000EDD4400050022002

Format PDS unloaded on an CD

2021-04-18 Thread Hilario Garcia
Hello,

Thank you very much for your contributions.
I have done multiple tests with different utilities (XMIT, FTP, IND $ FILE, 
AMATERSE) and I have not been able to download them in a valid format.
Attached I send in hexadecimal format the beginning of one of the PDS (loaded 
as FB, lrecl = 80) and it seems that at the beginning of the file is the 
directory of a
PDS partitioned file. If the file is loaded as FB and 80 bytes long, you can 
see the code in EBCDIC format. The original file is in format
binary and I have loaded it in binary.

I would appreciate your help in this regard.

Thank you very much in advance.

Kind Regards

Hilario



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


Re: Format PDS unloaded on an CD

2021-04-18 Thread Hilario Garcia
Hello,

All files have different extensions. The extension is an idea of the content of 
the PDS (SOURCE, CNTL, COBOL, ASM, DATA, ...

The problem is that I do not know the different DCB values of all the files (I 
suppose that not all have the same since some are LOAD libraries. If I load 
them with a record length of 80 for the source files, cntl, doc,. .. you can 
see the content but the data is not aligned by its content.

Kind Regards

Hilario

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


Format PDS unloaded on an CD

2021-04-18 Thread Hilario Garcia
811 / 5000
Resultados de traducción
I have a CD with download of several PDS files. The person who generated it is 
dead and the system where these files were has died and it cannot be
download again.
I don't know how these files were obtained (eg: DFDSS, IEBCOPY, AMATERSE, XMIT, 
IND $ FILE, FTP ...). Viewing the content of these files with Notepad, the PDS 
directory appears in the first registers and control blocks throughout the 
file. I also view the source code of the
PDS files but it is not aligned.
I have the need to recover these files and after many attempts with different 
methods I have not been able to load them in usable PDS format
for the Z / OS.

Can someone give me some idea or procedure to try to recover said PDS's?

Thank you very much in advance.

Kind Regards.

Hilario

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


How obtain DSN's of SL Tape using CBTTAPE

2019-03-13 Thread Hilario Garcia
The problem I have is that I do not know how many files there are in cartridges 
that have been
recorded as SL.

I am trying to use the TAPEMAP program of the CBTTAPE.

My jcl has the following format:

// STEP0010 EXEC PGM=TAPEMAP
// STEPLIBDD DSN=CBTTAPE.LINKLIB,DISP =SHR
// SYSPRINT DD SYSOUT=*
// AMSDUMP DD SYSOUT=*
// SYSUT1DD DISP=OLD,
//UNIT=3490,LABEL=(,BLP,EXPDT=98000),
//VOL=(,RETAIN ,, SER= PUNLIB)

Messages I receive from the system:

IEF233A M 0581, PUNLIB ,, TAPEMAP, STEP0010, 173
SYS19072.T143538.RA000.TAPEMAP.R0100030
IEC502E RK 0581, PUNLIB, SL, TAPEMAP, STEP0010
IEC501A M 0581, PUNLIB, NL ,, TAPEMAP, STEP0010, 
SYS19072.T143538.RA000.TAPEMAP.R0100

The system detects that the cartridge is SL (I have it encoded as BLP) to obtain
a list of all the files and DCB of the files in the cartridge.

I am not using any ATL.

Thank you very much in advance.

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


How to obtain DSN's on a cartridge on SL laber format

2019-03-13 Thread Hilario Garcia
I am trying to use the TAPEMAP utility downloaded from the web .cbttape.org 
and
I want to use it on some cartridges that have several files in "standard label" 
(SL) format
but I do not know the DSN of them.

I would like to be able to obtain a TAPEMAP report with the content of the 
files in the cartridge.

I am using the following jcl:

// STEP0010 EXEC PGM = TAPEMAP
// STEPLIBDD DSN = CBTTAPE.LINKLIB, DISP = SHR
// SYSPRINT DD SYSOUT = *
// AMSDUMP DD SYSOUT = *
// SYSUT1DD DSN = AMSOURCE.AWS, DISP = (OLD, PASS),
//UNIT = 3490, LABEL = (, BLP, EXPDT = 98000),
//   VOL=(, RETAIN,,SER=TAPAWS)

I receive the following messages:

IEF233A M 0580, TAPAWS ,, TAPEMAP, STEP0010, AMSOURCE.AWS
IEC502E R 0580, S03815, SL, TAPEMAP, STEP0010
IEC501A M 0580, TAPAWS, NL ,, TAPEMAP, STEP0010, AMSOURCE.AWS

How should I modify the jcl to solve the problem and get the list of all the 
DSNs?
in the cartridges.

Thank you very much in advance.

regards

Hilario

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


Re: SDSF on batch problem

2018-10-04 Thread Hilario Garcia
Hello ITschak,

The installation use RACF. I had test to use IKJEFT01 and call SDSF on
batch and I have the same problema.

I don't have why use different GRPNAME in online and batch.

Thanks in advance.

Hilario

El jue., 4 oct. 2018 a las 12:51, ITschak Mugzach ()
escribió:

> Sdsf group assignment depends on many factors like tso orocname, tso auth
> and others. Sdsf also asignes the first group that match your user id, so
> the order of grouos is also important. I assume you are not usinf saf
> (racf, tss, etc.) For group assignment.
>
> ITschak
>
> בתאריך יום ה׳, 4 באוק׳ 2018, 12:26, מאת Hilario Garcia ‏ >:
>
> > Hello,
> >
> > Checking was performed using the OMS command of the SDSF and I assigned a
> > different GRPNAME for a different TSO session to a SDSF session in batch.
> > Under TSO, I am assigned the profile of ISFPRM00 as a system programmer
> and
> > under SDSF in batch that of a normal user.
> >
> > Can someone tell me how I can modify the GRPNAME assignment for batch
> > processes executed by a systems programmer?
> >
> > Thank you very much in advance. Hilario
> >
> > El mié., 3 oct. 2018 a las 12:22, ITschak Mugzach ()
> > escribió:
> >
> > > Try print the who command on both environments and compare the sdsf
> group
> > > first.
> > >
> > > ITschak
> > >
> > > בתאריך יום ד׳, 3 באוק׳ 2018, 8:56, מאת Hilario Garcia ‏<
> > libr...@gmail.com
> > > >:
> > >
> > > > Hello,
> > > >
> > > > I have an LPAR that when we access through a session of "TSO" to the
> > SDSF
> > > > allows me a series of options.
> > > >
> > > > If you access the SDSF through a batch process, the options that
> allow
> > me
> > > > to visualize the SDSF are different.
> > > >
> > > > In both situation the userid is the same
> > > >
> > > > Attached documentation of the problem.
> > > >
> > > > Thank you very much in advance.
> > > >
> > > > Hilario
> > > >
> > > > - Options from a TSO session
> > > >
> > > >  COMMAND INPUT ===>
> > > >
> > > >  DAActive users  INIT  Initiators
> > > >  I Input queue   PRPrinters
> > > >  O Output queue  PUN   Punches
> > > >  H Held output queue RDR   Readers
> > > >  STStatus of jobsLINE  Lines
> > > >  NODE  Nodes
> > > >  LOG   System logSOSpool offload
> > > >  MAS   Members in the MAS
> > > >  JCJob classes   ULOG  User session log
> > > >  SEScheduling environments
> > > >  RES   WLM resources
> > > >
> > > >  END   Exit SDSF
> > > >
> > > > - Options from a batch session
> > > > COMMAND INPUT ===>
> > > >
> > > > DAActive users
> > > > I Input queue
> > > > O Output queue
> > > > H Held output queue
> > > > STStatus of jobs
> > > >
> > > > SEScheduling environments
> > > >
> > > > END   Exit SDSF
> > > >
> > > > - JCL used on batch
> > > >
> > > > //SDSFSTEP EXEC PGM=SDSF,PARM='++60,228'
> > > > //ISFOUT DD SYSOUT=*
> > > > //SYSPRINT DD SYSOUT=*
> > > > //SYSOUTDD SYSOUT=*
> > > > //ISFIN   DD *
> > > > PRINT ODSN '.LST(JOBLOG)'
> > > > PREFIX *
> > > > OWNER *
> > > > ST SDSFBAT
> > > > ++ALL
> > > > FIND SDSFBAT
> > > > ++//X
> > > > FIND SDSFBAT  LAST
> > > > ++//
> > > > PRINT
> > > > PRINT CLOSE
> > > > END
> > > >
> > > > Hilario
> > > >
> > > >
> --
> > > > 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: SDSF on batch problem

2018-10-04 Thread Hilario Garcia
Hello,

Checking was performed using the OMS command of the SDSF and I assigned a
different GRPNAME for a different TSO session to a SDSF session in batch.
Under TSO, I am assigned the profile of ISFPRM00 as a system programmer and
under SDSF in batch that of a normal user.

Can someone tell me how I can modify the GRPNAME assignment for batch
processes executed by a systems programmer?

Thank you very much in advance. Hilario

El mié., 3 oct. 2018 a las 12:22, ITschak Mugzach ()
escribió:

> Try print the who command on both environments and compare the sdsf group
> first.
>
> ITschak
>
> בתאריך יום ד׳, 3 באוק׳ 2018, 8:56, מאת Hilario Garcia ‏ >:
>
> > Hello,
> >
> > I have an LPAR that when we access through a session of "TSO" to the SDSF
> > allows me a series of options.
> >
> > If you access the SDSF through a batch process, the options that allow me
> > to visualize the SDSF are different.
> >
> > In both situation the userid is the same
> >
> > Attached documentation of the problem.
> >
> > Thank you very much in advance.
> >
> > Hilario
> >
> > - Options from a TSO session
> >
> >  COMMAND INPUT ===>
> >
> >  DAActive users  INIT  Initiators
> >  I Input queue   PRPrinters
> >  O Output queue  PUN   Punches
> >  H Held output queue RDR   Readers
> >  STStatus of jobsLINE  Lines
> >  NODE  Nodes
> >  LOG   System logSOSpool offload
> >  MAS   Members in the MAS
> >  JCJob classes   ULOG  User session log
> >  SEScheduling environments
> >  RES   WLM resources
> >
> >  END   Exit SDSF
> >
> > - Options from a batch session
> > COMMAND INPUT ===>
> >
> > DAActive users
> > I Input queue
> > O Output queue
> > H Held output queue
> > STStatus of jobs
> >
> > SEScheduling environments
> >
> > END   Exit SDSF
> >
> > - JCL used on batch
> >
> > //SDSFSTEP EXEC PGM=SDSF,PARM='++60,228'
> > //ISFOUT DD SYSOUT=*
> > //SYSPRINT DD SYSOUT=*
> > //SYSOUTDD SYSOUT=*
> > //ISFIN   DD *
> > PRINT ODSN '.LST(JOBLOG)'
> > PREFIX *
> > OWNER *
> > ST SDSFBAT
> > ++ALL
> > FIND SDSFBAT
> > ++//X
> > FIND SDSFBAT  LAST
> > ++//
> > PRINT
> > PRINT CLOSE
> > END
> >
> > Hilario
> >
> > --
> > 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


SDSF on batch problem

2018-10-03 Thread Hilario Garcia
Hello,

I have an LPAR that when we access through a session of "TSO" to the SDSF 
allows me a series of options.

If you access the SDSF through a batch process, the options that allow me to 
visualize the SDSF are different.

In both situation the userid is the same

Attached documentation of the problem.

Thank you very much in advance.

Hilario

- Options from a TSO session

 COMMAND INPUT ===>
   
 DAActive users  INIT  Initiators  
 I Input queue   PRPrinters
 O Output queue  PUN   Punches 
 H Held output queue RDR   Readers 
 STStatus of jobsLINE  Lines   
 NODE  Nodes   
 LOG   System logSOSpool offload   
 MAS   Members in the MAS  
 JCJob classes   ULOG  User session log
 SEScheduling environments 
 RES   WLM resources   
   
 END   Exit SDSF   

- Options from a batch session
COMMAND INPUT ===>  

DAActive users  
I Input queue   
O Output queue  
H Held output queue 
STStatus of jobs

SEScheduling environments   

END   Exit SDSF 

- JCL used on batch

//SDSFSTEP EXEC PGM=SDSF,PARM='++60,228'
//ISFOUT DD SYSOUT=*  
//SYSPRINT DD SYSOUT=*  
//SYSOUTDD SYSOUT=*  
//ISFIN   DD * 
PRINT ODSN '.LST(JOBLOG)'
PREFIX *
OWNER * 
ST SDSFBAT  
++ALL   
FIND SDSFBAT
++//X   
FIND SDSFBAT  LAST  
++//
PRINT   
PRINT CLOSE 
END 

Hilario

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


How to delete strange files on dasd

2018-09-12 Thread Hilario Garcia
Hello dear colleagues,

For unknown reasons I have a volume with the following content in the vtoc:

Command - Enter "/" to select action Dsorg Recfm Lrecl Blksz
-- 
-
 ** SYSUT1.T0849100 PS U 0 666
 ** SYSUT1.T1350305 PS U 0 666
 ** SYSUT1.T1352121 PS U 0 666
 ** SYSUT2.T0849100 PS U 0 666
 ** SYSUT2.T1350305 PS U 0 666
 ** SYSUT2.T1352121 PS U 0 666
 ** SYSUT3.T0849100 PS U 0 87
 ** SYSUT3.T1350305 PS U 0 87
 ** SYSUT3.T1352121 PS U 0 87

Any recommendations how can I delete these entries? What utility can I use for 
its elimination?

Thank you very much. in advance

regards

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


Re: How compile a C program under z/os

2017-10-23 Thread Hilario Garcia
Hello david,

The language of my country is "Spanish". I use the 3270 emulator as "IBM
Personal Communication" with codepage 1145. From the ISPF "EDIT" the
characters are displayed correctly or I think (# x'69 ', [x'4a',] x'5a ').

I have modified the Compiler C step and I have supplied codepage 1145. It
now compiles the process and the problem has been solved.

Thanks to your comments I was able to solve the problem.

Thank you very much again.

Hilario

2017-10-20 15:04 GMT+02:00 David Crayford <dcrayf...@gmail.com>:

> What code page is your source code in? If it's Spanish you will need to
> use that LOCALE. What is your 3270 emulator code page set to?
>
>
> On 20/10/2017 8:48 PM, Hilario Garcia wrote:
>
>> Hello David,
>>
>> I send you the copy code of the program.
>>
>> Thanks in advance.
>>
>> Hilario
>>
>> 2017-10-20 14:38 GMT+02:00 David Crayford <dcrayf...@gmail.com>:
>>
>> Can you post a snippet of source code?
>>>
>>>
>>>
>>> On 20/10/2017 7:33 PM, Hilario Garcia wrote:
>>>
>>> Hello David,
>>>>
>>>> Thank you very much for your comments on this.
>>>>
>>>> I have made changes to my Compile JCl:
>>>>
>>>>
>>>> LIST LONGNAME RENT SOURCE ASCII CONVLIT LOCALE (EN_US.IBM-037)
>>>>
>>>> LIST LONGNAME RENT SOURCE ASCII CONVLIT LOCALE (EN_US.IBM-1047)
>>>>
>>>> I always receive the same errors in the C ++ & Binder Compilation
>>>> process.
>>>> You can tell me something I should do wrong.
>>>>
>>>> Thank you very much.
>>>>
>>>> Hilario
>>>>
>>>> PS: Errors are:
>>>> G CCN0049 'FJA.SAMPLE.C (LPCSI)': 0 The option "" is not supported.
>>>> CCN3166 FJA.SAMPLE.C (LPCSI): 43 Definition of function \ u00d1include
>>>> requires
>>>> CCN3276 FJA.SAMPLE.C (LPCSI): 43 Syntax error: possible missing '{'?
>>>> CCN3766 FJA.SAMPLE.C (LPCSI): 51 The universal character name "[" is not
>>>> in
>>>> the
>>>> fier
>>>> CCN3766 FJA.SAMPLE.C (LPCSI): 52 The universal character name "[" is not
>>>> in
>>>> the
>>>> fier
>>>> CCN3766 FJA.SAMPLE.C (LPCSI): 53 The universal character name "[" is not
>>>> in
>>>> the
>>>> fier
>>>> CCN3766 FJA.SAMPLE.C (LPCSI): 54 The universal character name "[" is not
>>>> in
>>>> the
>>>> fier
>>>> CCN3766 FJA.SAMPLE.C (LPCSI): 62 The universal character name "[" is not
>>>> in
>>>> the
>>>> fier
>>>> CCN3275 FJA.SAMPLE.C (LPCSI): 62 Unexpected text ']' encountered.
>>>> CCN3273 FJA.SAMPLE.C (LPCSI): 63 Missing type in declaration of filtkey.
>>>> CCN3766 FJA.SAMPLE.C (LPCSI): 67 The universal character name "[" is not
>>>> in
>>>> the
>>>> fier
>>>> CCN3275 FJA.SAMPLE.C (LPCSI): 67 Unexpected text ']' encountered.
>>>> CCN3766 FJA.SAMPLE.C (LPCSI): 84 The universal character name "[" is not
>>>> in
>>>> the
>>>> fier
>>>> CCN3275 FJA.SAMPLE.C (LPCSI): 84 Unexpected text ']' encountered.
>>>>
>>>> 2017-10-19 13:45 GMT+02:00 David Crayford <dcrayf...@gmail.com>:
>>>>
>>>> Those aren't special characters, they're fundamental to the language.
>>>> Only
>>>>
>>>>> square brackets and the ^ operator are usually a problem for English
>>>>> code
>>>>> pages. NOLOCALE is your problem. Specify what  code page you want to
>>>>> use
>>>>> in the LOCALE() compiler option. For example LOCALE(EN_US.IBM-1047)  or
>>>>> LOCALE(EN_US.IBM-037) .
>>>>>
>>>>>
>>>>>
>>>>> On 19/10/2017 7:39 PM, Hilario Garcia wrote:
>>>>>
>>>>> Hello,
>>>>>
>>>>>> I am new to using c / c ++ language. I try to compile the first
>>>>>> program
>>>>>> under Z / os 2.1. The compiler detects errors when using special
>>>>>> characters
>>>>>> (#, [,], _ ..)
>>>>>>
>>>>>> I have been trying to fix the problems through the compiler options:
>>>>>> NOASCII CONVLIT NOLOCALE, but I have not managed to solve it

Re: How compile a C program under z/os

2017-10-20 Thread Hilario Garcia
Hello David,

I send you the copy code of the program.

Thanks in advance.

Hilario

2017-10-20 14:38 GMT+02:00 David Crayford <dcrayf...@gmail.com>:

> Can you post a snippet of source code?
>
>
>
> On 20/10/2017 7:33 PM, Hilario Garcia wrote:
>
>> Hello David,
>>
>> Thank you very much for your comments on this.
>>
>> I have made changes to my Compile JCl:
>>
>>
>>LIST LONGNAME RENT SOURCE ASCII CONVLIT LOCALE (EN_US.IBM-037)
>>
>>LIST LONGNAME RENT SOURCE ASCII CONVLIT LOCALE (EN_US.IBM-1047)
>>
>> I always receive the same errors in the C ++ & Binder Compilation process.
>> You can tell me something I should do wrong.
>>
>> Thank you very much.
>>
>> Hilario
>>
>> PS: Errors are:
>> G CCN0049 'FJA.SAMPLE.C (LPCSI)': 0 The option "" is not supported.
>> CCN3166 FJA.SAMPLE.C (LPCSI): 43 Definition of function \ u00d1include
>> requires
>> CCN3276 FJA.SAMPLE.C (LPCSI): 43 Syntax error: possible missing '{'?
>> CCN3766 FJA.SAMPLE.C (LPCSI): 51 The universal character name "[" is not
>> in
>> the
>> fier
>> CCN3766 FJA.SAMPLE.C (LPCSI): 52 The universal character name "[" is not
>> in
>> the
>> fier
>> CCN3766 FJA.SAMPLE.C (LPCSI): 53 The universal character name "[" is not
>> in
>> the
>> fier
>> CCN3766 FJA.SAMPLE.C (LPCSI): 54 The universal character name "[" is not
>> in
>> the
>> fier
>> CCN3766 FJA.SAMPLE.C (LPCSI): 62 The universal character name "[" is not
>> in
>> the
>> fier
>> CCN3275 FJA.SAMPLE.C (LPCSI): 62 Unexpected text ']' encountered.
>> CCN3273 FJA.SAMPLE.C (LPCSI): 63 Missing type in declaration of filtkey.
>> CCN3766 FJA.SAMPLE.C (LPCSI): 67 The universal character name "[" is not
>> in
>> the
>> fier
>> CCN3275 FJA.SAMPLE.C (LPCSI): 67 Unexpected text ']' encountered.
>> CCN3766 FJA.SAMPLE.C (LPCSI): 84 The universal character name "[" is not
>> in
>> the
>> fier
>> CCN3275 FJA.SAMPLE.C (LPCSI): 84 Unexpected text ']' encountered.
>>
>> 2017-10-19 13:45 GMT+02:00 David Crayford <dcrayf...@gmail.com>:
>>
>> Those aren't special characters, they're fundamental to the language. Only
>>> square brackets and the ^ operator are usually a problem for English code
>>> pages. NOLOCALE is your problem. Specify what  code page you want to use
>>> in the LOCALE() compiler option. For example LOCALE(EN_US.IBM-1047)  or
>>> LOCALE(EN_US.IBM-037) .
>>>
>>>
>>>
>>> On 19/10/2017 7:39 PM, Hilario Garcia wrote:
>>>
>>> Hello,
>>>>
>>>> I am new to using c / c ++ language. I try to compile the first program
>>>> under Z / os 2.1. The compiler detects errors when using special
>>>> characters
>>>> (#, [,], _ ..)
>>>>
>>>> I have been trying to fix the problems through the compiler options:
>>>> NOASCII CONVLIT NOLOCALE, but I have not managed to solve it.
>>>>
>>>> Can someone tell me something about how to solve this problem?
>>>>
>>>> Thank you very much.
>>>>
>>>> Hilario
>>>>
>>>> PD (Attached compilation process
>>>>
>>>> --
>>>> 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: How compile a C program under z/os

2017-10-20 Thread Hilario Garcia
Hello David,

Thank you very much for your comments on this.

I have made changes to my Compile JCl:


  LIST LONGNAME RENT SOURCE ASCII CONVLIT LOCALE (EN_US.IBM-037)

  LIST LONGNAME RENT SOURCE ASCII CONVLIT LOCALE (EN_US.IBM-1047)

I always receive the same errors in the C ++ & Binder Compilation process.
You can tell me something I should do wrong.

Thank you very much.

Hilario

PS: Errors are:
G CCN0049 'FJA.SAMPLE.C (LPCSI)': 0 The option "" is not supported.
CCN3166 FJA.SAMPLE.C (LPCSI): 43 Definition of function \ u00d1include
requires
CCN3276 FJA.SAMPLE.C (LPCSI): 43 Syntax error: possible missing '{'?
CCN3766 FJA.SAMPLE.C (LPCSI): 51 The universal character name "[" is not in
the
fier
CCN3766 FJA.SAMPLE.C (LPCSI): 52 The universal character name "[" is not in
the
fier
CCN3766 FJA.SAMPLE.C (LPCSI): 53 The universal character name "[" is not in
the
fier
CCN3766 FJA.SAMPLE.C (LPCSI): 54 The universal character name "[" is not in
the
fier
CCN3766 FJA.SAMPLE.C (LPCSI): 62 The universal character name "[" is not in
the
fier
CCN3275 FJA.SAMPLE.C (LPCSI): 62 Unexpected text ']' encountered.
CCN3273 FJA.SAMPLE.C (LPCSI): 63 Missing type in declaration of filtkey.
CCN3766 FJA.SAMPLE.C (LPCSI): 67 The universal character name "[" is not in
the
fier
CCN3275 FJA.SAMPLE.C (LPCSI): 67 Unexpected text ']' encountered.
CCN3766 FJA.SAMPLE.C (LPCSI): 84 The universal character name "[" is not in
the
fier
CCN3275 FJA.SAMPLE.C (LPCSI): 84 Unexpected text ']' encountered.

2017-10-19 13:45 GMT+02:00 David Crayford <dcrayf...@gmail.com>:

> Those aren't special characters, they're fundamental to the language. Only
> square brackets and the ^ operator are usually a problem for English code
> pages. NOLOCALE is your problem. Specify what  code page you want to use
> in the LOCALE() compiler option. For example LOCALE(EN_US.IBM-1047)  or
> LOCALE(EN_US.IBM-037) .
>
>
>
> On 19/10/2017 7:39 PM, Hilario Garcia wrote:
>
>> Hello,
>>
>> I am new to using c / c ++ language. I try to compile the first program
>> under Z / os 2.1. The compiler detects errors when using special characters
>> (#, [,], _ ..)
>>
>> I have been trying to fix the problems through the compiler options:
>> NOASCII CONVLIT NOLOCALE, but I have not managed to solve it.
>>
>> Can someone tell me something about how to solve this problem?
>>
>> Thank you very much.
>>
>> Hilario
>>
>> PD (Attached compilation process
>>
>> --
>> 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


How compile a C program under z/os

2017-10-19 Thread Hilario Garcia
Hello,

I am new to using c / c ++ language. I try to compile the first program under Z 
/ os 2.1. The compiler detects errors when using special characters (#, [,], _ 
..)

I have been trying to fix the problems through the compiler options: NOASCII 
CONVLIT NOLOCALE, but I have not managed to solve it.

Can someone tell me something about how to solve this problem?

Thank you very much.

Hilario

PD (Attached compilation process

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


Problem with startup DB2

2016-11-10 Thread Hilario Garcia
Hello,

After a hard stop of the partition, DB2 does not start and produces the 
following messages;

  -DB9G START DB2
  S DB9GMSTR
  $HASP100 DB9GMSTR ON STCINRDR
  IEF695I START DB9GMSTR WITH JOBNAME DB9GMSTR IS ASSIGNED TO USER START2
   , GROUP SYS1
  $HASP373 DB9GMSTR STARTED
  IEF403I DB9GMSTR - STARTED - TIME=13.51.31
  DSNY024I  -DB9G DSNYASCP MSTR INITIALIZATION IS STARTING
  DSNZ002I -DB9G DSNZINIT SUBSYSTEM DB9G SYSTEM PARAMETERS LOAD MODULE
  NAME IS DB9GPARM
  DSNZ016I  -DB9G DSNZINIT 093
  SUBSYSTEM DB9G SYSTEM PARAMETERS ARE AS FOLLOWS:
SYSTEM PARM  DSN910.DB9G.SDSNEXIT(DB9GPARM)
DSNHDECP DSN910.DB9G.SDSNEXIT(DSNHDECP)
ACCESS EXIT  DSN910.DB9G.SDSNEXIT(DSNX@XAC)
IDAUTH EXIT  DSN910.DB9G.SDSNEXIT(DSN3@ATH)
SIGNON EXIT  DSN910.DB9G.SDSNEXIT(DSN3@SGN)
  DSN7407I  -DB9G DSN7GAR1 094
  AUTOMATIC RESTART MANAGER REGISTER FAILED.
MVS IXCARM RETURN CODE = 000C,
MVS IXCARM REASON CODE = 0160.
  S DB9GIRLM
  $HASP100 DB9GIRLM ON STCINRDR
  IEF695I START DB9GIRLM WITH JOBNAME DB9GIRLM IS ASSIGNED TO USER START2
   , GROUP SYS1
  $HASP373 DB9GIRLM STARTED
  IEF403I DB9GIRLM - STARTED - TIME=13.51.39
  DXR180I DJ9G001 AUTOMATIC RESTART MANAGER IS NOT ENABLED
  DXR117I DJ9G001 INITIALIZATION COMPLETE
  DSNY001I  -DB9G SUBSYSTEM STARTING
  IEC161I 056-084,DB9GMSTR,DB9GMSTR,BSDS1,,,DSN910.DB9G.BSDS01, 103
  IEC161I DSN910.DB9G.BSDS01.DATA,USERCAT.Z110.DB2V9
  IEC161I 056-084,DB9GMSTR,DB9GMSTR,BSDS1,,,DSN910.DB9G.BSDS01, 104
  IEC161I DSN910.DB9G.BSDS01.INDEX,USERCAT.Z110.DB2V9
  IEC161I 062-086,DB9GMSTR,DB9GMSTR,BSDS1,,,DSN910.DB9G.BSDS01, 105
  IEC161I DSN910.DB9G.BSDS01.DATA,USERCAT.Z110.DB2V9
  IEC161I 056-084,DB9GMSTR,DB9GMSTR,BSDS2,,,DSN910.DB9G.BSDS02, 106
  IEC161I DSN910.DB9G.BSDS02.DATA,USERCAT.Z110.DB2V9
  IEC161I 056-084,DB9GMSTR,DB9GMSTR,BSDS2,,,DSN910.DB9G.BSDS02, 107
  IEC161I DSN910.DB9G.BSDS02.INDEX,USERCAT.Z110.DB2V9
  IEC161I 062-086,DB9GMSTR,DB9GMSTR,BSDS2,,,DSN910.DB9G.BSDS02, 108
  IEC161I DSN910.DB9G.BSDS02.DATA,USERCAT.Z110.DB2V9
  DSNJ127I  -DB9G SYSTEM TIMESTAMP FOR BSDS= 16.295 08:27:14.61
  DSNJ001I  -DB9G DSNJW007 CURRENT COPY 1 ACTIVE LOG 110
  DATA SET IS DSNAME=DSN910.DB9G.LOGCOPY1.DS02,
  STARTRBA=00015180,ENDRBA=0001539B
  DSNJ001I  -DB9G DSNJW007 CURRENT COPY 2 ACTIVE LOG 111
  DATA SET IS DSNAME=DSN910.DB9G.LOGCOPY2.DS02,
  STARTRBA=00015180,ENDRBA=0001539B
  DSNJ099I  -DB9G LOG RECORDING TO COMMENCE WITH 112
  STARTRBA=000152F2D000
  S DB9GDBM1
  $HASP100 DB9GDBM1 ON STCINRDR
SYSTEM ID SYS1 DATE 10/28/2016 2016.302 LINE   6,664  PAGE   2
  IEF695I START DB9GDBM1 WITH JOBNAME DB9GDBM1 IS ASSIGNED TO USER START2
   , GROUP SYS1
  $HASP373 DB9GDBM1 STARTED
  IEF403I DB9GDBM1 - STARTED - TIME=13.51.52
  DSNY024I  -DB9G DSNYASCP DBM1 INITIALIZATION IS STARTING
  IEA989I SLIP TRAP ID=X028 MATCHED.  JOBNAME=DB9GDBM1, ASID=0041.
 *DSNV086E -DB9G DB2 ABNORMAL TERMINATION REASON=00E80100
  IEA989I SLIP TRAP ID=X47B MATCHED.  JOBNAME=DB9GMSTR, ASID=0040.
  IEA989I SLIP TRAP ID=X13E MATCHED.  JOBNAME=DB9GMSTR, ASID=0040.
  IEF450I DB9GDBM1 DB9GDBM1 - ABEND=S028 U REASON=04000200 175
  TIME=13.51.59
  IEF404I DB9GDBM1 - ENDED - TIME=13.51.59
  $HASP395 DB9GDBM1 ENDED
  DXR110I DJ9G001 STOP COMMAND ACCEPTED
  IEA989I SLIP TRAP ID=X33E MATCHED.  JOBNAME=*UNAVAIL, ASID=0041.
  IEF450I DB9GMSTR DB9GMSTR - ABEND=S04F U REASON= 180
  TIME=13.51.59
  $HASP250 DB9GDBM1 PURGED -- (JOB KEY WAS D18FC9B3)
  DXR121I DJ9G001 END-OF-TASK CLEANUP SUCCESSFUL - HI-CSA377K  -
  HI-ACCT-CSA  0K
  IEF404I DB9GMSTR - ENDED - TIME=13.52.00
  $HASP395 DB9GMSTR ENDED
  IEF404I DB9GIRLM - ENDED - TIME=13.52.00
  IEF352I ADDRESS SPACE UNAVAILABLE
  $HASP395 DB9GIRLM ENDED
  IEA989I SLIP TRAP ID=X33E MATCHED.  JOBNAME=*UNAVAIL, ASID=0040.
  IEA989I SLIP TRAP ID=X33E MATCHED.  JOBNAME=*UNAVAIL, ASID=003D.
  $HASP250 DB9GIRLM PURGED -- (JOB KEY WAS D18FC9A7)
  $HASP250 DB9GMSTR PURGED -- (JOB KEY WAS D18FC99F)
  DSN3104I -DB9G DSN3EC0X - TERMINATION COMPLETE
  DSN3100I -DB9G DSN3EC0X - SUBSYSTEM DB9G READY FOR START COMMAND


I have also looked at the System Log and the following error messages appear:

IOEZ1E zFS I / O error 2101520 occurred for aggregate DSN910.SDSNAZF
IOEZ2E MMRE error id = 31 cis = 11 if = 0 of = 15 buf = 7E4A4000 CI = 0
BPXF002I FILE SYSTEM DSN910.SDSNAZFS WAS 984
NOT MOUNTED. RETURN CODE = 008A, REASON CODE = EF096058
IOEZ1E zFS I / O error 2101520 occurred for aggregate DSN910.SDSNJCC
IOEZ2E MMRE error id = 31 cis = 11 if = 0 of = 15 buf = 7E4A2000 CI = 0
BPXF002I FILE SYSTEM DSN910.SDSNJCC WAS 987
NOT MOUNTED. RETURN CODE = 008A, REASON CODE = EF096058

I have tried to run IOEAGSLV with all the options but they give me all the 
following error:

IOEZ1E zFS I / O error 2101520 occurred for aggregate DSN910.SDSNAZFS
IOEZ2E MMRE error id = 31 cis = 12 if = 0 of = 15 buf = 1F8D2000 CI = 2

Any comments to try to solve the errors and be able to start DB2.

Thank 

List user's

2016-04-15 Thread Hilario Garcia
Hello,

I need to obtain a list of users that access to the Z/OS (CICS, TSO, Batch) in 
a specific date.

¿  Is there any job to obtain this data from RACF or SMF ?

Thanks in advance.

Hilario

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


IBM ftp server isn't available

2016-02-11 Thread Hilario Garcia
Hello,

I have tried to download several documentation from IBM ftp server: 

ftp://public.dhe.ibm.com/systems/z

But I receive that isn't available.

Is there other url to download documents from IBM ?

Thanks in advance.

Kind Regards

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


Re: Error ICE007A on ICETOOL OMIT sentence

2016-02-07 Thread Hilario Garcia
Hello,

On book "Application Programmer Guide" appear the text:

"You can specify either an INCLUDE statement or an OMIT statement in the same
DFSORT run, but not both".

I read that before, but this is not really truth. Dfsort run correctly if I 
write an INCLUDE and an OMIT like this examples:

INCLUDE COND=(6,1,CH,EQ,X'1E',AND,  
 178,1,CH,EQ,X'05') 
OMITCOND=(239,3,CH,EQ,C'JOB')

Too work correctly with this syntax:  

INCLUDE COND=(6,1,CH,EQ,X'1E',AND,  
 178,1,CH,EQ,X'05') 
OMITCOND=(239,3,CH,EQ,C'JOB',OR,239,3,CH,EQ,C'SYS')

But didn't work this syntax:

INCLUDE COND=(6,1,CH,EQ,X'1E',AND,  
 178,1,CH,EQ,X'05') 
OMITCOND=(239,3,CH,EQ,C'JOB',OR,
  239,3,CH,EQ,C'SYS')   

I will try to put all the logic on INCLUDE statement.

Thanks in advance

Kind regards.

Hilario   

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


Error ICE007A on ICETOOL OMIT sentence

2016-02-05 Thread Hilario Garcia
Hello,

I need to omit records with some users that are located on SMF type 30 records.

The code that I have is:

//STEP0010EXEC  PGM=ICETOOL
//TOOLMSGDD  SYSOUT=* 
//DFSMSG  DD  SYSOUT=* 
//VLSHCNTL   DD  *
 OPTION COPY,VLSHRT 
 INCLUDE COND=(6,1,CH,EQ,X'1E',AND, 
  178,1,CH,EQ,X'05')
**  
** OMIT RECORDS
**  
 OMITCOND=(239,3,CH,EQ,C'IBM',OR,   
  239,3,CH,EQ,C'JOB',OR,
  239,3,CH,EQ,C'AUT',OR,
  239,3,CH,EQ,C'AUT',OR,
 
  239,3,CH,EQ,C'SYS')

I always receive the error ICE007A on all the OMIT but not in the first. If I 
put in the same line two OMIT it works only on the first line but not in the 
rest and the error is always ICE007A. I have try so much examples but allways I 
receive the error.

Some additional info:

  **
   OMITCOND=(239,3,CH,EQ,C'IBM',OR,239,3,CH,EQ,C'JOB',OR,
 239,3,CH,EQ,C'SYS') 
 $  
ICE007A 0 SYNTAX ERROR  
ICE146I 0 END OF STATEMENTS FROM VLSHCNTL - PARAMETER LIST STATEMENTS FOLLOW
  DEBUG NOABEND,ESTAE   

-

   OMITCOND=(239,3,CH,EQ,C'IBM',OR,  
 239,3,CH,EQ,C'JOB',OR,   
 $   
ICE007A 0 SYNTAX ERROR   
 239,3,CH,EQ,C'SYS',OR,   
 $   
ICE007A 0 SYNTAX ERROR   
 239,3,CH,EQ,C'AUT',OR,   
 $  
. 
  

I read the DFSORT manual but I follow the code restriction or I thik so.

May anybody help me ?

Thanks in advance.

Hilario 

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


Re: Count smf type 30-5 records

2016-02-05 Thread Hilario Garcia
Hello Elardus,


Thank you very much for your solutions. It's works fine.


Kind Regards.

Hilario

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


Count smf type 30-5 records

2016-02-04 Thread Hilario Garcia
Hello folks,

I need to extract some data from SMF type 30. The info are:

Userid
Jobname
Count (by Jobname on an expecific month)

I had tried using IBM Dfsort, but I can't get the number of a specific jobname 
on a user and on one month. I need this information:

USERID JOBNAME COUNT
user1joba 2
 jobb   18
 jobc  1

user2jobx  3

user3joby  2
 jobz  3

I had tried several Dfsort jobs but didn't work or the results are different to 
the correct.

I haven't any additional software like SAS, MXG, ...

Any suggestion on how to code a valid Dfsort for that ? Any example ?

Thanks in advance.

Kind Regards.

Hilario




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