tiny-cobol-users

RE: [Tiny-cobol-users] SPACES keyword

[<bko...@ma...>]

If WA-MAXIMUM-MODEL-YEAR-FROM-USER is PIC 9, it will never be equal to
SPACES.  SPACES is an alphanumeric literal, whereas PIC 9 data is only
numeric.  In other words, you can compare PIC X and PIC A data to SPACES,
but never PIC 9.

-----Original Message-----
From: Jason Dravet [mailto:dr...@ca...]
Sent: Tuesday, June 18, 2002 5:08 PM
To: tin...@li...
Subject: [Tiny-cobol-users] SPACES keyword

I have the following piece of code

PERFORM GET-MAXIMUM-MODEL-YEAR
UNTIL ((WA-MAXIMUM-MODEL-YEAR-FROM-USER <= WA-YEAR) AND
       (WA-MAXIMUM-MODEL-YEAR-FROM-USER > 00)) OR
       (WA-MAXIMUM-MODEL-YEAR-FROM-USER = SPACES).

The program compiles and runs, but the program will continue past this
point.  When the program runs it prompts for a model-year.  The program
should move to the next question if I just press enter to the question,
but the program is not reading the SPACES keyword right.  I put in 2
spaces and press enter but it didn't work either.

Jason


----------------------------------------------------------------------------
                   Bringing you mounds of caffeinated joy
                   >>>     http://thinkgeek.com/sf    <<<

_______________________________________________
Tin...@li...
https://lists.sourceforge.net/lists/listinfo/tiny-cobol-users

[Tiny-cobol-users] SPACES keyword

[Jason D. <dra...@ho...>]

I am using a picture of PIC 99.

Jason

[Tiny-cobol-users] SPACES Keyword

[Jason D. <dr...@ca...>]

The picture I am using is PIC 99.

Jason Dravet

Re: [Tiny-cobol-users] Tinycobol + TCGUI

[Rildo P. <ri...@pr...>]

Hi Vinicio,

On Thu, 20 Jun 2002, Vinicio Bellsouth wrote:

> This is for Rildo:

It's for me, mamma! :)
I suspect your family name is not Bellsouth... And that you're
brazilian too. Well, don't matter. Let's go.

> I just installed TinyCobol (RPM) - RedHat 7.3, I compiled a
> small program like "Hello" everything is ok.
> 
> Then I download the TCGUI from your webpage, made the changes
> to "wish8.0" to run editor.tcl and ran ok.
> 
> Let me tell you looks great, I made couple of screen, generate
> the .cpy and .gui
> 
> My question is: 
> Do I have to install TCGUI somehow??    
>    I tried to compile the tcgui-ex1.cob but some errors came
>    out of the compilation process like "-ldb" not found. After
>    i saw this problem I ran Makefile (changing the ../.. path"
>    but  having some errors)

To compile your program, you will need the generated copybook
(the .gui is only for the editor), the libraries, including tcl/tk, 
and the object file tcgui-run.o (from tcgui-run.c). This last is 
the only additional runtime required by TCGUI.
You may copy those files to where you want them.

As about your error with -ldb, maybe your library is named
something else (db1, db2,...). Of course, you will only need
libdb if you access files. Please check first some test code
accessing cobol files.
 
> Could you gime some guidelines in order to test your program
> with TCGUI and start programming...

The makefiles were supposed to work inside our test.code
directory. If it is not working, it's a bug!

I suggest also you try to ask questions about TCGUI in
brazilian's mailing list, as there is a bunch of people already
trying TCGUI there. If I'm wrong (you're not brazilian), most of
us also speak/understand spanish/castellano, though I'm the most 
ignorant in spanish of the group.

Brazilian's TinyCOBOL mailing list is hosted by Cipsga.
Subscribe to it at the page:

http://cipsga.pbh.gov.br/cgi-bin/mailman/listinfo/cobol-br

