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

Data type conversion from FOCUS to COBOL


IBM Mainframe Forums -> COBOL Programming
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
Rajen

New User


Joined: 05 May 2005
Posts: 61

PostPosted: Sat Mar 03, 2007 9:26 pm
Reply with quote

Hi,
I searched for Focus Data type conversion in the forum but couldnot find anything useful.

I have a fields with Cobol declaration as S9(9) COMP-3 and repective FOCUS declaration as P11.0 .

While running to Focus job is there any way to convert this COMP-3 fields to display format.

Please let me know if the requirement is not clear.
Back to top
View user's profile Send private message
dick scherrer

Moderator Emeritus


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

PostPosted: Sun Mar 04, 2007 8:07 am
Reply with quote

Hello,

You should be able to move it to a Zoned Decimal field.
Back to top
View user's profile Send private message
h.dinesh

New User


Joined: 06 Dec 2006
Posts: 46
Location: Chennai

PostPosted: Wed Mar 07, 2007 11:48 am
Reply with quote

Rajen,

If you are trying to print in a Lotus file then there is no need to convert it. You may use:

Code:
ON TABLE SAVE AS <SAVE FILE NAME> FORMAT LOTUS


And if it is a PS then you can convert into alphanumeric and print

Code:
NEW_VAR /A6 = PCKOUT(OLD_VAR,6,NEW_VAR);


Dinesh
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 -> COBOL Programming

 


Similar Topics
Topic Forum Replies
No new posts Store the data for fixed length COBOL Programming 1
No new posts Replace each space in cobol string wi... COBOL Programming 3
No new posts COBOL -Linkage Section-Case Sensitive COBOL Programming 1
No new posts COBOL ZOS Web Enablement Toolkit HTTP... COBOL Programming 0
No new posts Data set Rec-Cnt and Byte-Cnt Testing & Performance 2
Search our Forums:

Back to Top