Léa-Linux & amis :   LinuxFR   GCU-Squad   GNU
Exemple acces fichier via tinycobol
Envoyé par: Emmanuel

Bonjour,

Qui aurai une exemple de code cobol compiler avec tinycobol, utilisant un fichier...?

Voici mon PB (plus exactement) :

Voici les option de compilation utiliser :
htcobol -F -x tstfic.cob

voici le resultat de la compile :
/usr/bin/ld: cannot find -ldb
collect2: ld returned 1 exit status

voici le source cobol :

IDENTIFICATION DIVISION.
PROGRAM-ID. TSTFIC.

ENVIRONMENT DIVISION.

CONFIGURATION SECTION.
SPECIAL-NAMES.
DECIMAL-POINT IS COMMA.

INPUT-OUTPUT SECTION.

FILE-CONTROL.
SELECT fosa ASSIGN 'OSA'
FILE STATUS IS RC-OSA.

DATA DIVISION.
FILE SECTION.
FD fosa
LABEL RECORD IS STANDARD
DATA RECORD IS STR-OSA.
01 STR-OSA PIC hot smiley80).

WORKING-STORAGE SECTION.
01 NBR-LUS-OSA PIC 9(5) value zeroes.
01 RC-OSA PIC hot smiley2) value spaces.
01 FIN-OSA-FLAG PIC hot smiley3) value 'NON'.
88 FIN-OSA value 'OUI'.
88 NON-FIN-OSA value 'NON'.


PROCEDURE DIVISION.
OPEN input fosa.

read fosa.

display str-osa.

CLOSE fosa.

stop run.


Merci d'avance...

Poste le Wednesday 5 November 2003 22:09:52
Répondre     Citer    
Re: Exemple acces fichier via tinycobol
Envoyé par: tonio

hmmm, chez moi ça compile très bien.

Vérifie que tu possèdes bien le fichier /usr/include/db.h
Si ce n'est pas le cas, c'est qu'il te manque la lib correspondante, à savoir la libdb2

Tonio

Poste le Thursday 6 November 2003 00:02:30
Répondre     Citer    
Re: Exemple acces fichier via tinycobol
Envoyé par: Emmanuel

Bonjour Tonio...

La seule Lib db.h dont je dispose se trouve dans le repertoire :
/usr/include/db1

Petit rappel je suis sous MDK9.0

...
Petit question cette lib est installer avec quel package ?

Merci d'avance.

Poste le Thursday 6 November 2003 00:08:47
Répondre     Citer    
Re: Exemple acces fichier via tinycobol
Envoyé par: tonio

hmm, en fait le fichier important c'est
/usr/lib/libdb.so

Le package doit être un truc du genre libdb4.1-4.1.25-3mdk.i586

Si la librairie est déjà présente mais dans un autre répertoire que /usr/lib, soit tu fais un lien libdb.so dans /usr/lib qui pointe vers le fichier /autre_chemin/libdb.so, soit tu peux rajouter le chemin vers le répertoire contenant la librairie dans /etc/ld.so.conf, après quoi tu lances la commande ldconfig (en root).

Tonio

Poste le Thursday 6 November 2003 19:57:09
Répondre     Citer    
Re: Exemple acces fichier via tinycobol
Envoyé par: Emmanuel


Ok chez moi, j'ai ces 2 fichiers...

/usr/lib/libdb.so.3
/usr/lib/libdb.so.2

y'aurait il, une version de trop ...? si j'installe le package libdb4.1-4.1.25-3mdk.i586

serait ce plus "propre" ...?

merci.

Poste le Thursday 6 November 2003 21:11:43
Répondre     Citer    
Re: Exemple acces fichier via tinycobol
Envoyé par: Emmanuel

Problème résolu, et oui Tonio grace a ton aide et en cherchant un peu le fichier libdb.so, sur mon systeme se trouvait etre celui ci :

/lib/libdb-3.3.so

Avec un petit lien (via la commande ln -s /lib/libdb-3.3.so /usr/lib/libdb.so), cela fonctionne nettement mieux...

Encore merci Tonio pour ton aide...

Tchao.

smiling smiley#

Poste le Thursday 6 November 2003 22:10:21
Répondre     Citer    

Veuillez vous authentifier auparavant pour commenter.

 

Ce forum !
Exemple acces fichier via tinycobol
Pour poser vos questions sur les scripts shell, le Perl, le C, etc... Attention : nous ne sommes pas des spécialistes du dev, ce forum est juste pour de petites aides ponctuelles concernant le développement et les outils de développement.

Sauf mention contraire, les documentations publiées sont sous licence Creative-Commons