Re: ADR120E - DFDSS Error

2006-05-25 Thread Bruce Hewson
Hello John,

I believe a lot of confusion has been caused by the original formatting of 
your command:

   DUMP  DATASET(INCLUDE(IST*.**-
 MED*.**   -
 X*.** -
 Y*.** -
 Z*.** -
 SRT.**-
 SYS*.**   -
 TEMP.**   -
 *SYSUT*.**)  -
 BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) -
 LOGINDDNAME(DASD) -
 OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -
 TOL(ENQF)


I would have coded these as:-

   DUMP  DATASET(INCLUDE(- == changed
  IST*.** - == changed
 MED*.** -
 X*.**   -
 Y*.**   -
 Z*.**   -
 SRT.**  -
 SYS*.** -
 TEMP.** -
 *SYSUT*.**  - == changed
) - == changed - end INCLUDE
 BY(CREDT,LT,*,-1,DSORG,NE,VSAM) -
) - == changed - end DATASET
 LOGINDDNAME(DASD) -
 OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -
 TOL(ENQF)

By formatting the end ) on separate lines, it makes it very easy to 
validate the parmaters and parentheses on the BY statement.

I believe you already have changed the BY statement to be

  BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -

Regards
Bruce Hewson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-25 Thread John Dawes
Bruce,
   
  Thanks for your suggestion.  Can you tell me how would I code the following 
with this job:
   
  EXCLUDE(SYS1.VTOCIX.**-
  SYS1.VVDS.**)-
   
  I have to exclude the above entries.  However, I am not sure how to add this 
to the main body of the job.  Can you suggest something?  


Bruce Hewson [EMAIL PROTECTED] wrote:
  Hello John,

I believe a lot of confusion has been caused by the original formatting of 
your command:

 DUMP DATASET(INCLUDE(IST*.** -
 MED*.** -
 X*.** -
 Y*.** -
 Z*.** -
 SRT.** -
 SYS*.** -
 TEMP.** -
 *SYSUT*.**) -
 BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) -
 LOGINDDNAME(DASD) -
 OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -
 TOL(ENQF)


I would have coded these as:-

 DUMP DATASET(INCLUDE( - == changed
IST*.** - == changed
 MED*.** -
 X*.** -
 Y*.** -
 Z*.** -
 SRT.** -
 SYS*.** -
 TEMP.** -
 *SYSUT*.** - == changed
) - == changed - end INCLUDE
 BY(CREDT,LT,*,-1,DSORG,NE,VSAM) -
) - == changed - end DATASET
 LOGINDDNAME(DASD) -
 OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -
 TOL(ENQF)

By formatting the end ) on separate lines, it makes it very easy to 
validate the parmaters and parentheses on the BY statement.

I believe you already have changed the BY statement to be

BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -

Regards
Bruce Hewson

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html



