MVSFORUMS.com

prabhutp · Beginner Joined: 02 Feb 2005 Posts: 20 Topics: 11

Hi

I have query in my cobol,DB2 program as

Exec SQL
SET :WS-EXP-DT = CURRENT DATE + :WS-RETENTION-PD DAYS
End-Exec

I have declared the variables as

03 WS-EXP-DT PIC X(10) VALUE SPACES.
03 WS-RETENTION-PD PIC 9(04) VALUE ZEROES.

But the error message I receive in compilation is DSNH312I - Undefined or unusable Host variable WS-RETENTION-PD.

Kindly help
_________________
tp

acevedo · Posted: Mon May 30, 2005 8:59 am Post subject:

try

03 ws-retention-pd pic s9(07) comp-3 value zeroes.

hth

kolusu · Posted: Mon May 30, 2005 3:01 pm Post subject:

prabhutp,

you simply define

prabhutp · Beginner Joined: 02 Feb 2005 Posts: 20 Topics: 11

Thanks for the reply..It worked..But,can you please explain the funda behind it.I thought COMP is primarily for storage purpose.

Kindly explain
_________________
tp

kolusu · Posted: Wed Jun 01, 2005 8:42 am Post subject:

prabhutp,

Days function in DB2 returns a integer representation of a date. so you need to declare your variable to compatible to it.

Check this link for a detailed explanation of Determining compatibility of SQL and COBOL data types

http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/DSNAPH11/2.4.3.8?SHELF=&DT=20010710165542&CASE=

Hope this helps...

Cheers

kolusu
_________________
Kolusu
www.linkedin.com/in/kolusu