Discussion :

[karimas]

Bonsoir,

je lance à partir d 'un cl un rpg qui me sauvegarde un savf dans une bib bien précise.
Tout fonct qd je force les parametres dans les commandes du RPG
> quote rcmd rstobj obj etc...savf(BBBB/toto)

Dans les parametres, s'ils sont inferieur à mes declarations de variables, ils me provoquent des blancs BBBBBxxxx/toto ( X=blanc) et ca plante!!!

merci de m donner la solution pour avoir BBBBB/toto

Cdt.

[jump400]

Bonsoir,

Ce serait sympa (et utile) d'avoir le bout de code qui te sert à créer le "BBBBB/toto"
En RPG IV c'est trés facile : il faut utiliser la BIF %TRIMR sur le nom de la bib

Code :

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

1
2
C                 Eval      NomQualifié = %TRIMR(BIB) + '/' + SAVF

PS : Attention aux %TRIM/%TRIMR/%TRIML qui sont assez gourmands en RPGIV. Si possible il est préférable de déclarer les variables en longueur variable (VARYING). Ca marche trés bien et cela simplifie la programmation

En RPGIII :

Code :

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

1
2
3
C        BIB       CAT  '/':0     NOMQUAL
C        NOMQUAL   CAT  SAVF:0    NOMQUAL

[Mercure]

> quote rcmd rstobj obj etc...savf(BBBB/toto)

Mais que vient faire l'instruction "quote" dans tout ça, je ne comprends pas l'enchaînement des tâches. Ta demande n'est pas claire. Peux-tu développer ?

[jump400]

Je soupçonne que le RPG construit un fichier d'instructions FTP...

[karimas]

merci a tous,

effectivement il s'agit d'un transfert ftp.. et j'utilise la commande 'quote rcmd etc...'

je vais tenter la notion de longueur variable à niveau de ma déclaration de la variable...

je reviens à vous!! chapo pour la réactivité merci à tous

[Hédhili Jaïdane]

merci a tous,

effectivement il s'agit d'un transfert ftp.. et j'utilise la commande 'quote rcmd etc...'

je vais tenter la notion de longueur variable à niveau de ma déclaration de la variable...

je reviens à vous!! chapo pour la réactivité merci à tous

Bonjour.

Et si tu nous expliquais un peu plus l'enchaînement des différentes actions que tu fais quitte à nous mettre les pavés concenrnés de ton prog rpg et de ton cl.

[Mercure]

+1 avec HJ.

je vais tenter la notion de longueur variable à niveau de ma déclaration de la variable...

Qu'est-ce que ça veut dire ?

[karimas]

Bonjour,

merci de me conduire pas à pas ( débutant) pour déclarer une variable varying afin d'utiliser la commande %trimr et %triml..

en RPG 3 et 4

encore merci...

[Hédhili Jaïdane]

Karimas, s'il te plait, mets nous ici ton code rpg concerné pour que l'on puisse t'aider sans ça on ne peut rien pour toi avec toute la bonne volonté du monde des nos membres "volontaires". Pense aussi à répondre aux questions posées

[karimas]

code:

FINPUT O F 500 DISK
D NOUVOBJ 10A VARYING

C eval nouvobj = %trimr('+bibobj+')

/ free

wligne= 'quote etc...';
except ecrire;

/end-free

le message apres compile
la definition de sous zone ou de parametre n'est pas indiqué dans un groupe!!!

merci pour l'aide que faire pour avoir le prog correct

[Mercure]

Code :

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

1
2
3
4
5
6
7
8
9
FInput     o  a e             disk
D NouvObj         s             10a   varying 

 /free

nouvobj = %trimr(bibobj);
wligne= 'quote etc...';
except ecrire;
/end-free

Je ne sais pas trop ce que tu comptes faire, mais faire du FTP de cette manière me paraît un tantinet euh... osé !

[jump400]

Je ne sais pas trop ce que tu comptes faire, mais faire du FTP de cette manière me paraît un tantinet euh... osé !

Bjr,

En quoi est-ce osé ?
J'ai souvent pratiqué cette technique de création de script ftp dynamiquement par un RPG sans soucis.
Y-a-t-il une meilleure solution ?

[Mercure]

Colle ici tout ton RPG pour qu'on y voie plus clair.

[Green Hornet]

le mélange de RPG 2, 3 et 4 est proprement imbuvable

[karimas]

Bonsoir,

Ca marche tres bien et merci encore à vous tous, et plus précisement à mercure qui a conduit à la finalisation du programme.

La fonctionnalité du prog,le rpgle recupère des varaibles d'entrée fichiersavf,bib destinataire, membre à restorer, adresse de la machine distante et restore soit le fichier soit le membre dans l'envirronnement souhaité.

C'est ma solution,mais si quelqu'un a quelque chose de plus sympa et plus simple why not !!!

Bonne soirée!! à bientôt pour un nouveau prog !!!