transmettre des sources au system hote

**mery007** · 30/05/2012, 10h09

Bonjout tout le monde,

je veux transmettre des programmes(as400,rpgle) au system hote,mais j'ai pas les droits..
je veux maintenire des grands programmes et c'est long de faire des copier coller des lignes ..
est ce que ya une commande ou quelque chose pour pouvoir recuperer les sources meme si je n''ai pas le droit?

Merci d'avance

**larry57** · 30/05/2012, 10h23

Bonjour merry,

Pour transmettre tes programmes, tu peux faire un SAVF(CRTSAVF) qui permettra de mettre tes programmes.
Ensuite, tu fait to SAVOBJ.
Après tu transferts ton savf sur ton autre system (SNDNETF) et après RSTOBJ.

Larry57

**pwrdwnsys** · 30/05/2012, 10h25

il faut faire du FTP

sur la cible, créer le membre de ton source à vide
sur la cible, se connecter en FTP à la source
récupérer le membre source :
- bin
- get bibliosource/qxxxsrc.membre bibliocible/qxxxsrc.membre (replace

**mery007** · 30/05/2012, 11h42

Bonjour Larry (CA FAIT UN BEAU TEMP,j'etai en congé

lol)
bonjour Thomas,
merci pour vos reponse ..
je suis pas trop system,je vai essayer les solutions une par une ..
maintnant j 'ai fait celle de larry ,et ca ne marche pas
les etapes :
1-j 'ai creer un dossier de sauvgarde
2-j'ai lancer la commande :
SAVOBJ OBJ(NOMPGM) LIB(BIBDU PGM) DEV(*SAVF) SAVF(MABIB/DOSSIER)

je recois le message suivant:Aucun objet de la bib de pgm n'a été sauvegardé ou restauré!!!!

est ce que c bien la demarche?

NOTE:j'ai pas les droits sur FTP ....

**mery007** · 30/05/2012, 12h18

Thomas et sans FTP?

**larry57** · 30/05/2012, 12h27

Bonjour,

SAVOBJ OBJ(*ALL) LIB(MALIBPGM) DEV(*SAVF) SAVF(TEST/TEST)
Si tu fait F1 au niveau du message, tu as quoi ?

Larry57

**mery007** · 30/05/2012, 12h33

voila ce que j'ai :

Cause . . . . . : Aucun objet n'a été sauvegardé ni restauré dans la
bibliothèque 'source', le 30/05/12 11:28:49. Des messages de diagnostic ont
été émis pour chacune des erreurs détectées. Il se peut que les objets non
restaurés correspondent à des objets partiellement restaurés pour lesquels
une action de reprise supplémentaire est nécessaire.
Que faire . . . : Appuyez sur F10 ou lancez la commande DSPJOBLOG (Afficher
l'historique du travail) pour obtenir plus d'informations sur ces erreurs.
Corrigez les erreurs éventuelles et renouvelez la demande.

**mery007** · 30/05/2012, 12h35

F10 sur le message me donne
prtogramme source non trouvé dans la bibliotheque !!

**larry57** · 30/05/2012, 12h37

Donc, tu fais DSPJOBLOG puis F10 et tu remontes.

Pour mon SAVF, j'ai par ex :
SAVOBJ OBJ(*ALL) LIB(MALIBPGM) DEV(*SAVF) SAVF(TEST/TEST)
1 logical access paths saved or restored.
1 logical access paths saved or restored.
2 logical access paths saved or restored.
2 logical access paths saved or restored.
3 logical access paths saved or restored.
30 objects saved from library MALIBPGM.

**mery007** · 30/05/2012, 12h38

OH desolée j ai fait un wrkobj l'objet est dans une autre bibliotheque .
donc la bibliotheque n etai pas juste ,maintenant ca marche
alors maintenant je fait quoi?

**mery007** · 30/05/2012, 12h39

la commande SNDNETF nessicite une adresse ???

**larry57** · 30/05/2012, 12h41

Tu fais SNDNETF vers ton user sur le system de destination.
Puis de l'autre côté : WRKNETF

**larry57** · 30/05/2012, 12h42

Tu met le nom de ton system

**mery007** · 30/05/2012, 12h50

vraiment désoléé mais c est un peu compliquer

voila ce que j' ai fait

SNDNETF FILE(mabib/DOSSIER) TOUSRID((monprofil monprofil))

est ce que c'est juste?on met le profil dans ID utilisateur et dans l'adresse?????

je recoi le mesage suivant:
Utilisateur non inscrit dans le répertoire de distribution du système.

**larry57** · 30/05/2012, 13h14

Si tu fais wrkdstq.

Si le service est KO, il va falloir utiliser d'autres outils...

Larry57

**Hédhili Jaïdane** · 30/05/2012, 13h22

Bonjour.

Pour SNDNETF, il faudrait que l'utilisateur monprofil soit inscrit dans le répertoire de distribution du système cible : WRKDIRE et ADDDIRE.

Sinon, si les 2 systèmes sont bien connectés en SNA même over TCP/IP, on peut faire directement des SAVRSTxxx.

N'empêche que FTP reste une bonne solution et bien maitrisable.

**larry57** · 30/05/2012, 13h27

Pour le FTP
STRTCPFTP RMTSYS(SYSDESTIN)
Namefmt 1
binary
Put /qsys.lib/MALIB.lib/MONSAVF.savf /qsys.lib/DESTLIB.lib/MONSAVF.savf
De ce fait, pas besoin de créer quoi que ce soit sur le system de destination.

Larry57

**mery007** · 30/05/2012, 13h32

euuuuuh ils sont pas pret (OOOOOFFF)
FTP c est maitrisable mais j ai pas le droit ...
donc d'apres ce que j'ai (pas de FTP et files d'attente de distribution à OFF et mon user n'est pas dans le repertoire )
je ne peux que copier coller ou scan ecran (pas mal comme solution si ya pas d'autre choix)

**Hédhili Jaïdane** · 30/05/2012, 13h33

Envoyé par mery007

euuuuuh ils sont pas pret (OOOOOFFF)
FTP c est maitrisable mais j ai pas le droit ...
donc d'apres ce que j'ai (pas de FTP et files d'attente de distribution à OFF et mon user n'est pas dans le repertoire )
je ne peux que copier coller ou scan ecran (pas mal comme solution si ya pas d'autre choix)

Essaie SAVRSTxxx

Sinon, si les 2 systèmes sont bien connectés en SNA même over TCP/IP, on peut faire directement des SAVRSTxxx.