MVSFORUMS.com

cobcurious · Beginner Joined: 04 Oct 2003 Posts: 68 Topics: 25

Hi,

I am receiving an input file with a decimal point (example: -1.1) . I am reading this file in my COBOL program. The field into which the data,received with decimal point, is being stored is declared as numeric with implicit decimal point (say field1 PIC S9V9 COMP) and other there is other field declared as (say field2 PIC S99V9 COMP-3) into which another decimal number,from the input file, is being tried to store. Can someone please let me know how can I convert the decimal numbers into implicit decimal numbers ?

I have searched the forum, I can across something called SFF and UFF. I am not clear how to apply it.

Your help is appreciated.
Thanks
Cobcurious

kolusu · Posted: Tue May 01, 2007 12:44 pm Post subject:

cobcurious,

you can use sff format to convert the values

Frank Yaeger · Posted: Tue May 01, 2007 2:50 pm Post subject:

For complete details on DFSORT's UFF and SFF formats, see my paper at:

www.ibm.com/servers/storage/support/software/sort/mvs/pdug/
_________________
Frank Yaeger - DFSORT Development Team (IBM)
Specialties: JOINKEYS, FINDREP, WHEN=GROUP, ICETOOL, Symbols, Migration
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

Nic Clouston · Posted: Wed May 02, 2007 3:24 am Post subject:

Or read the data into a DISPLAY field then move to your COMP field as per the COBOL Programmers Guide section 3.3.3.4 from the manuals link above.
_________________
Utility and Program control cards are NOT, repeat NOT, JCL.

cobcurious · Beginner Joined: 04 Oct 2003 Posts: 68 Topics: 25

Hi All,

Thanks everyone for the help. It worked !

Thanks
Cobcurious