-
On Yahoo!7
  Socceroos Central: Latest news, schedule, blogs and videos.  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-25 Thread McKown, John
 -Original Message-
 From: IBM Mainframe Discussion List 
 [mailto:[EMAIL PROTECTED] On Behalf Of John Dawes
 Sent: Thursday, May 25, 2006 10:11 AM
 To: IBM-MAIN@BAMA.UA.EDU
 Subject: Re: ADR120E - DFDSS Error
 
 
 Bruce,

   Thanks for your suggestion.  Can you tell me how would I 
 code the following with this job:

   EXCLUDE(SYS1.VTOCIX.**-
   SYS1.VVDS.**)-

   I have to exclude the above entries.  However, I am not 
 sure how to add this to the main body of the job.  Can you 
 suggest something?  

DUMP -
  DATASET( -
INCLUDE ( A** -
  B** ) -
EXCLUDE ( SYS1.VVDS.** -
  SYS1.VTOCIX.** ) -
  ) 

--
John McKown
Senior Systems Programmer
HealthMarkets
Keeping the Promise of Affordable Coverage
Administrative Services Group
Information Technology

This message (including any attachments) contains confidential
information intended for a specific individual and purpose, and its
content is protected by law.  If you are not the intended recipient, you
should delete this message and are hereby notified that any disclosure,
copying, or distribution of this transmission, or taking any action
based on it, is strictly prohibited. 
 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-25 Thread John Dawes
Thanks to all who helped.  It works.  
   
  Donald, regarding the HILITE function, I did what you suggested and I chose 
JCL and Parenthesis matching,  but I didn't get any message or anything else.  
Should I expect any type of informational or error message?  As a test I 
removed one of the parenthesis but nothing was flagged.

Imbriale, Donald (Exchange) [EMAIL PROTECTED] wrote:
  The nature of the syntax of the control statements results in many
parentheses. In fact, it seems that parentheses (or lack thereof)
contributed to the problems encountered. One way to help deal with that
is to use ISPF edit's HILITE function. This works best if the control
cards are in a separate member or data set. Once in edit, enter HI on
the command line, select Other for Language and be sure Parentheses
Matching is selected. Once you return to the edit session, you should
be able to tell if there are any unbalanced parentheses.

Don Imbriale



-
  The LOST Ninja blog: Exclusive clues, clips and gossip.  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-25 Thread Schwarz, Barry A
Highlighting doesn't generate any messages in this situation.  All it
does is color code the parentheses so you can visually determine which
pair are a matched set.

-Original Message-
From: John Dawes [mailto:[EMAIL PROTECTED] 
Sent: Thursday, May 25, 2006 11:10 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ADR120E - DFDSS Error

Thanks to all who helped.  It works.  
   
  Donald, regarding the HILITE function, I did what you suggested and I
chose JCL and Parenthesis matching,  but I didn't get any message or
anything else.  Should I expect any type of informational or error
message?  As a test I removed one of the parenthesis but nothing was
flagged.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-25 Thread Imbriale, Donald (Exchange)
There are no messages.  

Matched pairs of parentheses will be shown in the same color.  Nested
parens are supported; the outermost pair will be in white, then next
inner pair would be red, etc.  Any unmatched parens should show up as
highlighted pink/purple.

Don Imbriale

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf
Of John Dawes
Sent: Thursday, May 25, 2006 2:10 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ADR120E - DFDSS Error

Thanks to all who helped.  It works.

  Donald, regarding the HILITE function, I did what you suggested and I
chose JCL
and Parenthesis matching,  but I didn't get any message or anything
else.  Should I
expect any type of informational or error message?  As a test I removed
one of the
parenthesis but nothing was flagged.

Imbriale, Donald (Exchange) [EMAIL PROTECTED] wrote:
  The nature of the syntax of the control statements results in many
parentheses. In fact, it seems that parentheses (or lack thereof)
contributed to the problems encountered. One way to help deal with that
is to use ISPF edit's HILITE function. This works best if the control
cards are in a separate member or data set. Once in edit, enter HI on
the command line, select Other for Language and be sure Parentheses
Matching is selected. Once you return to the edit session, you should
be able to tell if there are any unbalanced parentheses.

Don Imbriale



-
  The LOST Ninja blog: Exclusive clues, clips and gossip.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


***
Bear Stearns is not responsible for any recommendation, solicitation, 
offer or agreement or any information about any transaction, customer 
account or account activity contained in this communication.
***

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-24 Thread John Dawes
Hi Rex,
   
  I tried your suggestion and received an error.  Below is the Jcl and 
error message I received.  Can you please spot my error.  This is 
driving me mad, and I cannot seem to find this simple error.  Maybe a fresh 
pair of eyes will spot my mistake.  Thanks for your help.  
   
  JCL:
   
  //DASD DD UNIT=SYSALLDA,VOL=SER=D38P01,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P02,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P03,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P04,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P06,DISP=SHR   
//TAPE DD DSN=Z8002D.TEST,DISP=(,KEEP,KEEP),  
//UNIT=(CART),VOL=(,,,35),LABEL=RETPD=10  
//SYSINDD *   
  DUMP  DATASET(INCLUDE(IST*.**-  
  MED*.**   - 
  X*.** - 
  Y*.** - 
  Z*.** - 
  SRT.**- 
  SYS*.**   - 
  TEMP.**   - 
  *SYSUT*.**)  -  
  BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -   
  LOGINDDNAME(DASD) - 
  OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP - 
  TOL(ENQF)   

  Execution  error message:
   
  ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
IN NORUN MOD
  DUMP  DATASET(INCLUDE(IST*.**-
  MED*.**   -   
  X*.** -   
  Y*.** -   
  Z*.** -   
  SRT.**-   
  SYS*.**   -   
  TEMP.**   -   
  *SYSUT*.**)  -
  BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) - 
  LOGINDDNAME(DASD) -   
  OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -   
  TOL(ENQF) 
ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP 
'
ADR109I (R/I)-RI01 (01), 2006.143 14:07:44 INITIAL SCAN OF USER CONTROL 
STATEMEN
ADR129E (001)-RI01 (01), KEYWORD 'LOGINDDNAME ' IS IMPROPER 
ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND 
ADR017E (001)-CLTSK(01), 2006.143 14:07:44 TASK NOT SCHEDULED DUE TO 
ERROR. TASK


Pommier, Rex R. [EMAIL PROTECTED] wrote:  Try 
BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -

Rex



-
On Yahoo!7
  Socceroos Central: Latest news, schedule, blogs and videos.  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-24 Thread Pommier, Rex R.
Found it!

We were still 1 right paren short.  Replace the BY line with the
following:

   BY((CREDT LT (*,-1)) (DSORG NE VSAM))) -   

Also, when I discovered the problem, my test then complained about
having DASD concatenated.  You will need to either put separate DD
statements in for each VOLSER or use catalog processing and skip the
volser allocations.  If you want to set it up with multiple volsers,
just use:

LOGINDDNAME(DASD1 DASD2 DASD3)

HTH

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of John Dawes
Sent: Wednesday, May 24, 2006 7:04 AM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ADR120E - DFDSS Error


Hi Rex,
   
  I tried your suggestion and received an error.  Below is the Jcl and 
error message I received.  Can you please spot my error.  This is 
driving me mad, and I cannot seem to find this simple error.  Maybe a
fresh 
pair of eyes will spot my mistake.  Thanks for your help.  
   
  JCL:
   
  //DASD DD UNIT=SYSALLDA,VOL=SER=D38P01,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P02,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P03,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P04,DISP=SHR   
// DD UNIT=SYSALLDA,VOL=SER=D38P06,DISP=SHR   
//TAPE DD DSN=Z8002D.TEST,DISP=(,KEEP,KEEP),  
//UNIT=(CART),VOL=(,,,35),LABEL=RETPD=10  
//SYSINDD *   
  DUMP  DATASET(INCLUDE(IST*.**-  
  MED*.**   - 
  X*.** - 
  Y*.** - 
  Z*.** - 
  SRT.**- 
  SYS*.**   - 
  TEMP.**   - 
  *SYSUT*.**)  -  
  BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -   
  LOGINDDNAME(DASD) - 
  OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP - 
  TOL(ENQF)   

  Execution  error message:
   
  ADR031I (SCH)-PRIME(01), TYPRUN=NORUN REQUESTED. TASKS WILL EXECUTE 
IN NORUN MOD
  DUMP  DATASET(INCLUDE(IST*.**-

  MED*.**   -

  X*.** -

  Y*.** -

  Z*.** -

  SRT.**-

  SYS*.**   -

  TEMP.**   -

  *SYSUT*.**)  -

  BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -

  LOGINDDNAME(DASD) -

  OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -

  TOL(ENQF)

ADR101I (R/I)-RI01 (01), TASKID 001 HAS BEEN ASSIGNED TO COMMAND 'DUMP 
'
ADR109I (R/I)-RI01 (01), 2006.143 14:07:44 INITIAL SCAN OF USER CONTROL 
STATEMEN
ADR129E (001)-RI01 (01), KEYWORD 'LOGINDDNAME ' IS IMPROPER

ADR131E (001)-RI03 (01), ABOVE TEXT BYPASSED UNTIL NEXT COMMAND

ADR017E (001)-CLTSK(01), 2006.143 14:07:44 TASK NOT SCHEDULED DUE TO 
ERROR. TASK


Pommier, Rex R. [EMAIL PROTECTED] wrote:  Try
BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -

Rex



-
On Yahoo!7
  Socceroos Central: Latest news, schedule, blogs and videos.  

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-24 Thread Terry Sambrooks
Hi John,

I saw your posts yesterday but believed it would be resolved before I could 
respond.

I played about with your command input and changed from this:

//SYSINDD *   
  DUMP  DATASET(INCLUDE(IST*.**-  
  MED*.**   - 
  X*.** - 
  Y*.** - 
  Z*.** - 
  SRT.**- 
  SYS*.**   - 
  TEMP.**   - 
  *SYSUT*.**)  - 

To this

   DUMP LIDD(DASD) OUTDD(TAPE)-  
   OPT(4) ALLDATA(*) ALLEXCP -   
   TOL(ENQF) -   
   DATASET(INCLUDE(IST*.**,   -  
   MED*.**,  -   
   X*.**,-   
   Y*.**,-   
   Z*.**,-   
   SRT.**,   -   
   SYS*.**,  -   
   TEMP.**,  -   
   *SYSUT*.**)  -
   BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM  
  

It clear all command errors..

Kind Regards - Terry

Terry Sambrooks
Director
KMS-IT Limited
228 Abbeydale Road South
Dore
Sheffield
S17 3LA
UK

Tel: +44 (0)114 262 0933
WEB:
www.legac-e.co.uk
www.kmsitltd.co.uk

Reg: England  Wales 3767263 at the above address

All outgoing E-mails are scanned but it remains the recipients responsibility 
to ensure that their system is protected from viruses, trojans, worms, and 
spy-ware.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-24 Thread John Dawes
Rex,
   
 EUREKA !!!   It worked.  Thanks to you and all who have helped me.  As they 
say in the U.K. the problem was a sticky wicket 
   
  Thanks to IBM-Main audience.


Pommier, Rex R. [EMAIL PROTECTED] wrote:  Found it!

We were still 1 right paren short. Replace the BY line with the
following:

BY((CREDT LT (*,-1)) (DSORG NE VSAM))) - 

Also, when I discovered the problem, my test then complained about
having DASD concatenated. You will need to either put separate DD
statements in for each VOLSER or use catalog processing and skip the
volser allocations. If you want to set it up with multiple volsers,
just use:

LOGINDDNAME(DASD1 DASD2 DASD3)

HTH

Rex



-
On Yahoo!7 
  360°:  Your own space to share what you want with who you want!

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-24 Thread John Dawes
Terry,
   
  I have kept your jcl handy.  Thanks for your suggestion.  I will try it out 
as well.

Terry Sambrooks [EMAIL PROTECTED] wrote:
  Hi John,

I saw your posts yesterday but believed it would be resolved before I could 
respond.

I played about with your command input and changed from this:

//SYSIN DD * 
DUMP DATASET(INCLUDE(IST*.** - 
MED*.** - 
X*.** - 
Y*.** - 
Z*.** - 
SRT.** - 
SYS*.** - 
TEMP.** - 
*SYSUT*.**) - 

To this

DUMP LIDD(DASD) OUTDD(TAPE) - 
OPT(4) ALLDATA(*) ALLEXCP - 
TOL(ENQF) - 
DATASET(INCLUDE(IST*.**, - 
MED*.**, - 
X*.**, - 
Y*.**, - 
Z*.**, - 
SRT.**, - 
SYS*.**, - 
TEMP.**, - 
*SYSUT*.**) - 
BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM 


It clear all command errors..

Kind Regards - Terry

Terry Sambrooks
Director
KMS-IT Limited
228 Abbeydale Road South
Dore
Sheffield
S17 3LA
UK

Tel: +44 (0)114 262 0933
WEB:
www.legac-e.co.uk
www.kmsitltd.co.uk

Reg: England  Wales 3767263 at the above address

All outgoing E-mails are scanned but it remains the recipients responsibility 
to ensure that their system is protected from viruses, trojans, worms, and 
spy-ware.

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html



-
  The LOST Ninja blog: Exclusive clues, clips and gossip.  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-24 Thread Stephen M. Wiegand

At 01:32 PM 05/23/2006, John Dawes wrote:
I am attempting to back up some files using DFDSS.  I receve the 
error ADR120E because of  TOO MANY POSITIONAL PARAMETERS AFTER '-1'
Can you suggest a correction.  What I am attempting to do is backup 
files from certain volumes.  However, I want only to backup files 
that are less than 1 day old and must NOT be VSAM.  Below is a copy 
of my control cards.


  DUMP  DATASET(INCLUDE(IST*.**-
MED*.**   -
X*.** -
Y*.** -
Z*.** -
SRT.**-
SYS*.**   -
TEMP.**   -
*SYSUT*.**)  -
BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) -
LOGINDDNAME(DASD) -
OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -
TOL(ENQF)

  Thanks to all in advance.



You are missing a paren in your BY statement.  It should read:
BY((CREDT,LT,*,-1) (DSORG,NE,VSAM)) -

Steve Wiegand

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


ADR120E - DFDSS Error

2006-05-23 Thread John Dawes
I am attempting to back up some files using DFDSS.  I receve the error ADR120E 
because of  TOO MANY POSITIONAL PARAMETERS AFTER '-1' 
Can you suggest a correction.  What I am attempting to do is backup files from 
certain volumes.  However, I want only to backup files that are less than 1 day 
old and must NOT be VSAM.  Below is a copy of my control cards.
   
  DUMP  DATASET(INCLUDE(IST*.**-  
MED*.**   - 
X*.** - 
Y*.** - 
Z*.** - 
SRT.**- 
SYS*.**   - 
TEMP.**   - 
*SYSUT*.**)  -  
BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) -  
LOGINDDNAME(DASD) - 
OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP - 
TOL(ENQF)   

  Thanks to all in advance.



-
Do you Yahoo!?
  Yahoo! Personals: It's free to check out our great singles!  

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-23 Thread O'Brien, David W. (NIH/CIT) [C]
Try BY(CREDT,LT,*,-1) (DSORG,NE,VSAM)) -  there is an example in the
manual.

-Original Message-
From: John Dawes [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, May 23, 2006 1:32 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: ADR120E - DFDSS Error

I am attempting to back up some files using DFDSS.  I receve the error
ADR120E because of  TOO MANY POSITIONAL PARAMETERS AFTER '-1' 
Can you suggest a correction.  What I am attempting to do is backup
files from certain volumes.  However, I want only to backup files that
are less than 1 day old and must NOT be VSAM.  Below is a copy of my
control cards.
   
  DUMP  DATASET(INCLUDE(IST*.**-  
MED*.**   - 
X*.** - 
Y*.** - 
Z*.** - 
SRT.**- 
SYS*.**   - 
TEMP.**   - 
*SYSUT*.**)  -  
BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) -  
LOGINDDNAME(DASD) - 
OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP - 
TOL(ENQF)   

  Thanks to all in advance.



-
Do you Yahoo!?
  Yahoo! Personals: It's free to check out our great singles!  

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-23 Thread John Dawes
I tried it out and I get the syntax error:
  ADR124E (001)-RI01 (02), DELIMITER '(' IS NOT PROPERLY PRECEDED BY A CONSTANT 
OR

  I tried the command using :
   BY(CREDT,LT,*,-1) (DSORG,NE,VSAM))and 
 
  BY(CREDT,LT,*,-1) (DSORG,NE,VSAM) 

Same error on both counts.
O'Brien, David W. (NIH/CIT) [C] [EMAIL PROTECTED] wrote:
  Try BY(CREDT,LT,*,-1) (DSORG,NE,VSAM)) - there is an example in the
manual.

-Original Message-
From: John Dawes [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, May 23, 2006 1:32 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: ADR120E - DFDSS Error

I am attempting to back up some files using DFDSS. I receve the error
ADR120E because of TOO MANY POSITIONAL PARAMETERS AFTER '-1' 
Can you suggest a correction. What I am attempting to do is backup
files from certain volumes. However, I want only to backup files that
are less than 1 day old and must NOT be VSAM. Below is a copy of my
control cards.

DUMP DATASET(INCLUDE(IST*.** - 
MED*.** - 
X*.** - 
Y*.** - 
Z*.** - 
SRT.** - 
SYS*.** - 
TEMP.** - 
*SYSUT*.**) - 
BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) - 
LOGINDDNAME(DASD) - 
OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP - 
TOL(ENQF) 

Thanks to all in advance.



-
Do you Yahoo!?
Yahoo! Personals: It's free to check out our great singles! 

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html



-
On Yahoo!7 
  Answers: Real people ask and answer questions on any topic. 

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-23 Thread O'Brien, David W. (NIH/CIT) [C]
My mistake, should have cut and pasted before. Example follows:

 If you code,
 
   BY((ALLOC EQ CYL) (CATLG EQ YES)) 
 
 you receive all cataloged data sets with cylinder allocation.

You have uneven parenthesis causing your error in the first case. By not
having the second ( at the beginning of the second case, DSS doesn't
expect the second conditional argument to be present.   

-Original Message-
From: John Dawes [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, May 23, 2006 1:44 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ADR120E - DFDSS Error

I tried it out and I get the syntax error:
  ADR124E (001)-RI01 (02), DELIMITER '(' IS NOT PROPERLY PRECEDED BY A
CONSTANT OR

  I tried the command using :
   BY(CREDT,LT,*,-1) (DSORG,NE,VSAM))and 
 
  BY(CREDT,LT,*,-1) (DSORG,NE,VSAM) 

Same error on both counts.
O'Brien, David W. (NIH/CIT) [C] [EMAIL PROTECTED] wrote:
  Try BY(CREDT,LT,*,-1) (DSORG,NE,VSAM)) - there is an example in the
manual.

-Original Message-
From: John Dawes [mailto:[EMAIL PROTECTED]
Sent: Tuesday, May 23, 2006 1:32 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: ADR120E - DFDSS Error

I am attempting to back up some files using DFDSS. I receve the error
ADR120E because of TOO MANY POSITIONAL PARAMETERS AFTER '-1' 
Can you suggest a correction. What I am attempting to do is backup files
from certain volumes. However, I want only to backup files that are less
than 1 day old and must NOT be VSAM. Below is a copy of my control
cards.

DUMP DATASET(INCLUDE(IST*.** -
MED*.** -
X*.** -
Y*.** -
Z*.** -
SRT.** -
SYS*.** -
TEMP.** -
*SYSUT*.**) -
BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) -
LOGINDDNAME(DASD) -
OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP -
TOL(ENQF) 

Thanks to all in advance.



-
Do you Yahoo!?
Yahoo! Personals: It's free to check out our great singles! 

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html



-
On Yahoo!7
  Answers: Real people ask and answer questions on any topic. 

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-23 Thread Pommier, Rex R.
Try BY((CREDT,LT,(*,-1)),(DSORG,NE,(VSAM))) -

Rex

-Original Message-
From: IBM Mainframe Discussion List [mailto:[EMAIL PROTECTED] On
Behalf Of John Dawes
Sent: Tuesday, May 23, 2006 12:44 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: Re: ADR120E - DFDSS Error


I tried it out and I get the syntax error:
  ADR124E (001)-RI01 (02), DELIMITER '(' IS NOT PROPERLY PRECEDED BY A
CONSTANT OR

  I tried the command using :
   BY(CREDT,LT,*,-1) (DSORG,NE,VSAM))and 
 
  BY(CREDT,LT,*,-1) (DSORG,NE,VSAM) 

Same error on both counts.
O'Brien, David W. (NIH/CIT) [C] [EMAIL PROTECTED] wrote:
  Try BY(CREDT,LT,*,-1) (DSORG,NE,VSAM)) - there is an example in the
manual.

-Original Message-
From: John Dawes [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, May 23, 2006 1:32 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: ADR120E - DFDSS Error

I am attempting to back up some files using DFDSS. I receve the error
ADR120E because of TOO MANY POSITIONAL PARAMETERS AFTER '-1' 
Can you suggest a correction. What I am attempting to do is backup files
from certain volumes. However, I want only to backup files that are less
than 1 day old and must NOT be VSAM. Below is a copy of my control
cards.

DUMP DATASET(INCLUDE(IST*.** - 
MED*.** - 
X*.** - 
Y*.** - 
Z*.** - 
SRT.** - 
SYS*.** - 
TEMP.** - 
*SYSUT*.**) - 
BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) - 
LOGINDDNAME(DASD) - 
OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP - 
TOL(ENQF) 

Thanks to all in advance.



-
Do you Yahoo!?
Yahoo! Personals: It's free to check out our great singles! 

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html



-
On Yahoo!7 
  Answers: Real people ask and answer questions on any topic. 

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html


Re: ADR120E - DFDSS Error

2006-05-23 Thread O'Brien, David W. (NIH/CIT) [C]
See if this example helps

 DUMP DATASET(INCLUDE(**) -
  BY((DSORG NE VSAM) - 
 (CATLG EQ NO))) - 


-Original Message-
From: John Dawes [mailto:[EMAIL PROTECTED] 
Sent: Tuesday, May 23, 2006 1:32 PM
To: IBM-MAIN@BAMA.UA.EDU
Subject: ADR120E - DFDSS Error

I am attempting to back up some files using DFDSS.  I receve the error
ADR120E because of  TOO MANY POSITIONAL PARAMETERS AFTER '-1' 
Can you suggest a correction.  What I am attempting to do is backup
files from certain volumes.  However, I want only to backup files that
are less than 1 day old and must NOT be VSAM.  Below is a copy of my
control cards.
   
  DUMP  DATASET(INCLUDE(IST*.**-  
MED*.**   - 
X*.** - 
Y*.** - 
Z*.** - 
SRT.**- 
SYS*.**   - 
TEMP.**   - 
*SYSUT*.**)  -  
BY(CREDT,LT,*,-1,DSORG,NE,VSAM)) -  
LOGINDDNAME(DASD) - 
OUTDD(TAPE) OPT(4) ALLDATA(*) ALLEXCP - 
TOL(ENQF)   

  Thanks to all in advance.



-
Do you Yahoo!?
  Yahoo! Personals: It's free to check out our great singles!  

--
For IBM-MAIN subscribe / signoff / archive access instructions, send
email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search
the archives at http://bama.ua.edu/archives/ibm-main.html

--
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO
Search the archives at http://bama.ua.edu/archives/ibm-main.html