Portal | Manuals | References | Downloads | Info | Programs | JCLs | Mainframe wiki | Quick Ref

Author Message
nikyojin

New User

Joined: 05 Oct 2005
Posts: 94

Posted: Wed Dec 14, 2005 10:28 am    Post subject: Packed Decimal Variable Declaration in Easytrieve

Hi,

Variable declared in the pgm is
W-COUNT-4A W 10 P 0
I am retrieving a
 Quote: Numeric
value into this variable from the database in the Program.
The problem is when I am Moving the value in W-COUNT-4A to another numeric variable I observed a comma is getting moved along.
Eg ...If the value of W-COUNT-4A is 10555.
the value getting moved is 10,555.which is resulting in an abend whle used for addition purpose.
But the same problem can be avoided thru assigning the values
like ..VarB := W-COUNT-4A.
Pls inform me why this difference is arising.

Thanks,
Nikhil .S.

jon_s_rice

Active User

Joined: 24 Mar 2005
Posts: 102
Location: Douglasville, GA USA

 Posted: Wed Dec 14, 2005 5:51 pm    Post subject: When moving numeric data in Easytrieve use an assign insttead of a move example: W-COUNT-4B = W-COUNT-4A
nikyojin

New User

Joined: 05 Oct 2005
Posts: 94

 Posted: Fri Dec 16, 2005 3:02 pm    Post subject: Re: Packed Decimal Variable Declaration in Easytrieve Thanks jon_s_rice I know yhis is how we tacle the problem.But why is this problem taking place while moving...
jon_s_rice

Active User

Joined: 24 Mar 2005
Posts: 102
Location: Douglasville, GA USA

 Posted: Fri Dec 16, 2005 4:59 pm    Post subject: A move i easytrieve is a straight move without conversion. I had not encountered this particular probplem since I do an assign in this situation.
 All times are GMT + 6 Hours
 Page 1 of 1

Search our Forum:

 Topic Author Forum Replies Posted Similar Topics How to group and sum the decimal value sakrat DFSORT/ICETOOL 2 Tue Mar 06, 2018 9:13 pm COBOL declaration for table Poha Eater DB2 2 Mon Feb 26, 2018 6:58 pm Easytrieve with SQL Jan Olav Pedersen CA Products 1 Tue Jan 23, 2018 7:29 pm Moving a COMP-3 Variable to a Numeric... ajayachander COBOL Programming 2 Thu Dec 14, 2017 5:46 pm Move from Comp3 variable to Edited Va... Revathy.nair0485 COBOL Programming 7 Fri Nov 03, 2017 3:30 pm

 © 2003-2017 IBM MAINFRAME Software Support Division
 Job Vacancies | Forum Rules | Bookmarks | Subscriptions | FAQ | Polls | Contact Us