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
 
SQL 310 - Inserting Numberic data into Packed decimal field

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

New User


Joined: 20 Jan 2006
Posts: 3
Location: Shanghai

PostPosted: Fri Jan 09, 2009 8:34 pm    Post subject: SQL 310 - Inserting Numberic data into Packed decimal field
Reply with quote

Input field:

Input File field definition:
Input-Amt Pic 9(8)v9(4).

DB2 table DCL field:
DCLIN-AMT PIC S9(5)v9(4) comp-3

When I move the input field value into DCL field I am not getting any issues. But While inserting the data into DB2 table I am getting -310 SQL error.

Kindly some one help us on this.

Thanks
Raj
Back to top
View user's profile Send private message

William Thompson

Global Moderator


Joined: 18 Nov 2006
Posts: 3158
Location: Tucson AZ

PostPosted: Fri Jan 09, 2009 8:46 pm    Post subject: Re: SQL 310 - Inserting Numberic data into Packed decimal fi
Reply with quote

Kanagaraj wrote:
When I move the input field value into DCL field I am not getting any issues.
Generally, a move from a display numeric to a comp-3 field is a simple PACK, which will only abend with an access exception....
Quote:
But While inserting the data into DB2 table I am getting -310 SQL error.
But DB2 checks further, and knows that the source field contains garbage......
Hex display the source field......
By the way, did you look up the -310 error?
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 Copy 4 byte of data from the last rec... arunsoods DFSORT/ICETOOL 9 Fri Oct 06, 2017 12:15 pm
No new posts Extend the decimal values in DIVISION Balaryan DFSORT/ICETOOL 3 Thu Oct 05, 2017 4:05 pm
No new posts sort records based on length exceeds ... maxsubrat DFSORT/ICETOOL 7 Wed Oct 04, 2017 4:48 pm
No new posts opening a dataset after reading it fr... arunsoods DFSORT/ICETOOL 5 Wed Oct 04, 2017 3:54 pm
This topic is locked: you cannot edit posts or make replies. PS file data should be passed as symb... d_sarlie JCL & VSAM 15 Tue Oct 03, 2017 5:18 am

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