Discussion :

[gritchefr]

Bonjour,

Un de nos partenaires doit nous faire parvenir des données, via CFT ,délimitées par des ";".
sur un environnement micro pas de pbme on sait faire.

Maintenant là on est sous DB2 mainframe ZOS et là cela se complique un peu

auriez vous des suggestions

1 Sur Quel est le meilleur format à definir :
FB ?
VB ?
quelle taille ? (à minima une 100aine de car , au maximum inconnu ?)

Comment peut on récupérer ces données et les charger dans des tables DB2 de manière automatique ?
et si possiblle un exemple de JCL

Merci d'avance

[bernard59139]

Avec le LOAD, il y a des possibilités.

recherche "delimited" dans la doc, tu tomberas sur loaded delimited files

[Macmini95]

Si j'ai bien compris tu veux faire du Load positionnel

exemple de fichier à loader :


----+----1----+----2----+----3----+----4
2010-07-02;201007-02;22.40.18;JOB02776;

donc dans ta Sysin tu spécifies positionnellement

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
LOAD DATA LOG NO RESUME YES  INDDN SYSREC00 
NOCOPYPEND                                  
INTO TABLE qualifier.nomde table                     
 
cols1      psoition (1)       date external,
cols2      position (12)      date external,
cols3      psoition (23)      time external,
cols4      position (32)      ,
 
 
etc .........

[bernard59139]

Je ne suis pas d'accord avec Macmini95.

Un fichier csv est très souvent de taille variable, et db2 permet de charger des données depuis des fichiers de type csv (format delimited),
ce genre de sysin (prise telle quelle dans la doc) me semble plus adaptée:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
     LOAD DATA
          FORMAT DELIMITED COLDEL ',' CHARDEL '"' DECPT '.'
          INTO TABLE TBQB0103
              (FILENO   CHAR,
               DATE1    DATE EXTERNAL,
               TIME1    TIME EXTERNAL,
               TIMESTMP TIMESTAMP EXTERNAL)

bonne journée

[Macmini95]

Bernard je ne connaissais pas cette syntaxe mais il vrai que cela à l'air nettement plus pratique Merci pour la découverte

[gritchefr]

Je ne suis pas d'accord avec Macmini95.

Un fichier csv est très souvent de taille variable, et db2 permet de charger des données depuis des fichiers de type csv (format delimited),
ce genre de sysin (prise telle quelle dans la doc) me semble plus adaptée:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
     LOAD DATA
          FORMAT DELIMITED COLDEL ',' CHARDEL '"' DECPT '.'
          INTO TABLE TBQB0103
              (FILENO   CHAR,
               DATE1    DATE EXTERNAL,
               TIME1    TIME EXTERNAL,
               TIMESTMP TIMESTAMP EXTERNAL)

bonne journée

Merci à tous.
Désolé de la coupure d'images depuis la question ... problème de FAI et pas question de se connecter à ces forums au boulot.

super
Comme quoi cela m'apprendra . J'en ai pourtant lu des docs, mais comme toujours trop vite ou pas la bonne.
Et les experts de ma boite (les sachants comme ils disent), pas une fois ils n'ont évoqué/cherché ce genre de chose.
J'avais beau leur dire que cela m'étonnait vraiment que DB2 sur mainframe ne fasse pas une chose aussi basique, possible notamment par DBASE 3 il y a 25 ans, voire même par Dbase 2 sur CPM et sur Aplle ou Amstrad il y a même plus longtemps .
La réponse a toujours été la même ... T'as qu'à faire un module cobol pour lire les enreg, les parser et constituer un fichier à plat qui sera loadé ......


PS : j'avais été voir les jcls pour voir les déchargements et si on ne produisait pas directement du CSV et là je vous raconte pas le nbre de jcls qui découpent et rajoutent (par Sort ouf ..) les , ; ou * nécessaires...

=> Encore merci pour ces réponses que je vais essayer de tester et faire appliquer.
Si cela marche j'aurais peute être plein de nvx amis , et pas mal de nouveaux ennemis mais tant pis c'est la vie..

[Luc Orient]

...
Et les experts de ma boite (les sachants comme ils disent), pas une fois ils n'ont évoqué/cherché ce genre de chose.
J'avais beau leur dire que cela m'étonnait vraiment que DB2 sur mainframe ne fasse pas une chose aussi basique, possible notamment par DBASE 3 il y a 25 ans, voire même par Dbase 2 sur CPM et sur Aplle ou Amstrad il y a même plus longtemps .
La réponse a toujours été la même ... T'as qu'à faire un module cobol pour lire les enreg, les parser et constituer un fichier à plat qui sera loadé ......

Je pense que la non-réponse de tes "spécialistes" peut s'expliquer par plusieurs facteurs :

1. le format CSV n'est pas un format "naturel" dans le monde Mainframe (à la différence du monde de la micro) qui préfere de loin le format fixe "à la COBOL"
   
2. l'option DELIMITED sur le LOAD est apparue relativement tard dans la vie de DB2 for z/OS ; pendant longtemps IBM n'a pas offert cette possibilité pour son utilitaire à la différence des fournisseurs tiers

Maintenant, ça explique mais ça n'excuse pas le comportement de tes "experts". La veille technologique faiit aussi partie du travail d'un spécialiste ...

[bernard59139]

Et je completerai par un truc qui me désespère de la part d'ibm.
Il n'a pas écrit un DSNTIAUL PARM 'CSV'.

Je me suis écrit un rexx qui fait à peu pret la même chose; avec bcp d'impasse sur la gestion d'erreur et les formats de colonne.

et idem pour du xml. Il y a bien purexml; mais c du très lourd.