467,198 Members | 1,301 Online
Bytes | Developer Community
Ask Question

Home New Posts Topics Members FAQ

Post your question to a community of 467,198 developers. It's quick & easy.

MF COBOL/DB2 Error

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
  • viewed: 3976
Share:
3 Replies
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
"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
"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.

Similar topics

7 posts views Thread by Batista, Facundo | last post: by
242 posts views Thread by James Cameron | last post: by
30 posts views Thread by Stuart Turner | last post: by
15 posts views Thread by dm1608 | last post: by
reply views Thread by cobug@cobug.com | last post: by
reply views Thread by pompeyoc | last post: by
By using this site, you agree to our Privacy Policy and Terms of Use.