Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Profile Log in to check your private messages Log in
 
Execessive parameter issue

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Sumeendar

New User


Joined: 31 Jan 2006
Posts: 39

PostPosted: Mon Dec 19, 2016 4:35 pm    Post subject: Execessive parameter issue
Reply with quote

I am getting following error message for line number 5

Code:
5 IEFC640I EXCESSIVE NUMBER OF POSITIONAL PARAMETERS IN THE VALUE FIELD


My objective is to get paramters values and using GENCARD utility program write these values to a ps file.

can any one throw the light on what could be the reason for the above error

JCL Snippet is below

Code:
3 // SET UID='I90113',                                                       
  //     RTERR=Y,                            USE REPORTED TERRITORY           
  //     TBLC=Y,                            TERR BASE LOSS COST CALL         
  //     PCF=Y,                             PRIMARY CLASS FACTOR CALL         
  //     SCF=Y,                             SEC CLASS FACTOR CALL             
  //     DAMF=Y,                            DISCOUNT ADD/MULT CALL           
  //     ST=01,                             ALABAMA                           
  //     TOB=V,                             TYPE OF BUSINESS                 
  //     REVNUM=0037,                       REVIEW NUMBER                     
  //     MOD=01,                            MODULE NUMBER                     
  //     RVWTYP='S',                        REVIEW TYPE                       
  //     INCSEL='NPYY',                     INCLUSION SELECTION FLAGS         
  //     SCAM='B'                                                             
4 //S1 EXEC TESTPROC                                                         
5 XXTESTPROC PROC TESTPROC,                                                   
  XX      ARG1=&RTERR.&TBLC.&PCF.&SCF.&DAMF.,                                 
  XX      ARG2=&ST.&TOB.&REVNUM.&MOD.&RVWTYP.&INCSEL.&SCAM.                   
  XX*******************************************************************       
  XX* SGEN - GENERATE ARGUMENT VALUES                                 *       
  XX*******************************************************************       
  IEFC653I SUBSTITUTION JCL - TESTPROC,ARG1=YYYYY,ARG2=01V003701SNPYYB       
6 XX SET PARM3=&ARG1.&ARG2                                                   
  IEFC653I SUBSTITUTION JCL - PARM3=YYYYY01V003701SNPYYB                     
7 XXSGEN     EXEC PGM=GENCARD,                                               
  XX  PARM=('D=*',,,'&PARM3')                                                 
  IEFC653I SUBSTITUTION JCL - PGM=GENCARD,PARM=('D=*',,,'YYYYY01V003701SNPYYB'
8 //SGEN.PASSME DD SYSOUT=*                                                   
  X/PASSME    DD DSN=&&PARMPASS,                                             
  X/           DISP=(NEW,PASS,DELETE),                                       
  X/           DCB=(LRECL=80,BLKSIZE=800,RECFM=FB),                           
  X/           UNIT=SYSDA,SPACE=(TRK,(1,1),RLSE)                             
9 XX                       
Back to top
View user's profile Send private message

Akatsukami

Global Moderator


Joined: 03 Oct 2009
Posts: 1775
Location: Bloomington, IL

PostPosted: Mon Dec 19, 2016 6:24 pm    Post subject:
Reply with quote

You seem to be defining TESTPROC recursively.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1868
Location: UK

PostPosted: Mon Dec 19, 2016 7:29 pm    Post subject:
Reply with quote

No - that is a straight cut'n'paste from SDSF. I get the same result. Looking into it.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8154
Location: East Dubuque, Illinois, USA

PostPosted: Mon Dec 19, 2016 7:41 pm    Post subject:
Reply with quote

Code:
5 XXTESTPROC PROC TESTPROC,                                                   
   XX      ARG1=&RTERR.&TBLC.&PCF.&SCF.&DAMF.,                                 
   XX      ARG2=&ST.&TOB.&REVNUM.&MOD.&RVWTYP.&INCSEL.&SCAM. 
TESTPROC is defined as a positional parameter for PROC TESTPROC. Redo it as
Code:
5 XXTESTPROC PROC ARG1=&RTERR.&TBLC.&PCF.&SCF.&DAMF.,                                 
   XX      ARG2=&ST.&TOB.&REVNUM.&MOD.&RVWTYP.&INCSEL.&SCAM. 
and see if you get better results.
Back to top
View user's profile Send private message
Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1868
Location: UK

PostPosted: Mon Dec 19, 2016 7:47 pm    Post subject:
Reply with quote

Works for me
Back to top
View user's profile Send private message
Sumeendar

New User


Joined: 31 Jan 2006
Posts: 39

PostPosted: Thu Dec 22, 2016 1:53 pm    Post subject: Reply to: Execessive parameter issue
Reply with quote

Thank u. It worked now
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Regarding time parameter shanthi gude JCL & VSAM 7 Mon Sep 04, 2017 2:31 pm
No new posts Paasing symbolic parameter to instrea... Robert Sample JCL & VSAM 2 Thu Jul 27, 2017 1:22 pm
No new posts JTS parameter Shashank Chaubey JCL & VSAM 2 Thu Jul 13, 2017 4:15 pm
No new posts Include/omit with "ALL" pa... mgl DFSORT/ICETOOL 6 Wed Jun 14, 2017 2:31 pm
No new posts Issue with NDM process to transmit ES... chetanambi All Other Mainframe Topics 6 Wed May 03, 2017 10:52 am

Facebook
Back to Top
 
Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us