Il est possible maintenant de gérer des DTAQ de l'AS/400 avec PCS depuis votre micro. (version DOS étendu pour PCS/400) PCS doit être démarré, pour lancer la fonction DTAQ sous DOS utiliser la commande LOADDQ.puis l'une des commandes suivantes : (Pour toutes ces commandes il est conseillé d'utiliser le paramètre /Z qui empeche l'apparition du logo IBM.) CRTDTAQ (crée une dtaq sur AS/400) nom (nom de la DTAQ) /L=libname (nom de la bibliothèque) /M=lll (longueur maxi) /D (fera apparaitre une ligne de saisie pour le texte descriptif) /O=ordre (ordre de classement FIFO, LIFO, KEYED/ FIFO par défaut) /F (forcé sur mémoire auxilliaire) |
/A=aut (autorisations ALL,EXCLUDE,CHANGE,USE,LIBCRTAUT) /C=kkk (longueur de la clé) //nom-système DLTDTAQ (supprime une dtaq sur AS/400) nom (nom de la DTAQ) /L=libname (nom de la bibliothèque) //nom-système QRYDTAQ (extrait attributs d'une dtaq) ! prévoir une redirection ! des informations retournées nom (nom de la DTAQ) ! du type: ! /L=libname (nom de la bibliothèque) ! QRYDTAQ ... > fichier ! //nom-système ! |
Les attributs retournés sont, dans l'ordre : - lg maxi - ordre de classement - forcer sur mém aux. - infos ID émmetteur - texte (- lg clé) SNDDTAQ (écriture dans une DTAQ) nom (nom de la DTAQ) /L=bibli /N (pas de conversion ASCII/EBCDIC) /K=val (valeure de clé) //nom-système Les informations écrites doivent être redirigées en entrée sous forme SNDDTAQ nomdq < fichier |
RCVDTAQ (lecture d'une DTAQ) nom (nom de la DTAQ) /L=bibli /W=temps (spécifie un temps d'attente : xx = attendre xx secondes -1 = attente indéfinie ) si le paramètre n'est pas spécifié ==> 0 secondes. /N (pas de conversion ASCII/EBCDIC) /K=val (valeure de clé) /S=xx (ordre de recherche xx = EQ, GT, LT, GE, LE, NE) (paramètre obligatoire sir /K utilisé) //nom-système Les informations lues doivent être redirigées en sortie sous forme RCVDTAQ nomdq > fichier |
CLRDTAQ (lecture d'une DTAQ) nom (nom de la DTAQ) /L=bibli //nom-système STPDTAQ (arrete la fonction DTAQ sur ce PC) //nom-système RMVPCS DQ (décharge la fonction DTAQ de la mémoire) /F forcer l'arret et toujours /Z pour ne pas faire apparaître le logo IBM, et réduire le nombre de messages à l'écran. |
Ces fonction améliorent le dialogue PC-AS/400 permettent le dialogue PC-PC reliés à un même AS/400. Il est ainsi possible de transmettre une commande à exécuter sur un autre PC. PC1: SNCMD.BAT LOADDQ CRTDTAQ PCCMDDQ /L=QGPL /M=2000 CLRDTAQ PCCMDDQ /L=QGPL SNDDTAQ PCCMDDQ /L=QGPL /N /Z <COM.TXT STPDTAQ RMVPCS DQ /F PC2: RCCMD.BAT ERASE PCCOM.BAT LOADDQ RCVDTAQ PCCMDDQ /L=QGPL /W=120 /N /Z >PCCOM.BAT STPDTAQ RMVPCS DQ /F PCCOM |