IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER 2.


IBM Mainframe Forums -> All Other Mainframe Topics
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
sandeep kumar302

New User


Joined: 14 Mar 2012
Posts: 81
Location: India

PostPosted: Fri Apr 27, 2018 6:07 pm
Reply with quote

I created a basic program with name COB002 and when i try to compile the program, I get MAXCC12.

The error says -
IEW2730S D908 INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER 2.

Here, the load module , i created with recfm = 0, lrecl = 0
src program - pds, recfm = fb

so, where i am giving a wrong value.

Can anyone comment on this, please-

1. My compile JCL
Code:

//COMPJCL4 JOB 1AD40G12,'COMPCOB-COMPLINK',NOTIFY=&SYSUID       
//*************************************************************
//*COMPILAR Y LINKEDITAR                                       
//*************************************************************
//STEP0      EXEC IGYWCL,PARM.COBOL='LIB,APOST,XREF,MAP,OFFSET'
//* -----------------------------------------------------------
//COBOL.SYSLIB DD DISP=SHR,DSN=SANDY.COBOL.COPYLIB             
//*            DD DISP=SHR,DSN=SANDY.COBOL.COPYLIBB             
//COBOL.SYSIN  DD DISP=SHR,DSN=SANDY.COBOL.SRCLIB(COB002)       
//LKED.SYSLMOD DD DISP=SHR,DSN=SANDY.COBOL.LOADLIB(COB002)     
//LKED.SYSIN  DD                                               
  NAME COB002(R)                                               
