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
 
STRING function for COMP-3 fields

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

New User


Joined: 29 Aug 2008
Posts: 8
Location: bhubaneswar

PostPosted: Sat Aug 30, 2008 9:30 pm    Post subject: STRING function for COMP-3 fields
Reply with quote

I have three fields,and i want to apply STRING function.But the problem is one of the field is defined datatype as COMP-3. Is it possible to apply STRING function to those fields.
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: Sat Aug 30, 2008 9:49 pm    Post subject:
Reply with quote

When a sending field or any of the delimiters is an elementary numeric item, each numeric item must be described as an integer and its PICTURE character-string must not contain the symbol P.
Looks kind of like you can, but I think as a group, you will not be able to delimit on digits, only full bytes.......
Back to top
View user's profile Send private message
Craq Giegerich

Senior Member


Joined: 19 May 2007
Posts: 1512
Location: Virginia, USA

PostPosted: Sat Aug 30, 2008 10:13 pm    Post subject:
Reply with quote

CICS Guy wrote:
each numeric item must be described as an integer and its PICTURE character-string must not contain the symbol P.


??
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: Sat Aug 30, 2008 10:28 pm    Post subject:
Reply with quote

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/handheld/Connected/BOOKS/igy3lr10/6.2.37?

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/handheld/Connected/BOOKS/igy3lr10/5.3.11.1?
Back to top
View user's profile Send private message
NB Gautam

New User


Joined: 29 Aug 2008
Posts: 8
Location: bhubaneswar

PostPosted: Thu Sep 04, 2008 4:37 pm    Post subject:
Reply with quote

The exact situation is like
There are 3 variables defined as:

77 ws-var1 pic 9(3).
77 ws-var2 pic s9(11) COMP-3.
77 ws-var3 pic x(12).

procedure division.

Move 23 to ws-var1.
Move 34 to ws-var2.
Move 'GAUTAM' to ws-var3.

Now i want to implement STRING function. Is it possible? If yes, please provide me syntax for that.
Back to top
View user's profile Send private message
Robert Sample

Global Moderator


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

PostPosted: Thu Sep 04, 2008 5:22 pm    Post subject:
Reply with quote

Have you tried to do the STRING yourself, using the manual as a guide? If not, please do so and then report any problem(s) you encounter.
Back to top
View user's profile Send private message
mmwife

Super Moderator


Joined: 30 May 2003
Posts: 1592

PostPosted: Fri Sep 05, 2008 9:14 pm    Post subject:
Reply with quote

What do you want the result of the STRING to look like?
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 line 52: Name or string > 250 char... Ashishpanpaliya CLIST & REXX 5 Sat Oct 14, 2017 2:29 am
No new posts Subtract the ZD fields to provide neg... Balaryan DFSORT/ICETOOL 4 Wed Oct 11, 2017 10:51 pm
No new posts Addition of two records on 2 fields amar143 SYNCSORT 8 Tue Oct 03, 2017 11:14 am
No new posts Search for a string in many PDS KARTHIGADEVI CLIST & REXX 5 Fri Sep 08, 2017 2:32 pm
No new posts How to change a string containing the... chong.zhou TSO/ISPF 6 Tue Aug 29, 2017 4:54 pm

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