sdq_pcml est chaîne =[
<pcml version="4.0">
<program name="TESTDQ" >
<data name="data" type="char" length="50" usage="input"/>
</program>
</pcml>
]
HOuvreConnexion(MaConnexionpower8)
SI PAS ASEcritDataQueue(sdq_pcml, "*LIBL/DTAQ_FIFO", MaConnexionpower8, "test3") ALORS
Erreur("Echec écriture")
FIN
//Lecture
data est chaîne sur 50
SI PAS ASLitDataQueue(sdq_pcml, "*LIBL/DTAQ_FIFO", 2, True ,MaConnexionpower8, data) ALORS
Info("erreur lecture")
SINON
Info(data)
FIN