Discussion :

[JPLAROCHE]

*Bonjour,*

Code :

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

1
2
3
4
5
"INSERT INTO TSTFCH.FRPFBLV "
"SELECT RFCSTD,RFCCND,RFCDPO,RFCGIM,RFCPRD,"
"VALUES (CAST(? AS double )<double> ,CAST(? AS double )<double> ),RFNUMC,RFQCND,RFZETQD,RFZETQF "
"FROM TSTFCH.FRFDOM "
"WHERE (RFNUMC=:xRFNUMC<double>)  "

j'utilise OTL il fonctionne très bien mais je ne sais pas

utiliser les cast je voudrais passer des variables

merci

[Mercure]

Avec OTL, je ne connais pas la syntaxe exacte mais je pense que ça devrait être qqchose dans ce goût-là :

Code :

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

1
2
3
4
5
6
7
STM = "INSERT INTO TSTFCH.FRPFBLV "
"SELECT RFCSTD,RFCCND,RFCDPO,RFCGIM,RFCPRD,"
"VALUES (CAST(? AS double )<double> ,CAST(? AS double )<double> ),RFNUMC,RFQCND,RFZETQD,RFZETQF "
"FROM TSTFCH.FRFDOM "
"WHERE (RFNUMC=RFNUMC<double>) "
 
Execute :STM Using :VAR1, :VAR2, etc,. dans l'ordre des CASTS.

[JPLAROCHE]

Avec OTL, je ne connais pas la syntaxe exacte mais je pense que ça devrait être qqchose dans ce goût-là :

Code :

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

1
2
3
4
5
6
7
STM = "INSERT INTO TSTFCH.FRPFBLV "
"SELECT RFCSTD,RFCCND,RFCDPO,RFCGIM,RFCPRD,"
"VALUES (CAST(? AS double )<double> ,CAST(? AS double )<double> ),RFNUMC,RFQCND,RFZETQD,RFZETQF "
"FROM TSTFCH.FRFDOM "
"WHERE (RFNUMC=RFNUMC<double>) "
 
Execute :STM Using :VAR1, :VAR2, etc,. dans l'ordre des CASTS.

bien déjà je suis sur la bonne voix

strmdb_FRPFBLV<<xRF999M<<xRONBL<<xRFNUMC;

mais il provque une erreur du style


OTL TRACE ==> otl_exception, code=-104, msg=[IBM][Pilote ODBC System i
> Access][D
> B2 for i5/OS]SQL0104 - ElÚment syntaxique < n'est pas correct.
> ElÚments possible

[Mercure]

Tu veux insérer dans DB2/i5 (AS400), n'est-ce pas ?

Alors, supprimes les "<double>" superflus pour faire comme ci-dessous.

Code :

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

1
2
3
4
5
STM = "INSERT INTO TSTFCH.FRPFBLV "
"SELECT RFCSTD,RFCCND,RFCDPO,RFCGIM,RFCPRD,"
"VALUES (CAST(? AS double ), CAST(? AS double ), RFNUMC, RFQCND, RFZETQD, RFZETQF )"
"FROM TSTFCH.FRFDOM "
"WHERE (RFNUMC=RFNUMC) "

Le prédicat dans clause WHERE m'échappe un peu

[K2R400]

Le prédicat dans clause WHERE m'échappe un peu

Philippe,

C'est courament utilisé, généralement.
Mon prédicat préféré c'est WHERE 1=1.
Ainsi quand on continue la fabrication de l'ordre SQL dynamique pas besoin de tester si c'est le premier AND que l'on va faire.
Une clause WHERE ajoutée donnerait

Code :

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

1
2
3
If not (par1 = *zeros);
SMT += ' AND NUM=' +%trim(Par1);
endif;

[Mercure]

Ok, oui, mais c'est un cas particulier, une ruse que j'ai en effet déjà employée dans les programmes, mais est-ce bien la raison pour laquelle l'OP JPLAROCHE a établi ce prédicat, ça ne saute pas aux yeux ?
Enfin, là n'est pas l'essentiel. Attendons si tu veux de voir ce qu'il va nous dire.