Object --Not Named-- :
Porte
{Analysis}
Persistence
Transient
Multiple Instances
Yes
Messages
porte := Sélection ()