By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
437,850 Members | 1,771 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 437,850 IT Pros & Developers. It's quick & easy.

MF COBOL/DB2 Error

P: n/a
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

Jul 20 '07 #1
Share this Question
Share on Google+
3 Replies


P: n/a
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

Jul 20 '07 #2

P: n/a
"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

Jul 20 '07 #3

P: n/a
"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

Jul 20 '07 #4

This discussion thread is closed

Replies have been disabled for this discussion.