IBM Mainframe Forum

Hi,
Please help me solve my problem.
This is my code and as shown, I want to fetch the balance corresponding to a particular id and update it.


The problem is that my h1-bal is declared in dclgen as follows


Now, when I try to access the value fetched from the table, it is shown as .........

What should i do?

read the db2 manuals about the correspondence between the DB2/SQL data types and the corresponding COBOL types

Actually i tired doing that by declaring the host variable as s9(2)v9(2) usage comp-3. But still it displays '......'

pearl wrote:Now, when I try to access the value fetched from the table, it is shown as .........

What should i do?

1. Give us the definition of the column.
2. Display the data in hexadecimal; post this enclosed in Code tags.

Akatsukami wrote:

pearl wrote:Now, when I try to access the value fetched from the table, it is shown as .........

What should i do?

1. Give us the definition of the column.
2. Display the data in hexadecimal; post this enclosed in Code tags.

In table, column drefined as

In dclgen


I want to get the actual value from the table and do calculations on it. But, since its comp-3 the value taken is '.........'
How do I get the value from the table into a host variable using a select query.?

pearl wrote:

Akatsukami wrote:

pearl wrote:Now, when I try to access the value fetched from the table, it is shown as .........

What should i do?

1. Give us the definition of the column.
2. Display the data in hexadecimal; post this enclosed in Code tags.

In table, column drefined as

Select all

balance decimal(4,2) not null

In dclgen

Select all

h1-balance  pic s9(2)v9(2) usage is comp-3

I want to get the actual value from the table and do calculations on it. But, since its comp-3 the value taken is '.........'
How do I get the value from the table into a host variable using a select query.?

Pearl-chan, you're worse than my cat when it comes to following instructions. I asked you to display the data in hexadecimal and post that here in Code tags. I will now tell you that solving your problem requires it.

Nothing to do with CICS but all to do with DB2 and whatever language you are using. Moved to DB2 rather than being deleted.

Hello,

If you want to be able to "see" the value, you need to show it in HEX or DISPLAY it individually in the code