Doubt in cobol declaration

This is a Mainframe COBOL forum - you can post your queries on Mainframe COBOL, VS COBOL II, COBOL/370 , Enterprise COBOL

Moderators: dbzTHEdinosauer, Moderator Group

Post Reply
nrajini
Member
Posts: 23
Joined: Sun Oct 05, 2008 4:35 pm

Doubt in cobol declaration

Post by nrajini » Fri Jul 16, 2010 10:39 am

Hi I have got an amt field in input file , say 958.92

How is that I have declare it in cobol prog to recieve it.

When I display amt it should be displayed as 958.92
Regards,
Rajini

User avatar
Natarajan
Moderator
Posts: 537
Joined: Fri Oct 10, 2008 12:57 pm
Location: chennai
Contact:

Post by Natarajan » Fri Jul 16, 2010 10:48 am

To retrieve given value from COBOL program.. declare variable as 9(3)v99.
When you want to display the amount move that value to 9(3).99.
Natarajan
Chennai

nrajini
Member
Posts: 23
Joined: Sun Oct 05, 2008 4:35 pm

Post by nrajini » Fri Jul 16, 2010 1:45 pm

Thanks for the reply..

Amount field in input file is 593.92 in Input file

One more doubt , as that amount field in input will occupy 6 bytes and if we decalare it as s9(3)v99 it will have only 5 bytes.. so there will be a mismatch between the input file and the record layout how to over come this.
Regards,
Rajini

User avatar
dbzTHEdinosauer
Moderator
Posts: 981
Joined: Mon Oct 02, 2006 8:31 pm

Post by dbzTHEdinosauer » Fri Jul 16, 2010 2:02 pm

instead of basing on one example field,
since you have not bothered to find out from the source (generator of this file)
what is the actual record definition,
you are going to have to look at more than one record.

if indeed the contents of the record contains 958.92 (your first post) or 593.92 (your second post),

and you are only displaying the field,
define it as PIC X(06),
if you are sure that all amounts are less than 1000.00.
but then, that is why you have to look at the file..................
since you did not bother to ask/inquire the creator of the file.
Dick Brenholtz
JCL, SQL and code in programs have an irritating habit of doing what you say,
not what you meant.

Post Reply

FREE TUTORIALS

Tutorials
Free tutorials from mainframegurukul
  • JCL Tutorial
    Covers all important JCL concepts.
  • Cobol Tutorial
    This tutorials covers all Cobol Topics from STRING to COMP-3.
  • DB2 Tutorial
    DB2 Tutorial focuses on DB2 COBOL Programming.
  • SORT Tutorial
    This Tutorial covers all important aspects of DFSORT with examples
  • CICS Tutorial
    This CICS tutorial covers CICS concepts and CICS Basics, CICS COBOL Programming.
Interview
Mainframe Interview questions



Other References
Mainframe Tools and others