Help | Site Map
Connecting Tech Pros Worldwide
 
 
LinkBack Thread Tools
  #1  
Old July 20th, 2007, 11:35 AM
Steve Rainbird
Guest
 
Posts: n/a
Default 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



  #2  
Old July 20th, 2007, 12:55 PM
Simon Tobias
Guest
 
Posts: n/a
Default Re: MF COBOL/DB2 Error

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.
Quote:
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
>

  #3  
Old July 20th, 2007, 01:05 PM
Steve Rainbird
Guest
 
Posts: n/a
Default Re: MF COBOL/DB2 Error

"Simon Tobias" <Simon.Tobias@nospam.microfocus.comwrote in message
news:dab96b19e4f98c998e3ef91a2c4@news.altohiway.co m...
Quote:
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.
>
Quote:
>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



  #4  
Old July 20th, 2007, 01:15 PM
Steve Rainbird
Guest
 
Posts: n/a
Default Re: MF COBOL/DB2 Error

"Simon Tobias" <Simon.Tobias@nospam.microfocus.comwrote in message
news:dab96b19e4f98c998e3ef91a2c4@news.altohiway.co m...
Quote:
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.
>
Quote:
>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



 

Bookmarks

Thread Tools

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are Off
[IMG] code is Off
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On

What is Bytes?

We are a network of experts and professionals in IT and software development that help one another with answers to tough questions and share insights. Get the best answers to your questions from over network members.
Post your question now . . .
It's fast and it's free

Popular Articles