TransactionCourante : Nul Ou Transaction Lecture Public;
Les autres transactions ouvertes s'obtiennent en utilisant de proche en proche la propriété TransactionMere du type Transaction.
Principal
/*******/
Variable
/******/
T : Nul Ou Transaction;
Debut
...
T=TachePrincipale.TransactionCourante;
TantQue T!=Nul Faire
Ecran.Ecrire(T.NomTransaction+"\n");
/* Ecrit le nom des transactions. */
T=T.TransactionMere;
Fin TantQue
...
Fin Principal
- | - | - | - | - | - | - | - | - |