From:	Ulmann, Bernd	Date:	Tue Jul 10 07:14:55 2007
Subject:	DBD::DB2 installing on z/OS (USS)

Hello -
I hope the following questions have not been asked and answered before, but so far I was unable to find suitable information in the net to resolve my current problem, so I will post to this mailing list.

 About two years ago we ported a Perl interpreter to our z/OS machine (we did not manage to build a dynamically linked image and thus stayed with a statically linked one) since we wanted to write some production code using Perl on USS on z/OS. This worked quite fine and back then I compiled, linked and installed the DBD-DB2-0.70.OS390 module to allow us to access our DB2 system running on the very same host which worked flawlessly (apart from some minor necessary modifications to Makefile.aperl). 

 Now we try to switch to the IBM "supported" Perl interpreter available for z/OS. Since the interpreter comes without a DBD or DBI module we have to compile this ourselves and this is why I am asking for help here. What I did is this:

1) First of all I found out that it is necessary to supply the parameter -W0,SSCOMM to the c89 compiler to be able to compile source code containing C++-style comments.

2) Then I tried the old DBD-DB2-0.70.OS390 but it now fails compilation with the following messages:

c89 -c  -I/u/lf47168/db2_header_files -I/usr/lpp/perl/lib/site_perl/5.8.7/os390-
thread-multi/auto/DBI -2 -Wc,XPLINK -DMAXSIG=39 -DOEMVS -D_OE_SOCKETS -D_XOPEN_S
OURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC -D_SHR_ENVIRON -DPERL_EXTERNAL_GLOB -Wc
,dll -I/usr/local/include -W 0,float\(ieee\)    -DVERSION=\"0.70\" -DXS_VERSION=
\"0.70\" -c -Wc,XPLINK,dll,EXPORTALL -W0,SSCOMM "-I/usr/lpp/perl/lib/5.8.7/os390
-thread-multi/CORE"   DB2.c
ERROR CCN3025 /u/lf47168/DBD-DB2-0.70.OS390/DB2.c:139   Operand must be a modifiable lvalue.
ERROR CCN3025 /u/lf47168/DBD-DB2-0.70.OS390/DB2.c:168   Operand must be a modifiable lvalue.
CCN0793(I) Compilation failed for file ./DB2.c.  Object file not created.
FSUM3065 The COMPILE step ended with return code 12.
FSUM3017 Could not compile DB2.c. Correct the errors and try again.

3) Then I thought about using a more modern DBD::DB2 module (after realizing that DBD-DB2-0.70.OS390 is not very recent) and tried to compile DBD-DB2-1.1 which at least does not exhibit the problem stated above. Now I have the problem that the compiler misses SQLENV.H (I copied all of the other headerfiles from our ...SDSNV.H dataset to a subdirectory in my USS environment and created an environment variable DB2_HOME pointing to this, but there just is no SQLENV.H in this dataset):

