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
 
IGYPS2060-S The sending operand ...was an invalid type

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> COBOL Programming
View previous topic :: :: View next topic  
Author Message
SVazifdar

New User


Joined: 21 Apr 2006
Posts: 14

PostPosted: Thu Apr 23, 2009 2:32 am    Post subject: IGYPS2060-S The sending operand ...was an invalid type
Reply with quote

I have compiled the sample program I found in Accessing UCB from a COBOL program and it has generated the following error. Could anyone please help.

Thanks.


Code:
 000122        01  TIOT-SEG.
 000123            05  TIO-LEN            PIC X.
 000124            05  FILLER             PIC X(03).
 000125            05  DD-NAME            PIC X(08).
 000126            05  SWA-V-ADDR         PIC X(03).
 000127            05  FILLER             PIC X(02).
 000128            05  UCB-ADDR           PIC X(03).


000322                    SET WS-UCB-POINTER          TO UCB-ADDR.


=000322==> IGYPS2060-S The sending operand "UCB-ADDR" in the "SET" statement was an invalid type. The statement was discarded.
Back to top
View user's profile Send private message

CICS Guy

Senior Member


Joined: 18 Jul 2007
Posts: 2150
Location: At my coffee table

PostPosted: Thu Apr 23, 2009 2:43 am    Post subject:
Reply with quote

identifier-6
Sending field.
Must be described as USAGE IS POINTER.
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: Thu Apr 23, 2009 3:01 am    Post subject:
Reply with quote

Hello,

You have tried to move an x(3) field to a pointer - which is not allowed.

You need to resolve this by moving x(3) to x(3) or pointer to pointer. SET won't work for the x(3) fields. . .
Back to top
View user's profile Send private message
dbzTHEdinosauer

Global Moderator


Joined: 20 Oct 2006
Posts: 6968
Location: porcelain throne

PostPosted: Thu Apr 23, 2009 3:59 am    Post subject:
Reply with quote

you need to contact qzphc5,
since he was the person offering this code.
even he said that he was having problems.
and you noticed, nobody provided assistance.

If you really want to do this, google and find something that works.
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 -> COBOL Programming All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts sending email from jcl using the mail... niloyarp JCL & VSAM 5 Tue Oct 10, 2017 12:32 pm
No new posts Setting Font Type for XMIT satish.ms10 All Other Mainframe Topics 3 Fri Sep 15, 2017 10:01 pm
No new posts Loading data to table gives wrong for... Raghu navaikulam DB2 19 Thu Jul 13, 2017 2:11 pm
No new posts NDM syntax checking without actually ... GAPX1 All Other Mainframe Topics 0 Wed Jun 07, 2017 2:36 am
No new posts SORT JSON type of data maxsubrat DFSORT/ICETOOL 8 Wed Apr 19, 2017 6:01 pm

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