Bonjour,
après avoir fait RTVDIRINF, j'obtiens deux fichiers QAEZD0001O et QAEZD0001D. Je lis en IP QAEZD0001O et je voudrais chainer sur QAEZD0001D qui a une clé QEZDIRIDX.
à l'appel du pgm en rpgle j'ai le message suivant
L'ouverture du membre QAEZD0001D du fichier QAEZD0001D dans LIBXXX a échoué.
1 -- Le format pour le fichier QAEZD0001D contient une ou plusieurs zones de type LOB. Or, la demande d'ouverture n'indiquait pas que ce type de zone pouvait être traité par l'utilisateur de l'ouverture.
Pouvez-vous me dire s'il faut mettre un mot clé au niveau des cartes F ?
Merci d'avance pour votre réponse.
QAEZD0001D comment chainer dessus
-
- Site Admin
- Messages : 813
- Enregistré le : mer. 14 févr. 2007, 18:00:03
- Localisation : Nantes
- Contact :
lire un BLOB
un BLOB ne peut être lu que par SQL (y compris Embedded SQL ou SQL dans le RPG). La pause-café n° 56 (http://www.volubis.fr/Pausecaf/PAUSECAF56.htm) expliquait comment faire en parlant des champs XML qui sont du même genre.
Christian Massé (Volubis.fr)
QAEZD0001D
Merci pour votre aide,
j'ai ajouté le code sql dans le rpg,
mais j'ai toujours le message
ID message . . . . . . : CPF428A
Message . . . . : L'ouverture du membre QAEZD0001D du fichier QAEZD0001D dans LIBIFS a échoué.
Cause . . . . . : Le membre QAEZD0001D du fichier QAEZD0001D dans la bibliothèque LIBIFS n'a pas été ouvert. Le code d'erreur correspondant est
1. Les codes d'erreur et leur signification sont les suivants :
1 -- Le format pour le fichier QAEZD0001D contient une ou plusieurs zones de type LOB. Or, la demande d'ouverture n'indiquait pas que ce type de zone pouvait être traité par l'utilisateur de l'ouverture.
Faut-il compiler le rpg avec des conditions particulières ?
DSPFFD sur QAEZD0001D
j'ai ajouté le code sql dans le rpg,
Code : Tout sélectionner
fQAEZD0001Dif e K DISK
D NAM1 s 32000A Varying
c/Exec SQL
c+ Select QEZDIRIDX, CAST(QEZDIRNAM1 as VarChar(32000))
c+ into :QEZDIRIDX, :NAM1
c+ from QAEZD0001D where QEZDIRIDX=:QEZDIRIDX
c/End-Exec
c eval CHEMIN = NAM1
mais j'ai toujours le message
ID message . . . . . . : CPF428A
Message . . . . : L'ouverture du membre QAEZD0001D du fichier QAEZD0001D dans LIBIFS a échoué.
Cause . . . . . : Le membre QAEZD0001D du fichier QAEZD0001D dans la bibliothèque LIBIFS n'a pas été ouvert. Le code d'erreur correspondant est
1. Les codes d'erreur et leur signification sont les suivants :
1 -- Le format pour le fichier QAEZD0001D contient une ou plusieurs zones de type LOB. Or, la demande d'ouverture n'indiquait pas que ce type de zone pouvait être traité par l'utilisateur de l'ouverture.
Faut-il compiler le rpg avec des conditions particulières ?
DSPFFD sur QAEZD0001D
Code : Tout sélectionner
Type Long Long Position Usage En-tête
Zone données zone tampon tampon zone colonne
QEZDIRIDX BINAIR 9 0 4 1 E-S Path
Name ID
Texte descriptif de la zone . . . . . . . : Identifier of path name
QEZDIRNAM1 GRAPHIC 1024 2050 5 E-S Parent Directory
Path
Texte descriptif de la zone . . . . . . . : Parent directory path. Path length is below 1 KB
Zone longueur variable-- Longueur allouée : 60
Accepte la valeur indéfinie
ID codé de jeu de caractères . . . . . : 1200
Conversion UCS2 ou Unicode . . . . . . . : *CONVERT
Normaliser les données . . . . . . . . . : Non
QEZDIRNAM2 DBCLOB 1048576 42 2055 E-S Parent Directory
Path
Texte descriptif de la zone . . . . . . . : Parent directory path. Path length is above 1 KB
Longueur allouée . . . . . . . . . . . . : 0
Accepte la valeur indéfinie
ID codé de jeu de caractères . . . . . : 1200
Conversion UCS2 ou Unicode . . . . . . . : *CONVERT
Normaliser les données . . . . . . . . . : Non
Type Long Long Position Usage En-tête
Zone données zone tampon tampon zone colonne
QEZDRCCSID BINAIR 9 0 4 2097 E-S Directory
CCSID
Texte descriptif de la zone . . . . . . . : The directory CCSID
QEZDREGION GRAPHIC 2 4 2101 E-S Directory
Region ID
Texte descriptif de la zone . . . . . . . : The directory path region ID
Valeur par défaut . . . . . . . . . . . . : Aucun
ID codé de jeu de caractères . . . . . : 1200
Conversion UCS2 ou Unicode . . . . . . . : *CONVERT
Normaliser les données . . . . . . . . . : Non
QEZDLANGID GRAPHIC 3 6 2105 E-S Directory
Language ID
Texte descriptif de la zone . . . . . . . : The directory path language ID
Valeur par défaut . . . . . . . . . . . . : Aucun
ID codé de jeu de caractères . . . . . : 1200
Conversion UCS2 ou Unicode . . . . . . . : *CONVERT
Normaliser les données . . . . . . . . . : Non
Type Long Long Position Usage En-tête
Zone données zone tampon tampon zone colonne
QEZDIRLEN BINAIR 9 0 4 2111 E-S Directory
Length
Texte descriptif de la zone . . . . . . . : Length of directory's path name
QEZDIRFID GRAPHIC 35 70 2115 E-S File ID
Texte descriptif de la zone . . . . . . . : The file ID of the directory
Accepte la valeur indéfinie
ID codé de jeu de caractères . . . . . : 1200
Conversion UCS2 ou Unicode . . . . . . . : *CONVERT
Normaliser les données . . . . . . . . . : Non
QEZDFID BINAIR 9 0 4 2185 E-S Directory
File ID
Texte descriptif de la zone . . . . . . . : The file ID of the directory
QEZDIRFSID BINAIR 18 0 8 2189 E-S Directory File System ID
Texte descriptif de la zone . . . . . . . : The file system ID of the directory
QEZDIRGID BINAIR 18 0 8 2197 E-S Directory
Generation ID
Texte descriptif de la zone . . . . . . . : The generation ID
QEZPARDIR BINAIR 9 0 4 2205 E-S Parent
Directory
Index
Texte descriptif de la zone . . . . . . . : Parent directory index
Accepte la valeur indéfinie
-
- Site Admin
- Messages : 813
- Enregistré le : mer. 14 févr. 2007, 18:00:03
- Localisation : Nantes
- Contact :
Fichier contenant un BLOB
C'est juste que quand vous faites vos lectures par SQL, vous n'avez plus de specif F !
Christian Massé (Volubis.fr)
QAEZD0001D
n'utilisant que très rarement le sql dans le rpg je n'ai pas percuter avec le fichier.
Merci beaucoup
Merci beaucoup