best regards,
Rildo
 ----------------------------------------------------------------
 Rildo Pragana                 FPGA/uControllers * Linux * tcl/tk
 P.O. Box 721 Camaragibe PE    http://www.pragana.net
 Brazil 54792-990              +55-81-3223-5694

[Tiny-cobol-users] Link step problems

[Hudson R. <hud...@so...>]

Hi all,

I've had problems in link step:

Script iniciado em Thu Jun 20 12:51:38 2002
hudson@darkstar:~/prj/tc/src/gui01$ make
htcobol -g -D -c hello.cob	
gcc -o tcgui-run.o -c tcgui-run.c 	
gcc -o hello  hello.o  tcgui-run.o  -lhtcobol -lm -ltcl8.3 -ltk8.3 -L/usr/X11/lib -lX11
/usr/local/lib/libhtcobol.a(fileio.o): In function `cob_open':
fileio.o(.text+0x5d7): undefined reference to `dbopen'
fileio.o(.text+0x67e): undefined reference to `dbopen'
/usr/local/lib/libhtcobol.a(fileio.o): In function `sort_open':
fileio.o(.text+0x3b5f): undefined reference to `dbopen'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `cob_scr_init':
scr_curses.o(.text+0x7): undefined reference to `initscr'
scr_curses.o(.text+0xc): undefined reference to `noecho'
scr_curses.o(.text+0x11): undefined reference to `cbreak'
scr_curses.o(.text+0x1b): undefined reference to `stdscr'
scr_curses.o(.text+0x21): undefined reference to `keypad'
scr_curses.o(.text+0x2e): undefined reference to `stdscr'
scr_curses.o(.text+0x34): undefined reference to `scrollok'
scr_curses.o(.text+0x3c): undefined reference to `nonl'
scr_curses.o(.text+0x41): undefined reference to `raw'
scr_curses.o(.text+0x46): undefined reference to `noecho'
scr_curses.o(.text+0x4b): undefined reference to `has_colors'
scr_curses.o(.text+0x56): undefined reference to `start_color'
scr_curses.o(.text+0x6a): undefined reference to `pair_content'
scr_curses.o(.text+0x72): undefined reference to `stdscr'
scr_curses.o(.text+0x89): undefined reference to `COLOR_PAIRS'
scr_curses.o(.text+0x9e): undefined reference to `init_pair'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `cob_scr_finish':
scr_curses.o(.text+0xc3): undefined reference to `isendwin'
scr_curses.o(.text+0xce): undefined reference to `endwin'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `cob_scr_setchar':
scr_curses.o(.text+0xfa): undefined reference to `stdscr'
scr_curses.o(.text+0x100): undefined reference to `waddch'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `cob_scr_setyx':
scr_curses.o(.text+0x146): undefined reference to `stdscr'
scr_curses.o(.text+0x14c): undefined reference to `wmove'
scr_curses.o(.text+0x155): undefined reference to `stdscr'
scr_curses.o(.text+0x15e): undefined reference to `stdscr'
scr_curses.o(.text+0x173): undefined reference to `stdscr'
scr_curses.o(.text+0x17c): undefined reference to `stdscr'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `cob_scr_kbdstatus':
scr_curses.o(.text+0x1e0): undefined reference to `stdscr'
scr_curses.o(.text+0x1e6): undefined reference to `nodelay'
scr_curses.o(.text+0x1f1): undefined reference to `stdscr'
scr_curses.o(.text+0x1f7): undefined reference to `wgetch'
scr_curses.o(.text+0x209): undefined reference to `stdscr'
scr_curses.o(.text+0x20f): undefined reference to `nodelay'
scr_curses.o(.text+0x228): undefined reference to `ungetch'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `set_colors':
scr_curses.o(.text+0x327): undefined reference to `COLOR_PAIRS'
scr_curses.o(.text+0x341): undefined reference to `pair_content'
scr_curses.o(.text+0x38a): undefined reference to `init_pair'
scr_curses.o(.text+0x39d): undefined reference to `COLOR_PAIRS'
scr_curses.o(.text+0x3ae): undefined reference to `stdscr'
scr_curses.o(.text+0x3b4): undefined reference to `wcolor_set'
scr_curses.o(.text+0x3c6): undefined reference to `stdscr'
scr_curses.o(.text+0x3cc): undefined reference to `wbkgdset'
scr_curses.o(.text+0x3d6): undefined reference to `stdscr'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `set_atributes':
scr_curses.o(.text+0x40f): undefined reference to `stdscr'
scr_curses.o(.text+0x415): undefined reference to `wattr_on'
scr_curses.o(.text+0x42b): undefined reference to `stdscr'
scr_curses.o(.text+0x431): undefined reference to `wattr_off'
scr_curses.o(.text+0x450): undefined reference to `stdscr'
scr_curses.o(.text+0x456): undefined reference to `wattr_on'
scr_curses.o(.text+0x46b): undefined reference to `stdscr'
scr_curses.o(.text+0x471): undefined reference to `wattr_off'
scr_curses.o(.text+0x490): undefined reference to `stdscr'
scr_curses.o(.text+0x496): undefined reference to `wattr_on'
scr_curses.o(.text+0x4ab): undefined reference to `stdscr'
scr_curses.o(.text+0x4b1): undefined reference to `wattr_off'
scr_curses.o(.text+0x4d0): undefined reference to `stdscr'
scr_curses.o(.text+0x4d6): undefined reference to `wattr_on'
scr_curses.o(.text+0x4eb): undefined reference to `stdscr'
scr_curses.o(.text+0x4f1): undefined reference to `wattr_off'
scr_curses.o(.text+0x510): undefined reference to `stdscr'
scr_curses.o(.text+0x516): undefined reference to `wattr_on'
scr_curses.o(.text+0x52b): undefined reference to `stdscr'
scr_curses.o(.text+0x531): undefined reference to `wattr_off'
scr_curses.o(.text+0x54b): undefined reference to `beep'
scr_curses.o(.text+0x563): undefined reference to `stdscr'
scr_curses.o(.text+0x569): undefined reference to `wclear'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `_DisplayField':
scr_curses.o(.text+0x62a): undefined reference to `stdscr'
scr_curses.o(.text+0x630): undefined reference to `wmove'
scr_curses.o(.text+0x63b): undefined reference to `stdscr'
scr_curses.o(.text+0x641): undefined reference to `wclrtoeol'
scr_curses.o(.text+0x677): undefined reference to `stdscr'
scr_curses.o(.text+0x67d): undefined reference to `wclrtoeol'
scr_curses.o(.text+0x698): undefined reference to `stdscr'
scr_curses.o(.text+0x69e): undefined reference to `wclrtobot'
scr_curses.o(.text+0x6b8): undefined reference to `beep'
scr_curses.o(.text+0x6d0): undefined reference to `stdscr'
scr_curses.o(.text+0x6d6): undefined reference to `wclear'
scr_curses.o(.text+0x740): undefined reference to `stdscr'
scr_curses.o(.text+0x746): undefined reference to `waddnstr'
scr_curses.o(.text+0x812): undefined reference to `stdscr'
scr_curses.o(.text+0x818): undefined reference to `waddnstr'
scr_curses.o(.text+0x823): undefined reference to `stdscr'
scr_curses.o(.text+0x829): undefined reference to `wrefresh'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `_DisplayForAccept':
scr_curses.o(.text+0x878): undefined reference to `stdscr'
scr_curses.o(.text+0x87e): undefined reference to `wclrtoeol'
scr_curses.o(.text+0x8e8): undefined reference to `stdscr'
scr_curses.o(.text+0x8ee): undefined reference to `waddnstr'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `cob_scr_accept_field':
scr_curses.o(.text+0xb25): undefined reference to `stdscr'
scr_curses.o(.text+0xb2b): undefined reference to `wrefresh'
scr_curses.o(.text+0xb36): undefined reference to `stdscr'
scr_curses.o(.text+0xb3c): undefined reference to `wgetch'
scr_curses.o(.text+0xba9): undefined reference to `beep'
scr_curses.o(.text+0xc92): undefined reference to `beep'
scr_curses.o(.text+0xcd2): undefined reference to `beep'
scr_curses.o(.text+0xd21): undefined reference to `beep'
/usr/local/lib/libhtcobol.a(scr_curses.o): In function `cob_scr_accept':
scr_curses.o(.text+0xffe): undefined reference to `stdscr'
scr_curses.o(.text+0x1004): undefined reference to `wrefresh'
collect2: ld returned 1 exit status
make: ** [hello] Erro 1
hudson@darkstar:~/prj/tc/src/gui01$ exit
Script concluído em Thu Jun 20 12:51:43 2002

I understand this errors and I could insert the libdb and libncurses library in link step to solve this problem, but in this program, I don't use screen section and files indexing... see my program:

       identification division.
       program-id. hello.
       author. Hudson Reis.

       data division.
       working-storage section.
           copy "hello.cpy".
       
       procedure division.
           initialize Hello-Cobol-Variables
           move "Hello World" to Tl-Nome
           set Hello-Cmd-Display to true
           call "TCGUI" using Hello-Gui.
           set Hello-Cmd-Wait to true
           call "TCGUI" using Hello-Gui.
           stop run.
              
Is need add the libncurses and libdb library in link step?

I'm attached the following files:

Makefile: To you compile!
hello.cob: COBOL Program.
hello.cpy: Copybook COBOL to hello.cob.
hello.gui: TCGUI file to use with hello.cob.

Thank you!
Hudson

Re: [Tiny-cobol-users] Setup problems on Win32 (was: Forwarded mail)

[Hudson R. <hud...@so...>]

Hi David,

> Looking at the trace, there appears to be a problem in reading the resource
> file (ini file on Win32) 'htcobolrc'.
> 
> The location of the resource file and pre-processor are set as follows.
> 
> example:
> set TCOB_OPTIONS_PATH=C:\gcc-2.95.2\share\htcobol
> set TCOB_PP_PATH=C:\gcc-2.95.2\bin
> 
> Are you sure that these paths are set, and if so that the current version
> of the resource file is being used ?
> 
> Hope this helps.
> 
> BTW, which version of Win32 are you using ?

I've had problems in the use of TinyCOBOL in mingw too. 

Info:

- My Windows is Win98, second version.
- I install the Mingw 1.0.1 version(gcc is 2.95.3 version) in following directory:
c:\lang\mingw

- My gcc is installed in following directory:
c:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5

- My TinyCOBOL(0.58 version) is installed in following directories:
c:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\bin (binaries)
c:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\lib (libraries)
c:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\include (includes db/getopt/pdcurses)
c:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\doc (documentation)
c:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\share\htcobol

- I install the TinyCOBOL-devel in following directory:
c:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\tinycobol-0.58

- In file maktc.bat, I set the paths in the following way:
set TCOB_OPTIONS_PATH=C:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\share\htcobol
set TCOB_PP_PATH=C:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\bin

and after, I run it.

But in the compilation, occurs the same errors described by Michel.

See the errors:

C:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\tinycobol-0.58\test.code\t01>make
htcobol -c -P  test01a.cob
htcobol: *** WARNING - Unknown resource file option 'COMPILE_DEFAULT:'. Ignoring.
htcobol: *** WARNING - Unknown resource file option 'NO_DEBUG_LINES:'. Ignoring.
htcobol: *** WARNING - Unknown resource file option 'PGM_SUFFIX:'. Ignoring.
htcobol: *** WARNING - Unknown resource file option 'ARX_CMD:'. Ignoring.
htcobol: *** WARNING - Unknown resource file option 'RANLIBX_CMD:'. Ignoring.
htcobol: *** WARNING - Unknown resource file option 'SHLIB_NAME_DEFAULT:'. Ignoring.
gcc -g -o test01a test01a.o     -lhtcobol -lm
gcc: test01a.o: No such file or directory
C:\LANG\MINGW\BIN\MAKE.EXE: *** [test01a.o] Error 1

If I comment this directives in TinyCOBOL resource file, the makefile show the following results:

C:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\tinycobol-0.58\test.code\t01>make
htcobol -c -P  test01a.cob
gcc -g -o test01a test01a.o     -lhtcobol -lm
gcc: test01a.o: No such file or directory
C:\LANG\MINGW\BIN\MAKE.EXE: *** [test01a.o] Error 1

Note that the compiler use '-c' switch to compile. If I modify the makefile to compile using '-S' switch, it compile with no errors...

C:\lang\mingw\lib\gcc-lib\mingw32\2.95.3-5\tinycobol-0.58\test.code\t01>make
htcobol -S -P  test01a.cob
as -o test01a.o test01a.s
gcc -g -o test01a.exe test01a.o     -lhtcobol -lm

In use of the '-c', '-x' and '-m' switch, occurs errors, and the final binary/library file isn't have had generated.

I'm wrong in something?

Thank you for your help!
Hudson

Re: [Tiny-cobol-users] Tinycobol + TCGUI

[Hudson R. <hud...@so...>]

Hi Vinicio,

> I just installed TinyCobol (RPM) - RedHat 7.3, I compiled a small program like "Hello" everything is ok.
> 
> Then I download the TCGUI from your webpage, made the changes to "wish8.0" to run editor.tcl and ran ok.
> 
> Let me tell you looks great, I made couple of screen, generate the .cpy and .gui
> 
> My question is:
>    Do I have to install TCGUI somehow??    

No..

>    I tried to compile the tcgui-ex1.cob but some errors came out of the compilation process like "-ldb" not found. After i saw this problem I ran Makefile (changing the ../.. path" but  having some errors)

Insert the '-S' switch in var COBFLAGS, to htcobol generate a assembly code.

COBFLAGS=-P -D -S

Could you insert a typescript file with the errors? 

> Could you gime some guidelines in order to test your program with TCGUI and start programming...

I attach a "Hello World" program using TinyCOBOL and TCGUI.       

Including, see the TCGUI/doc files. It can help you...

Hope this help.

Regards
Hudson

Re: [Tiny-cobol-users] Color?

[Hudson R. <hud...@so...>]

Hi Mario.

> Is it possible to use color in htcobol?

Yes...

> If yes, how is the syntax?

Use the screen section.

hope this helps...

Regards
Hudson Reis

Re: [Tiny-cobol-users] Color?

[Ferran P. <fer...@re...>]

Mario Lodi Rizzini wrote:

>Is it possible to use color in htcobol?
>If yes, how is the syntax?
>
>Thanks
>
>Mario Lodi Rizzini
>
>  
>
By now it is possible to use color only on the screen section. You can 
see examples on the test23 programs.

-- 
Salutacions / Regards
+---------------------------------------------------------------+
| Ferran Pegueroles Forcadell                                   |
| mailto:fer...@re...                          |
| Tels (+34)937252106 - (+34)667658535                          |
| C/Unió 44 2n 2a 08201 Sabadell (BCN)                          |
+---------------------------------------------------------------+

[Tiny-cobol-users] Tinycobol + TCGUI

[Vinicio B. <aiz...@be...>]

Hi, everyone

This is for Rildo:

I just installed TinyCobol (RPM) - RedHat 7.3, I compiled a small =
program like "Hello" everything is ok.

Then I download the TCGUI from your webpage, made the changes to =
"wish8.0" to run editor.tcl and ran ok.

Let me tell you looks great, I made couple of screen, generate the .cpy =
and .gui

My question is:
   Do I have to install TCGUI somehow??   =20
   I tried to compile the tcgui-ex1.cob but some errors came out of the =
compilation process like "-ldb" not found. After i saw this problem I =
ran Makefile (changing the ../.. path" but  having some errors)

Could you gime some guidelines in order to test your program with TCGUI =
and start programming...

[Tiny-cobol-users] Color?

[Mario L. R. <ma...@ka...>]

Is it possible to use color in htcobol?
If yes, how is the syntax?

Thanks

Mario Lodi Rizzini

[Tiny-cobol-users] SPACES keyword

[Jason D. <dr...@ca...>]

>>"Jason Dravet" wrote:
>>I have the following piece of code 
>>PERFORM GET-MAXIMUM-MODEL-YEAR
>>UNTIL ((WA-MAXIMUM-MODEL-YEAR-FROM-USER <= WA-YEAR) AND
>>       (WA-MAXIMUM-MODEL-YEAR-FROM-USER > 00)) OR
>>       (WA-MAXIMUM-MODEL-YEAR-FROM-USER = SPACES).

>What is the PICTURE of WA-MAXIMUM-MODEL-YEAR-FROM-USER? Without that
>data, it's hard to guess at the problem.


The pic is WA-MAXIMUM-MODEL-YEAR-FROM-USER PIC 99.  

Jason

[Tiny-cobol-users] which list for asking about esql.

[Ferran P. <fer...@re...>]

I see on the web opf firebird lots of lists for diferent firebird 
related themes.

Anybody knows which list I have to use to ask about gpre ? (the firebird 
SQL preprocessor).

-- 
Salutacions / Regards
+---------------------------------------------------------------+
| Ferran Pegueroles Forcadell                                   |
| mailto:fer...@re...                          |
| Tels (+34)937252106 - (+34)667658535                          |
| C/Unió 44 2n 2a 08201 Sabadell (BCN)                          |
+---------------------------------------------------------------+

[Tiny-cobol-users] esql include instruction.

[Ferran P. <fer...@re...>]

Anybody has used the include instruction with the gpre sql preprocesoor.

I only can use INCLUDE for including SQLCA, but I cannot include any 
other file.

Any Ideas ?

-- 
Salutacions / Regards
+---------------------------------------------------------------+
| Ferran Pegueroles Forcadell                                   |
| mailto:fer...@re...                          |
| Tels (+34)937252106 - (+34)667658535                          |
| C/Unió 44 2n 2a 08201 Sabadell (BCN)                          |
+---------------------------------------------------------------+

Re: [Tiny-cobol-users] SPACES keyword

[Dave C. <da...@co...>]

"Jason Dravet" wrote:
>I have the following piece of code 
>PERFORM GET-MAXIMUM-MODEL-YEAR
>UNTIL ((WA-MAXIMUM-MODEL-YEAR-FROM-USER <= WA-YEAR) AND
>       (WA-MAXIMUM-MODEL-YEAR-FROM-USER > 00)) OR
>       (WA-MAXIMUM-MODEL-YEAR-FROM-USER = SPACES).

What is the PICTURE of WA-MAXIMUM-MODEL-YEAR-FROM-USER? Without that
data, it's hard to guess at the problem.
-- 
Dave Close, Compata, Costa Mesa CA  "A difference has to make a
da...@co..., +1 714 434 7359    difference in order to be a
dh...@al...           difference." --Wendell Johnson

[Tiny-cobol-users] Setup problems on Win32 (was: Forwarded mail)

[David E. <de...@ar...>]

At 11:09 PM 17/06/02 +0100, Jonathan Riddell wrote:

> Can anybody help this chap out?
>
> On Mon, 17 Jun 2002 18:31:53 +0200, Michel Thomas wrote:
> ...
>> I tried to run the "simple" example given in the 
>> documentation... but I encountered some problems...
>> Here is a screenshot of the error message I got. 
>> I tried to find an answer in the mailing list archives 
>> and in the documents available on-line... but found nothing.
>>
>> Any help will be greatly appreciated... I am quite... desperate !

Looking at the trace, there appears to be a problem in reading the resource
file (ini file on Win32) 'htcobolrc'.

The location of the resource file and pre-processor are set as follows.

example:
set TCOB_OPTIONS_PATH=C:\gcc-2.95.2\share\htcobol
set TCOB_PP_PATH=C:\gcc-2.95.2\bin

Are you sure that these paths are set, and if so that the current version
of the resource file is being used ?

Hope this helps.

BTW, which version of Win32 are you using ?





David Essex

[Tiny-cobol-users] COBOL Utilities Project

[Keisuke N. <kni...@ne...>]

Hi,

I have registered COBOL Utilities Project on SourceForge:

  http://sourceforge.net/projects/cobol/

Administrators are as follows:

  bgiroud        Giroud, Bernard
  dessex         David Essex
  knishida       Keisuke Nishida
  rpragana       Rildo Pragana
  timjosling     Tim Josling

An mailing list is available at:

  https://lists.sourceforge.net/lists/listinfo/cobol-utils

Can we move there?

Keisuke

[Tiny-cobol-users] SPACES keyword

[Jason D. <dr...@ca...>]

I have the following piece of code 

PERFORM GET-MAXIMUM-MODEL-YEAR
UNTIL ((WA-MAXIMUM-MODEL-YEAR-FROM-USER <= WA-YEAR) AND
       (WA-MAXIMUM-MODEL-YEAR-FROM-USER > 00)) OR
       (WA-MAXIMUM-MODEL-YEAR-FROM-USER = SPACES).

The program compiles and runs, but the program will continue past this
point.  When the program runs it prompts for a model-year.  The program
should move to the next question if I just press enter to the question,
but the program is not reading the SPACES keyword right.  I put in 2
spaces and press enter but it didn't work either.

Jason

Re: [Tiny-cobol-users] cancel statement

[Ferran P. <fer...@re...>]

Keisuke Nishida wrote:

>At Mon, 17 Jun 2002 18:26:08 +0200,
>Ferran Pegueroles wrote:
>  
>
>>I don't know if it is possible to make a real cancel and force the 
>>system to unload the routine (this will be the best solution).
>>    
>>
>
>The function lt_dlclose() defined in ltdl is for this.
>  
>
I will try it, thanks for the help.


-- 
Salutacions / Regards
+---------------------------------------------------------------+
| Ferran Pegueroles Forcadell                                   |
| mailto:fer...@re...                          |
| Tels (+34)937252106 - (+34)667658535                          |
| C/Unió 44 2n 2a 08201 Sabadell (BCN)                          |
+---------------------------------------------------------------+

Re: [Tiny-cobol-users] esql and error reporting

[Ferran P. <fer...@re...>]

Andrew Cameron wrote:

>Hi,
>
>I don't think so as you are compiling the new code generated by gpre and not
>the origional?
>  
>
I know this, but with the C proprocesor of PostgreSQL, you get the line 
of the error of the original file. It is done like in the TC 
preprocessed file, via lines that contain something like

#file.ecob,23

That indicate the name and line of the original file. I could be good 
that gpre creates this, I kown I have to report this to the firebird people.

-- 
Salutacions / Regards
+---------------------------------------------------------------+
| Ferran Pegueroles Forcadell                                   |
| mailto:fer...@re...                          |
| Tels (+34)937252106 - (+34)667658535                          |
| C/Unió 44 2n 2a 08201 Sabadell (BCN)                          |
+---------------------------------------------------------------+

Re: [Tiny-cobol-users] Re: NIST Test Suite

[Keisuke N. <kni...@ne...>]

At Mon, 17 Jun 2002 17:44:49 +0200 (MEST),
bg...@fr... wrote:
> 
> > I would like to suggest that a shell script be added so the test
> > suite can be configured for each COBOL project (ex: setup.sh OC or
> > TC or CG).
> 
> And the location of the compiler (i.e. installed or in development).
> Unless you prefer to play with the path?!

I'll do it.

> > Also I would like to see the Makefile changed so only specific
> > modules can be tested (ex: make SM).

What about "cd SM && make"?  This is the way I do now.
Changing the current directory eases you to open the source.

> Another issue is to take care of "manual" runs like NC109M.

It can be run as follows:

  ./NC109M < NC109M.DAT

Note you still need to check some of the result manually,
which is not automatically done by my scripts yet.

Keisuke

[Tiny-cobol-users] NIST Test Suite

[Keisuke N. <kni...@ne...>]

At Mon, 17 Jun 2002 08:50:51 -0700 (PDT),
Jeff Smith wrote:
> 
> On the subject of the NIST scripts...
>   I have not seen how the OpenCobol scripts differ, but the
> control card file in TinyCobol, make_pop_linux.txt,
> currently is only set up to work with one module at a time.
>   For those that do not know, it can be set up for multiple
> modules by copying the first line and changing the module
> name for each line appropriately.  Note that the names must
> appear in the same order as in the big NIST file, i.e.
> alphabetically.
> 
> *SELECT-MODULE IX
> *SELECT-MODULE NC
> *SELECT-MODULE SM

Right.  The problem with it is that EXEC85 allows only
10 modules listed in this way, while there exist 13 modules
in the test suite.  That's why our Makefile modifies the
`SELECT-MODULE' line as make proceeds.

