Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Enterprise PL1 error - Invalid DEFINED

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> PL/I & Assembler
View previous topic :: :: View next topic  
Author Message
romuwald

New User


Joined: 23 Nov 2005
Posts: 2

PostPosted: Fri Jul 23, 2010 9:54 pm    Post subject: Enterprise PL1 error - Invalid DEFINED
Reply with quote

I am recompiling the PL1 programs in test for Enterprise PL1 upgrade. And for one of the PL1 program getting the following error message IBM1385I E Invalid DEFINED - string overlay defining attempted. The declarations where the error message is thrown out is in line numbers 37 and 44.

Code:
37.0            DCL 1 PARENT_REC_IN   DEFINED INPUT,       
38.0                  2 FILL01        CHAR(19)          , 
39.0                  2 RECTYPE       CHAR(03)          , 
40.0                  2 FILL02        CHAR(38)          , 
41.0                  2 PACKED1       FIXED(7,2)        , 
42.0                  2 FILL03        CHAR(36)          ; 
43.0                                                       
44.0            DCL 1 CHILD_REC_IN    DEFINED INPUT,       
45.0                  2 FILL01        CHAR(19)          , 
46.0                  2 RECTYPE       CHAR(03)          , 
47.0                  2 FILL02        CHAR(72)          , 
48.0                  2 PACKED1       FIXED(7,4)        , 
49.0                  2 FILL03        CHAR(19)          , 
50.0                  2 PACKED2       FIXED(5,1)        , 
51.0                  2 PACKED3       FIXED(9,2)        , 
52.0                  2 FILL04        CHAR(15)          ; 
Please advice.
Back to top
View user's profile Send private message

dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Jul 23, 2010 10:48 pm    Post subject:
Reply with quote

Hello and welcome to the forum,

You did not post the info needed. . .

Show the INPUT code.
Back to top
View user's profile Send private message
prino

Senior Member


Joined: 07 Feb 2009
Posts: 1028
Location: Oostende, Belgium

PostPosted: Sat Jul 24, 2010 12:50 am    Post subject:
Reply with quote

Using FIXED fields in a structure DEFINED on another is one of the new no-no's in Enterprise PL/I. Read about UNION and start using it.
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 -> PL/I & Assembler All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts DB2 Program abending without giving a... rahulgarg14 DB2 7 Mon May 29, 2017 8:10 pm
No new posts Getting error while opening a variabl... apandey1 COBOL Programming 5 Fri May 05, 2017 12:22 pm
No new posts IDC2902I Error tzeche ABENDS & Debugging 2 Tue Mar 28, 2017 11:39 am
No new posts Need help with below DB2 error ashek15 DB2 3 Sat Mar 18, 2017 5:56 am
No new posts FINDREP Syntax Error seahawk789 DFSORT/ICETOOL 4 Thu Mar 09, 2017 10:11 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us