How does Declare Table work?

Sivagurunathan Jagadeesan · New User Joined: 06 Mar 2007 Posts: 32 Location: India

Hi,

I have a COBOL/DB2 code, which has a declare statement as given below,

EXEC SQL
DECLARE AAA_BBB_CCC TABLE
(
Field names with their data types are defined.......
)
END-EXEC.

A cursor is defined on the table that is declared above,from which data is fetched and written to output files.
Nowhere in the code, data is inserted into this temp table, which can latter be retrieved using the cursor.

Please let me know how(usually) delcared tables are populated with data.

Thanks,
Siva

Aaru · Posted: Thu Sep 11, 2008 4:24 pm

Siva,

dbzTHEdinosauer · Posted: Thu Sep 11, 2008 4:40 pm

The Declaration statement is not for a temp table.

revel · Posted: Thu Sep 11, 2008 5:01 pm

Hello,

Aaru · Posted: Thu Sep 11, 2008 5:20 pm

Revel,

revel · Posted: Thu Sep 11, 2008 5:24 pm

Aaru,

Thats what he said, He mistyped the code

Please check his above post

here is his post

Sivagurunathan Jagadeesan · New User Joined: 06 Mar 2007 Posts: 32 Location: India

Thanks for the responses…

dbz, if this not a table(even a temp), then what else can it be, where a cursor is declared on it and data is fetched. Excuse me if the question is absurd.

The cursor is declared in the conventional way, similar to that of a normal DB2 table as following,
EXEC SQL
DECLARE CURSOR1 CURSOR FOR
SELECT
AAA_BBB_CCC.Field1
AAA_BBB_CCC.Field2
AAA_BBB_CCC.Field3
AAA_BBB_CCC.Field4
FROM
AAA_BBB_CCC AAA_BBB_CCC --> this is not a typo, but how it is actually coded ie. the name is coded twice.

If AAA_BBB_CCC is queried in SPUFI, I get a SQL -204(undefined name).

The declare statement on AAA_BBB_CCC which I had given in my first post is same as how it is coded, there is no typo in it, I didn’t really understand what Revel is talking about.

Aaru, I understand that a cursor is Opened/Fetched/Closed, but I am wondering where from the data is coming, since I am not able to retrieve records from AAA_BBB_CCC in SPUFI using a Select query.

Thanks,
Siva

revel · Posted: Fri Sep 12, 2008 4:50 pm

Hello Siva,

tell me first, What is your requirement. I hope this is not a home work question... :o)

What did you explained in previous post...then??

Bharath Bhat · Posted: Fri Sep 12, 2008 5:28 pm

Hi,

The declare table statement you are referring to is very much ismiliar to a DCLGEN. Do you have equivalent cobol variables declared right after the END-EXEC? If your answer is Yes, Then it is a DCLGEN and it reprenents a physical table in your Cobol program. The cursor which you are referring to is declared on the real table.

IF the name is coded twice, then try the same name in SPUFI.

Sivagurunathan Jagadeesan · New User Joined: 06 Mar 2007 Posts: 32 Location: India

Hi,

I am working on converting VSCOBOLII/OS390 modules to eCOBOL standard. We do a regression testing of the output files (files produced by executing test jobs against Prod and changed code).

When the output files are empty, we will manipulate the DB so that we get some records in the output. For one such module the files were empty and I couldn’t locate the table to manipulate the data and hence the question.

Bharath, as you said I have COBOL variables declared which is similar in structure to the declaration of AAA_BBB_CCC, but I am not able to query the table AAA_BBB_CCC(I get a SQL -204).

Thanks,
Siva

Sivagurunathan Jagadeesan · New User Joined: 06 Mar 2007 Posts: 32 Location: India

Hi,

I got the table name by querying SYSIBM.SYSTABLES, I gave a wrong qualifier while querying the table, thats why I was getting a -204.

Thanks for the help.

Regards,
Siva