sdq_pcml est chaîne =[
<pcml version="4.0">
<program name="TESTDQ" >
<data name="data" type="char" length="200" usage="inputoutput"/>
<data name="key" type="char" length="10" usage="inputoutput"/>
</program>
</pcml>
]
HOuvreConnexion(MaConnexionpower8)
SI PAS ASEcritDataQueue(sdq_pcml, "*LIBL/DTAQ_KEY", MaConnexionpower8, "test", "AD") ALORS
Erreur("Echec écriture")
FIN
//Lecture
data est chaîne sur 50
SI PAS ASLitDataQueueCle(sdq_pcml, "*LIBL/DTAQ_KEY", "EQ", 2, True ,MaConnexionpower8, data, "AD") ALORS
Info("erreur lecture")
SINON
Info(data)
FIN