c89 -c  -I"/u/lf47168/db2_header_files/include" -I"/usr/lpp/perl/lib/site_perl/5.8.7/os390-thread-multi/auto/DBI"  -2 -Wc,XPLINK -DM
AXSIG=39 -DOEMVS -D_OE_SOCKETS -D_XOPEN_SOURCE_EXTENDED -D_ALL_SOURCE -DYYDYNAMIC -D_SHR_ENVIRON -DPERL_EXTERNAL_GLOB -Wc,dll -I/usr
/local/include -W 0,float\(ieee\)    -DVERSION=\"1.1\" -DXS_VERSION=\"1.1\" -c -Wc,XPLINK,dll,EXPORTALL -W0,SSCOMM "-I/usr/lpp/perl/
lib/5.8.7/os390-thread-multi/CORE"  -DDB2_CACHE_FIX  dbdimp.c
WARNING CCN3296 /u/lf47168/DBD-DB2-1.1/dbdimp.c:10    #include file "sqlenv.h" not found.
ERROR CCN3285 /u/lf47168/DBD-DB2-1.1/dbdimp.c:298   The indirection operator cannot be applied to a pointer to an incomplete struct 
or union.
ERROR CCN3195 /u/lf47168/DBD-DB2-1.1/dbdimp.c:298   Integral constant expression with a value greater than zero is required.
ERROR CCN3045 /u/lf47168/DBD-DB2-1.1/dbdimp.c:307   Undeclared identifier SQLE_RC_NODBDIR.
ERROR CCN3045 /u/lf47168/DBD-DB2-1.1/dbdimp.c:308   Undeclared identifier SQLE_RC_NODENTRY.
ERROR CCN3285 /u/lf47168/DBD-DB2-1.1/dbdimp.c:331   The indirection operator cannot be applied to a pointer to an incomplete struct 
or union.

 I assume the errors following the message about the missing header file to be dependend errors. In the internet I found a SQLCLI1.H containing most if not all of the missing constants used in dbdimp.c, but this SQLCLI1.H has a copyright line stating that it is from 1996 and 2004 while the one on our installation (running DB2 V8) states being from 1992, 1996.

 Now to my actual questions:

1) Am I right trying to install DBD::DB2 on our z/OS system to access our DB2 database running on the same machine or should I stay with the old DBD-DB2-0.70.OS390?

2) If the former is true, where can I find the proper include files? Our admins claim that what I see is all they got, so I am stuck here. Do I need the SQLENV.H or is a recent SQLCLI1.H sufficient?

3) If the latter is true, what can I do to solve the compilation problem of DB2.c of the DBD-DB2-0.70.OS390 module?

 Thank you very much for your help and please excuse me if some (or all) of the above questions are stupid - enlighten me (I have not much mainframe experience - indeed, z/OS and the USS seem quite alien to me being an OpenVMS addict :-) ).
 All the best - 

  Bernd.


______________________________________________________________
Bernd Ulmann, Abt. 2-350 (Handelssysteme)
bernd.ulmann@lrp.de
Tel. 06131 / 13 - 3839
Landesbank Rheinland Pfalz (ein Unternehmen der LBBW-Gruppe) 
-- 
LRP Landesbank Rheinland-Pfalz
Vorsitzender des Verwaltungsrates: Dr. Siegfried Jaschinski
Vorsitzender der Trägerversammlung: Präsident Peter Schneider 
Vorstand: Dr. Friedhelm Plogmann (Vors.), Daniel F. Juncker, Hans-Joachim Strüder, Hubert Sühr 
Rechtsform: Anstalt des öffentlichen Rechts
Amtsgericht Mainz HRA 3557
USt-Id-Nr.: DE 149 065 433 
Der Inhalt dieser E-Mail ist vertraulich. Falls Sie nicht der angegebene Empfänger sind oder falls diese E-Mail irrtümlich an Sie adressiert wurde, verständigen Sie bitte den Absender sofort und löschen Sie die E-Mail sodann. Das unerlaubte Kopieren sowie die unbefugte Übermittlung sind nicht gestattet. Die Sicherheit von Übermittlungen per E-Mail kann nicht garantiert werden. Falls Sie eine Bestätigung wünschen, fordern Sie bitte den Inhalt der E-Mail als Hardcopy an. 

Chairman of the Supervisory Board: Dr. Siegfried Jaschinski
Chairman of the Owners' Meeting: President Peter Schneider 
Managing Board: Dr. Friedhelm Plogmann (Chairman), Daniel F. Juncker, Hans-Joachim Strüder, Hubert Sühr 
Legal form: Institution under Public Law
Amtsgericht Mainz HRA 3557
VAT identification number: DE 149 065 433 
The contents of this e-mail are confidential. If you are not the named addressee or if this transmission has been addressed to you in error, please notify the sender immediately and then delete this e-mail. Any unauthorized copying and transmission is forbidden. E-mail transmission cannot be guaranteed to be secure. If verification is required, please request a hard copy version.