Re: DFSORT INCLUDE COND - What am I doing wrong?

2022-08-29 Thread Jack Zukt
Thank you Max,

Regards,
Jack

On Mon, 29 Aug 2022 at 16:31, Massimo Biancucci  wrote:

> Jack,
>
> I don't fully understand the output, the numbers at the beginnins seems to
> be edit related and cols not.
> This is my JCL, of course my catalog names are different but it doesn't
> seem to matter.
>
> //ST010EXEC  PGM=IDCAMS
>
> //SYSPRINT DD  SYSOUT=*
>
> //SYSINDD   *
>
>  DELETE MYUSER.V000.LISTCAT
>
>  IF MAXCC=8 THEN SET MAXCC=0
>
> /*
>
> //ST020EXEC  PGM=IDCAMS
>
> //SYSPRINT DD  DSN=MYUSER.V000.LISTCAT,
>
> // DISP=(,CATLG),SPACE=(TRK,(10,10),RLSE)
>
> //SYSINDD   *
>
>  LISTCAT CAT(MYCAT01) VOL
>
>  LISTCAT CAT(MYCAT02) VOL
>
> /*
>
> //*---
>
> //ST030EXEC  PGM=SORT
>
> //SYSOUTDD   SYSOUT=*
>
> //SORTIN   DD DISP=SHR,DSN=MYUSER.V000.LISTCAT
>
> //SORTOUT  DD SYSOUT=*
>
> //SYSIN DD   *
>
>  OPTION VLSCMP
>
>  INCLUDE COND=((6,03,CH,EQ,C'IDC',AND,
>
>   6,06,CH,NE,C'IDCAMS',AND,
>
>   6,8,CH,NE,C'IDC0001I'))
>
>  SORT FIELDS=COPY
>
> /*
>
> //*---
>
> //ST040EXEC  PGM=SORT
>
> //SYSOUTDD   SYSOUT=*
>
> //SORTIN   DD DISP=SHR,DSN=MYUSER.V000.LISTCAT
>
> //SORTOUT  DD SYSOUT=*
>
> //SYSIN DD   *
>
>  OPTION VLSCMP
>
>  INCLUDE COND=((6,03,CH,EQ,C'IDC',AND,
>
>   6,06,CH,NE,C'IDCAMS',AND,
>
>   6,8,CH,NE,C'IDC0001I'),OR,
>
>   (13,04,CH,EQ,C'DATA',AND,
>
>(22,07,CH,EQ,C'CATALOG',OR,
>
> 24,05,CH,EQ,C'SYSUC')))
>
>  SORT FIELDS=COPY
>
> /*
>
> I don't see any difference between ST03 and ST040 SORTOUT output.
> Hope this helps.
>
> Best regards.
> Max
>
> Il giorno lun 29 ago 2022 alle ore 13:59 Jack Zukt  ha
> scritto:
>
> > Thank you Max,
> >
> > As suggested,
> >
> >  =COLS>
> >
> +1+2+3+4+5+6+7
> >  08  IDC1566I ** .|. ...8..2...{. NOT
> > LISTED
> >  09  IDC3014I CATALOG ERROR
> >
> >  10  IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS
> > IGG0CLE0-6
> >  11  IDC3009I FOR MPG004
> >
> >
> > The file RECFM is VBA
> >
> > Regards
> > Jack
> >
> > On Mon, 29 Aug 2022 at 12:27, Massimo Biancucci 
> wrote:
> >
> > > Jack,
> > >
> > > I tried the same and IDC3014I does not disappear after inserting new OR
> > > conditions.
> > > A print screen with "cols on" on the first output could be helpful.
> > >
> > > Best regards.
> > > Max.
> > >
> > > Il giorno lun 29 ago 2022 alle ore 11:53 Jack Zukt 
> > ha
> > > scritto:
> > >
> > > > Hi all,
> > > >
> > > > I am trying to get all the IDC messages from a file to where I
> directed
> > > the
> > > > output from multiple "LISTCAT CAT(usercat name) VOL"
> > > > I am using this
> > > >
> > > > INCLUDE COND=(6,03,CH,EQ,C'IDC',&,
> > > >6,06,CH,NE,C'IDCAMS',&,
> > > >6,08,CH,NE,C'IDC0001I')
> > > >
> > > > and it works just fine. But then I wanted to include the usercat
> names
> > so
> > > > that I can see to which catalog each set of messages is related to,
> so
> > I
> > > > changed it to
> > > >
> > > > INCLUDE COND=((6,03,CH,EQ,C'IDC',&,
> > > >6,06,CH,NE,C'IDCAMS',&,
> > > >6,08,CH,NE,C'IDC0001I'),|,
> > > >  (13,04,CH,EQ,C'DATA',&,
> > > >  (22,07,CH,EQ,C'CATALOG',|,
> > > >   24,05,CH,EQ,C'SYSUC')))
> > > >
> > > > the USERCATs being named CATALOG.xxx or xxSYSUC.
> > > >
> > > > So now I have the IDC messages and the USERCAT names in between. But
> > the
> > > > output file is missing all the
> > > >
> > > > IDC3014I CATALOG ERROR
> > > >
> > > > messages and I can not figure out why.
> > > >
> > > > So, I really do not need those specific messages, but as I do not
> > > > understand why they are missing, I do not know if I am missing any
> > > others.
> > > >
> > > > Regards,
> > > > Jack
> > > >
> > > >
> --
> > > > 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 

Re: DFSORT INCLUDE COND - What am I doing wrong?

2022-08-29 Thread Massimo Biancucci
Jack,

I don't fully understand the output, the numbers at the beginnins seems to
be edit related and cols not.
This is my JCL, of course my catalog names are different but it doesn't
seem to matter.

//ST010EXEC  PGM=IDCAMS

//SYSPRINT DD  SYSOUT=*

//SYSINDD   *

 DELETE MYUSER.V000.LISTCAT

 IF MAXCC=8 THEN SET MAXCC=0

/*

//ST020EXEC  PGM=IDCAMS

//SYSPRINT DD  DSN=MYUSER.V000.LISTCAT,

// DISP=(,CATLG),SPACE=(TRK,(10,10),RLSE)

//SYSINDD   *

 LISTCAT CAT(MYCAT01) VOL

 LISTCAT CAT(MYCAT02) VOL

/*

//*---

//ST030EXEC  PGM=SORT

//SYSOUTDD   SYSOUT=*

//SORTIN   DD DISP=SHR,DSN=MYUSER.V000.LISTCAT

//SORTOUT  DD SYSOUT=*

//SYSIN DD   *

 OPTION VLSCMP

 INCLUDE COND=((6,03,CH,EQ,C'IDC',AND,

  6,06,CH,NE,C'IDCAMS',AND,

  6,8,CH,NE,C'IDC0001I'))

 SORT FIELDS=COPY

/*

//*---

//ST040EXEC  PGM=SORT

//SYSOUTDD   SYSOUT=*

//SORTIN   DD DISP=SHR,DSN=MYUSER.V000.LISTCAT

//SORTOUT  DD SYSOUT=*

//SYSIN DD   *

 OPTION VLSCMP

 INCLUDE COND=((6,03,CH,EQ,C'IDC',AND,

  6,06,CH,NE,C'IDCAMS',AND,

  6,8,CH,NE,C'IDC0001I'),OR,

  (13,04,CH,EQ,C'DATA',AND,

   (22,07,CH,EQ,C'CATALOG',OR,

24,05,CH,EQ,C'SYSUC')))

 SORT FIELDS=COPY

/*

I don't see any difference between ST03 and ST040 SORTOUT output.
Hope this helps.

Best regards.
Max

Il giorno lun 29 ago 2022 alle ore 13:59 Jack Zukt  ha
scritto:

> Thank you Max,
>
> As suggested,
>
>  =COLS>
> +1+2+3+4+5+6+7
>  08  IDC1566I ** .|. ...8..2...{. NOT
> LISTED
>  09  IDC3014I CATALOG ERROR
>
>  10  IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS
> IGG0CLE0-6
>  11  IDC3009I FOR MPG004
>
>
> The file RECFM is VBA
>
> Regards
> Jack
>
> On Mon, 29 Aug 2022 at 12:27, Massimo Biancucci  wrote:
>
> > Jack,
> >
> > I tried the same and IDC3014I does not disappear after inserting new OR
> > conditions.
> > A print screen with "cols on" on the first output could be helpful.
> >
> > Best regards.
> > Max.
> >
> > Il giorno lun 29 ago 2022 alle ore 11:53 Jack Zukt 
> ha
> > scritto:
> >
> > > Hi all,
> > >
> > > I am trying to get all the IDC messages from a file to where I directed
> > the
> > > output from multiple "LISTCAT CAT(usercat name) VOL"
> > > I am using this
> > >
> > > INCLUDE COND=(6,03,CH,EQ,C'IDC',&,
> > >6,06,CH,NE,C'IDCAMS',&,
> > >6,08,CH,NE,C'IDC0001I')
> > >
> > > and it works just fine. But then I wanted to include the usercat names
> so
> > > that I can see to which catalog each set of messages is related to, so
> I
> > > changed it to
> > >
> > > INCLUDE COND=((6,03,CH,EQ,C'IDC',&,
> > >6,06,CH,NE,C'IDCAMS',&,
> > >6,08,CH,NE,C'IDC0001I'),|,
> > >  (13,04,CH,EQ,C'DATA',&,
> > >  (22,07,CH,EQ,C'CATALOG',|,
> > >   24,05,CH,EQ,C'SYSUC')))
> > >
> > > the USERCATs being named CATALOG.xxx or xxSYSUC.
> > >
> > > So now I have the IDC messages and the USERCAT names in between. But
> the
> > > output file is missing all the
> > >
> > > IDC3014I CATALOG ERROR
> > >
> > > messages and I can not figure out why.
> > >
> > > So, I really do not need those specific messages, but as I do not
> > > understand why they are missing, I do not know if I am missing any
> > others.
> > >
> > > Regards,
> > > Jack
> > >
> > > --
> > > 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: DFSORT INCLUDE COND - What am I doing wrong?

2022-08-29 Thread Jack Zukt
Thank you Max,

As suggested,

 =COLS>
+1+2+3+4+5+6+7
 08  IDC1566I ** .|. ...8..2...{. NOT
LISTED
 09  IDC3014I CATALOG ERROR

 10  IDC3009I ** VSAM CATALOG RETURN CODE IS 50 - REASON CODE IS
IGG0CLE0-6
 11  IDC3009I FOR MPG004


The file RECFM is VBA

Regards
Jack

On Mon, 29 Aug 2022 at 12:27, Massimo Biancucci  wrote:

> Jack,
>
> I tried the same and IDC3014I does not disappear after inserting new OR
> conditions.
> A print screen with "cols on" on the first output could be helpful.
>
> Best regards.
> Max.
>
> Il giorno lun 29 ago 2022 alle ore 11:53 Jack Zukt  ha
> scritto:
>
> > Hi all,
> >
> > I am trying to get all the IDC messages from a file to where I directed
> the
> > output from multiple "LISTCAT CAT(usercat name) VOL"
> > I am using this
> >
> > INCLUDE COND=(6,03,CH,EQ,C'IDC',&,
> >6,06,CH,NE,C'IDCAMS',&,
> >6,08,CH,NE,C'IDC0001I')
> >
> > and it works just fine. But then I wanted to include the usercat names so
> > that I can see to which catalog each set of messages is related to, so I
> > changed it to
> >
> > INCLUDE COND=((6,03,CH,EQ,C'IDC',&,
> >6,06,CH,NE,C'IDCAMS',&,
> >6,08,CH,NE,C'IDC0001I'),|,
> >  (13,04,CH,EQ,C'DATA',&,
> >  (22,07,CH,EQ,C'CATALOG',|,
> >   24,05,CH,EQ,C'SYSUC')))
> >
> > the USERCATs being named CATALOG.xxx or xxSYSUC.
> >
> > So now I have the IDC messages and the USERCAT names in between. But the
> > output file is missing all the
> >
> > IDC3014I CATALOG ERROR
> >
> > messages and I can not figure out why.
> >
> > So, I really do not need those specific messages, but as I do not
> > understand why they are missing, I do not know if I am missing any
> others.
> >
> > Regards,
> > Jack
> >
> > --
> > 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: DFSORT INCLUDE COND - What am I doing wrong?

2022-08-29 Thread Massimo Biancucci
Jack,

I tried the same and IDC3014I does not disappear after inserting new OR
conditions.
A print screen with "cols on" on the first output could be helpful.

Best regards.
Max.

Il giorno lun 29 ago 2022 alle ore 11:53 Jack Zukt  ha
scritto:

> Hi all,
>
> I am trying to get all the IDC messages from a file to where I directed the
> output from multiple "LISTCAT CAT(usercat name) VOL"
> I am using this
>
> INCLUDE COND=(6,03,CH,EQ,C'IDC',&,
>6,06,CH,NE,C'IDCAMS',&,
>6,08,CH,NE,C'IDC0001I')
>
> and it works just fine. But then I wanted to include the usercat names so
> that I can see to which catalog each set of messages is related to, so I
> changed it to
>
> INCLUDE COND=((6,03,CH,EQ,C'IDC',&,
>6,06,CH,NE,C'IDCAMS',&,
>6,08,CH,NE,C'IDC0001I'),|,
>  (13,04,CH,EQ,C'DATA',&,
>  (22,07,CH,EQ,C'CATALOG',|,
>   24,05,CH,EQ,C'SYSUC')))
>
> the USERCATs being named CATALOG.xxx or xxSYSUC.
>
> So now I have the IDC messages and the USERCAT names in between. But the
> output file is missing all the
>
> IDC3014I CATALOG ERROR
>
> messages and I can not figure out why.
>
> So, I really do not need those specific messages, but as I do not
> understand why they are missing, I do not know if I am missing any others.
>
> Regards,
> Jack
>
> --
> 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