Format PDS unloaded on an CD
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
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
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
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
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
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
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
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
-- 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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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
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