Keisuke

Re: [Tiny-cobol-users] cancel statement

[Keisuke N. <kni...@ne...>]

At Mon, 17 Jun 2002 18:26:08 +0200,
Ferran Pegueroles wrote:
> 
> I don't know if it is possible to make a real cancel and force the 
> system to unload the routine (this will be the best solution).

The function lt_dlclose() defined in ltdl is for this.

> I think we also have to close all the files on exit if the routine is 
> initial, completing the initial implmentation.

OpenCOBOL does not do this for now.  Maybe we will do it.

Keisuke

[Tiny-cobol-users] Forwarded mail....

[Jonathan R. <jr...@jr...>]

Can anybody help this chap out?

The imge he atached is at jriddell.org/michel-thomas-cobol-screenshot.jpg

Jonathan Riddell

---------- Forwarded message ----------
Date: Mon, 17 Jun 2002 18:31:53 +0200
From: Michel Thomas <th...@te...>
To: jr...@jr...


Dear Jonathan Riddell,

Thanks for the tiny-cobol documentation you provided (at
http://tiny-cobol.sourceforge.net/docs.html).  I tried to run the "simple"
example given in the documentation... but I encountered some problems...
Here is a screenshot of the error message I got. I tried to find an answer
in the mailing list archives and in the documents available on-line... but
found nothing.

Any help will be greatly appreciated... I am quite... desesperate !

Best Regards,

Michel Thomas

202b459.jpg

THOMAS Michel
CETEDOC
UCL - Facult=E9 de Philosophie et Lettres
Pl. Blaise Pascal, 1
1348  Louvain-la-Neuve
t=E9l: 010/473775
e-mail: th...@te...

Re: [Tiny-cobol-users] esql and error reporting

[Andrew C. <apc...@so...>]

Hi,

I don't think so as you are compiling the new code generated by gpre and not
the origional?

Regards
Andrew Cameron
----- Original Message -----
From: "Ferran Pegueroles" <fer...@re...>
To: <tin...@li...>
Sent: 17 June 2002 10:45
Subject: [Tiny-cobol-users] esql and error reporting


> Is it possible to view the correct line numbers (from the original ecob
> file) of the error messagesz when compiling a file generated by the
> firebird preprocesor (gpre ) ?
>
> --
> Salutacions / Regards
> +---------------------------------------------------------------+
> | Ferran Pegueroles Forcadell                                   |
> | mailto:fer...@re...                          |
> | Tels (+34)937252106 - (+34)667658535                          |
> | C/Unió 44 2n 2a 08201 Sabadell (BCN)                          |
> +---------------------------------------------------------------+
>
>
>
> _______________________________________________________________
>
> Sponsored by:
> ThinkGeek at http://www.ThinkGeek.com/
> _______________________________________________
> Tin...@li...
> https://lists.sourceforge.net/lists/listinfo/tiny-cobol-users