/*                                                             
//                                                                                                                           


Error:
=====
Code:
IEW2730S D908 INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER 2.



IGYWCL Procedure-
============
Code:

//IGYWCL PROC  LNGPRFX='IGY410',SYSLBLK=3200,             
//             LIBPRFX='CEE',                             
//             PGMLIB='&&GOSET',GOPGM=GO                 
//*                                                       
//********************************************************
//*                                                       
//*  Enterprise COBOL for z/OS                           
//*               Version 4 Release 1 Modification 0     
//*                                                       
//*  LICENSED MATERIALS - PROPERTY OF IBM.               
//*                                                       
//*  5655-S71 © COPYRIGHT IBM CORP. 1991, 2007           
//*  ALL RIGHTS RESERVED                                 
//*                                                       
//*  US GOVERNMENT USERS RESTRICTED RIGHTS - USE,         
//*  DUPLICATION OR DISCLOSURE RESTRICTED BY GSA         
//*  ADP SCHEDULE CONTRACT WITH IBM CORP.                 
//*                                                       
//********************************************************
//*                                                                   
//*  COMPILE AND LINK EDIT A COBOL PROGRAM                           
//*                                                                   
//*  PARAMETER  DEFAULT VALUE    USAGE                               
//*   LNGPRFX   IGY.V4R1M0       PREFIX FOR LANGUAGE DATA SET NAMES   
//*   SYSLBLK   3200             BLOCKSIZE FOR OBJECT DATA SET       
//*   LIBPRFX   CEE              PREFIX FOR LIBRARY DATA SET NAMES   
//*   PGMLIB    &&GOSET          DATA SET NAME FOR LOAD MODULE       
//*   GOPGM     GO               MEMBER NAME FOR LOAD MODULE         
//*                                                                   
//*  CALLER MUST SUPPLY //COBOL.SYSIN DD ...                         
//*                                                                   
//*  CALLER MUST ALSO SUPPLY //COBOL.SYSLIB DD ... for COPY statements
//*                                                                   
//COBOL  EXEC PGM=IGYCRCTL,REGION=0M                                 
//STEPLIB  DD  DSNAME=&LNGPRFX..SIGYCOMP,                             
//             DISP=SHR                                               
//SYSPRINT DD  SYSOUT=*                                               
//SYSLIN   DD  DSNAME=&&LOADSET,UNIT=SYSALLDA,   
//             DISP=(MOD,PASS),SPACE=(TRK,(3,3)),
//             DCB=(BLKSIZE=&SYSLBLK)             
//SYSUT1   DD  UNIT=SYSALLDA,SPACE=(CYL,(1,1))   
//SYSUT2   DD  UNIT=SYSALLDA,SPACE=(CYL,(1,1))   
//SYSUT3   DD  UNIT=SYSALLDA,SPACE=(CYL,(1,1))   
//SYSUT4   DD  UNIT=SYSALLDA,SPACE=(CYL,(1,1))   
//SYSUT5   DD  UNIT=SYSALLDA,SPACE=(CYL,(1,1))   
//SYSUT6   DD  UNIT=SYSALLDA,SPACE=(CYL,(1,1))   
//SYSUT7   DD  UNIT=SYSALLDA,SPACE=(CYL,(1,1))   
//LKED   EXEC PGM=HEWL,COND=(8,LT,COBOL),REGION=0M
//SYSLIB   DD  DSNAME=&LIBPRFX..SCEELKED,         
//             DISP=SHR                           
//SYSPRINT DD  SYSOUT=*                           
//SYSLIN   DD  DSNAME=&&LOADSET,DISP=(OLD,DELETE)
//         DD  DDNAME=SYSIN                       
//SYSLMOD  DD  DSNAME=&PGMLIB(&GOPGM),           
//             SPACE=(TRK,(10,10,1)),             
//             UNIT=SYSALLDA,DISP=(MOD,PASS)   
//SYSUT1   DD  UNIT=SYSALLDA,SPACE=(TRK,(10,10))


My simple hello world program:
=========================
Code:

       IDENTIFICATION DIVISION. 
       PROGRAM-ID. COB001.       
      *SIMPLE HELLO WORLD PROGRAM
       ENVIRONMENT DIVISION.     
       DATA DIVISION.           
       PROCEDURE DIVISION.       
                                 
       MAIN-PARA.               
          DISPLAY "HELLO WORLD".
          STOP RUN.       


Can some one suggest me if they faced a similar issue? Where i am doing wrong.

I saw this link - www.ibm.com/support/knowledgecenter/en/SSLTBW_2.1.0/com.ibm.zos.v2r1.ieam800/kk2730s.htm

but still not able to figure it out.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


Joined: 06 Jun 2008
Posts: 8569
Location: Dubuque, Iowa, USA

PostPosted: Fri Apr 27, 2018 6:33 pm
Reply with quote

Quote:
Here, the load module , i created with recfm = 0, lrecl = 0
RECFM (record format) will be U, V, VB, VBS, F, FB, FBS -- I don't know how the system will interpret a value of 0 but obviously it did not like that value! And a load library should be RECFM=U.
Back to top
View user's profile Send private message
sandeep kumar302

New User


Joined: 14 Mar 2012
Posts: 81
Location: India

PostPosted: Fri Apr 27, 2018 7:29 pm
Reply with quote

Hi Robert,

Sorry, its a TYPO. I mean i created with recfm=u,lrecl=0 for load module.
Back to top
View user's profile Send private message
sandeep kumar302

New User


Joined: 14 Mar 2012
Posts: 81
Location: India

PostPosted: Fri Apr 27, 2018 7:57 pm
Reply with quote

Is there anything wrong in my compile JCL or I need to do some changes to IGYWCL Procedure.
Back to top
View user's profile Send private message
enrico-sorichetti

Superior Member


Joined: 14 Mar 2007
Posts: 10765
Location: italy

PostPosted: Fri Apr 27, 2018 8:03 pm
Reply with quote

what happened when You googled with IEW2730S ?
the explanation in the manual is pretty clear

anyway the action is to fix the dcb attributes of the dataset
Back to top
View user's profile Send private message
sandeep kumar302

New User


Joined: 14 Mar 2012
Posts: 81
Location: India

PostPosted: Fri Apr 27, 2018 8:07 pm
Reply with quote

Hi Enrico,

This is fixed now. I changed my compile JCL. The corrected compile JCL is below -

Code:

//COMPJCL6 JOB 1AD40G12,'COMPCOB-COMPLINK',NOTIFY=&SYSUID       
//*************************************************************
//*COMPILAR Y LINKEDITAR                                       
//*************************************************************
//STEP0      EXEC IGYWCL,PARM.COBOL='LIB,APOST,XREF,MAP,OFFSET'
//* -----------------------------------------------------------
//*         JCL PARA COMPILAR PGM DE COBOL (SIN DB2 Y SIN CICS)
//* -----------------------------------------------------------
//* -----------------------------------------------------------
//COBOL.SYSLIB DD DISP=SHR,DSN=SANDY.COBOL.COPYLIB             
//COBOL.SYSIN  DD DISP=SHR,DSN=SANDY.COBOL.SRCLIB(COB002)       
//LKED.SYSLMOD DD DISP=OLD,DSN=SANDY.COBOL.LOADLIB(COB002)     
/*                                                             
//                                                             
Back to top
View user's profile Send private message
sergeyken
Warnings : 2

Senior Member


Joined: 29 Apr 2008
Posts: 1009

PostPosted: Fri Apr 27, 2018 11:52 pm
Reply with quote

sandeep kumar302 wrote:

Code:

........
//LKED.SYSIN  DD                                               
  NAME COB002(R)                                               
/*                                                             


Code:

........
//LKED   EXEC PGM=HEWL,COND=(8,LT,COBOL),REGION=0M
.........
//SYSLIN   DD  DSNAME=&&LOADSET,DISP=(OLD,DELETE)
//         DD  DDNAME=SYSIN                       


The used form of this statement
//LKED.SYSIN DD
is nothing else but EMPTY DD STATEMENT, with NO PARAMETERS DEFINED. This bug is causing the error
INVALID RECFM FOR DDNAME SYSLIN CONCATENATION NUMBER 2
because within the JCL PROC this //SYSIN is concatenated under //SYSLIN, with number 2.
Back to top
View user's profile Send private message
sandeep kumar302

New User


Joined: 14 Mar 2012
Posts: 81
Location: India

PostPosted: Sat Apr 28, 2018 9:29 am
Reply with quote

Hi Sergeyken,
Yes, that's right. Thanks anyways.

Quote:

The used form of this statement
//LKED.SYSIN DD
is nothing else but EMPTY DD STATEMENT, with NO PARAMETERS DEFINED. This bug is causing the error
INVALID RECFM FOR DDNAME SYSLIN CONCATENATION NUMBER 2
because within the JCL PROC this //SYSIN is concatenated under //SYSLIN, with number 2.



and the issue is fixed.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> All Other Mainframe Topics

 


Similar Topics
Topic Forum Replies
No new posts Copying large number of datasets to m... JCL & VSAM 17
No new posts COUNT the number of duplicates DFSORT/ICETOOL 3
No new posts fetch the record number from FMNMAIN ... CLIST & REXX 10
No new posts Record count of RECFM=U tape file DFSORT/ICETOOL 17
No new posts Read a file dynamically without the d... COBOL Programming 4
Search our Forums:

Back to Top