MF COBOL/DB2 Error

[Steve Rainbird]

I am trying to compile a cobol program using the DB2 extensions to MF cobol.

I am getting the following error.

Micro Focus Server Express V4.0 revision 000 20-Jul-07 11:32 Page
1
* casc_source_dates_to_iconmetro.cbl
* Options: int("casc_source_dates_to_iconmetro.int") anim csi verbose
* reentrant nolist DB2(BIND DB=PEACH validate=bind multi-nested)
endp
* list(casc_source_dates_to_iconmetro.lst)
1 IDENTIFICATION DIVISION. Dts
ICMP
* 801-S (
0)
** External Compiler Module message
** DB0121 Package name is too long, max=8 chars, use ACCESS directive to
** fix.

I have no idea what it is talking about.

Any ideas??

TIA

--
Steve

[Simon Tobias]

Hello Steve,

( It's probably best to post such questions to the Micro Focus Forum under
http://www.cobolportal.com ).

The default package name is derived from the program name. Your program name
(casc_source_dates_to_iconmetro) exceeds the maximum package name size supported
of 8 characters. You will need to compile your application with the DB2(ACCESS=shorter_name)
directive, where "shorter_name" is 8 characters or less.

If you try to precompile your app, casc_source_dates_to_iconmetro.sqb, using
the IBM-provided embprep script (which invokes db2 prep...), and then query
the list of packages on the database, you will see that it the name has been
truncated to CASC_SOU.

Regards,
Simon.

I am trying to compile a cobol program using the DB2 extensions to MF
cobol.

I am getting the following error.

Micro Focus Server Express V4.0 revision 000 20-Jul-07 11:32
Page
1
* casc_source_dates_to_iconmetro.cbl
* Options: int("casc_source_dates_to_iconmetro.int") anim csi verbose
* reentrant nolist DB2(BIND DB=PEACH validate=bind
multi-nested)
endp
* list(casc_source_dates_to_iconmetro.lst)
1 IDENTIFICATION DIVISION.
Dts
ICMP
* 801-S
(
0)
** External Compiler Module message
** DB0121 Package name is too long, max=8 chars, use ACCESS
directive to
** fix.
I have no idea what it is talking about.

Any ideas??

TIA

[Steve Rainbird]

"Simon Tobias" <Si**********@nospam.microfocus.comwrote in message
news:da*************************@news.altohiway.co m...

Hello Steve,

( It's probably best to post such questions to the Micro Focus Forum under
http://www.cobolportal.com ).

The default package name is derived from the program name. Your program
name (casc_source_dates_to_iconmetro) exceeds the maximum package name
size supported of 8 characters. You will need to compile your application
with the DB2(ACCESS=shorter_name) directive, where "shorter_name" is 8
characters or less.

If you try to precompile your app, casc_source_dates_to_iconmetro.sqb,
using the IBM-provided embprep script (which invokes db2 prep...), and
then query the list of packages on the database, you will see that it the
name has been truncated to CASC_SOU.

Regards,
Simon.

>I am trying to compile a cobol program using the DB2 extensions to MF
cobol.

I am getting the following error.

Micro Focus Server Express V4.0 revision 000 20-Jul-07 11:32
Page
1
* casc_source_dates_to_iconmetro.cbl
* Options: int("casc_source_dates_to_iconmetro.int") anim csi verbose
* reentrant nolist DB2(BIND DB=PEACH validate=bind
multi-nested)
endp
* list(casc_source_dates_to_iconmetro.lst)
1 IDENTIFICATION DIVISION.
Dts
ICMP
* 801-S
(
0)
** External Compiler Module message
** DB0121 Package name is too long, max=8 chars, use ACCESS
directive to
** fix.
I have no idea what it is talking about.

Any ideas??

TIA

Thanks Simon.

--
Steve

[Steve Rainbird]

"Simon Tobias" <Si**********@nospam.microfocus.comwrote in message
news:da*************************@news.altohiway.co m...

Hello Steve,

( It's probably best to post such questions to the Micro Focus Forum under
http://www.cobolportal.com ).

The default package name is derived from the program name. Your program
name (casc_source_dates_to_iconmetro) exceeds the maximum package name
size supported of 8 characters. You will need to compile your application
with the DB2(ACCESS=shorter_name) directive, where "shorter_name" is 8
characters or less.

If you try to precompile your app, casc_source_dates_to_iconmetro.sqb,
using the IBM-provided embprep script (which invokes db2 prep...), and
then query the list of packages on the database, you will see that it the
name has been truncated to CASC_SOU.

Regards,
Simon.

>I am trying to compile a cobol program using the DB2 extensions to MF
cobol.

I am getting the following error.

Micro Focus Server Express V4.0 revision 000 20-Jul-07 11:32
Page
1
* casc_source_dates_to_iconmetro.cbl
* Options: int("casc_source_dates_to_iconmetro.int") anim csi verbose
* reentrant nolist DB2(BIND DB=PEACH validate=bind
multi-nested)
endp
* list(casc_source_dates_to_iconmetro.lst)
1 IDENTIFICATION DIVISION.
Dts
ICMP
* 801-S
(
0)
** External Compiler Module message
** DB0121 Package name is too long, max=8 chars, use ACCESS
directive to
** fix.
I have no idea what it is talking about.

Any ideas??

TIA

Simon,

Does it matter what I call it?

What is it used for?

If I am doing my compiling in a script can I always have it as
ACCESS==xxxxx?

TIA

--
Steve