LigneCmd est une chaîne
LigneCmd="CCSID=DEC(5 0);RTVJOBA JOB(&JOB) USER(&USER) USRLIBL(&USRLIB) SYSLIBL(&SYSLIB) CCSID(&CCSID) CURLIB(&CURL)"
// les variables décimales doivent être déclarées de même pour un char de taille indéterminée
SI PAS ASAppelRtv(LigneCmd)ALORS
Info(ErreurInfo(errRésumé))
FIN
Info("Commande envoyée avec succès."+RC+"Ce retour ne signifie cependant pas la réussite de l'opération elle-même..."+RC+"Il faut tester la variable RC.")
sResultat est une chaîne
sResultat = ASResultatRtv("RC")
SI sResultat = "0" ALORS
SAI_USR=ASResultatRtv("USER")
SAI_USRLIBL=ASResultatRtv("USRLIB")
SAI_SYSLIBL=ASResultatRtv("SYSLIB")
SAI_JOB=ASResultatRtv("JOB")
SAI_CCS=ASResultatRtv("CCSID")
SINON
Info("Erreur de la commande : "+sResultat)
FIN