Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Table processing using easytrieve

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> CA Products
View previous topic :: :: View next topic  
Author Message
nishmija

New User


Joined: 09 Nov 2006
Posts: 2

PostPosted: Mon Jun 30, 2008 4:06 pm    Post subject: Table processing using easytrieve
Reply with quote

Hi everbody,

I have a query regarding table processing using easytrieve.. The DB2 table has the field DECIMAL(7, 2). This translates in cobol as S9(5)V9(2) USAGE COMP-3. This amount field may hold negative values also. Say the amout field is -313.00 . I want to convert this into packed decimal.
I tried the syntax below.

FILE FILEIN
FILEIN-COL17 253 08 N
*
FILE FILEOUT
FILEOUT-COL17 101 04 -P 2
*
JOB INPUT(FILEIN)
FILEOUT-COL17 = FILEIN-COL17
PUT FILEOUT
*

Can you give me suggestions regarding this..

Regards,
Nishmija
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: Mon Jun 30, 2008 9:24 pm    Post subject:
Reply with quote

Hello Nishmija and welcome to the forums,

Quote:
I tried the syntax below.
Ok. What happened?

When posting a question, you need to post what happened when you tried. Did the job abend or give undesired results? Was some diagnostic message presented? Etc. . .
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 -> CA Products All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Loading data to table gives wrong for... Raghu navaikulam DB2 19 Thu Jul 13, 2017 2:11 pm
No new posts UNIT=AFF for Easytrieve code gandikk JCL & VSAM 7 Wed Jul 12, 2017 11:42 pm
No new posts processing a XML file in PL/1 grvtomar PL/I & Assembler 2 Fri Jun 09, 2017 1:07 pm
No new posts READ A PACKED "NEGATIVE" FI... jdesouza CA Products 3 Tue May 02, 2017 11:43 pm
No new posts File processing vishwakotin Mainframe Interview Questions 14 Fri Apr 28, 2017 11:38 am


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us