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
 
INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER 2.

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics
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    Post subject: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER 2.
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 - https://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: 8405
Location: Dubuque, Iowa, USA

PostPosted: Fri Apr 27, 2018 6:33 pm    Post subject: Re: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER
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    Post subject: Re: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER
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    Post subject: Re: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER
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

Senior Member


Joined: 14 Mar 2007
Posts: 10535
Location: italy

PostPosted: Fri Apr 27, 2018 8:03 pm    Post subject: Re: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER
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    Post subject: Re: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER
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

Active User


Joined: 29 Apr 2008
Posts: 379
Location: Maryland

PostPosted: Fri Apr 27, 2018 11:52 pm    Post subject: Re: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER
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    Post subject: Re: INVALID RECFM FOR DDNAME SYSLIN AND CONCATENATION NUMBER
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    IBMMAINFRAMES.com Support Forums -> All Other Mainframe Topics All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts How to count the number of times key ... vnktrrd DFSORT/ICETOOL 7 Thu Nov 15, 2018 9:19 pm
No new posts Accessing control blocks to retrieve ... menonkiran COBOL Programming 4 Wed Nov 14, 2018 9:08 pm
No new posts Get line number where cursor is from ... satish.ms10 CLIST & REXX 3 Wed Oct 24, 2018 12:23 am
No new posts Number of Packages required for stati... manojthokala7 DB2 4 Mon Sep 17, 2018 7:14 pm
No new posts Add Comma to each record until find t... naveensrimf DFSORT/ICETOOL 6 Sat Jul 28, 2018 12:25 am

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