sdq_pcml est chaîne = [
<pcml version="4.0">
<program name="ExampleDQK" >
<data name="data" type="char" length="200" usage="input"/>
<data name="key" type="char" length="10" usage="input"/>
</program>
</pcml>
]
SI PAS ASEcritDataQueue(sdq_pcml, "*LIBL/DTAQ_KEY", MaConnexion, sDon, sCle) ALORS
Erreur("Echec écriture")
FIN