MVSFORUMS.com

[SRI123]

Hi
In a file a variable pol-num is declared as 9(16). In DB2 table column is polno declared as decimal(16,0).

When I try to check pol-num in table with select statement I'm getting pol-num as undefined or unusual host variable.

select polno into :ws-pol-num from policy where polno = :pol-num

I declared ws-pol-num pic 9(16).

Where is data incompatibility? any help

[kolusu]

SRI123,

If the POLNO in DB2 table is defined as DECIMAL, then the COBOL equivalent of that is COMP-3. Check this link which explains the equivalent SQL and COBOL data types

Alternatively you can use DCLGEN to generate the table host variables so that you don't have worry about defining the equivalent data types.
_________________
Kolusu - DFSORT Development Team (IBM)
DFSORT is on the Web at:
www.ibm.com/storage/dfsort

www.linkedin.com/in/kolusu

[SRI123]

Thanks for reply Kolusu.

In input file field is declared as pic 9(16).

I'm moving this to host variable POLNO PIC S9(16)V USAGE COMP-3 and selecting the statement
select polno into :ws-pol-num from policy where polno = :POLNO

Now i"m getting sqlcode -206 for the table column polno

SQLCODE=-206
SQLSTATE=42703
TOKENS=POLNO
CSECT NAME=DSNXORSO
RDS CODE=-100

[haatvedt]

n DB2 the column is defined as decimal, in COBOL the host variable should be usage COMP-3.