ValeurParDefautComposite : Nul Ou Objet Virtuel Lecture Public;
Elle est utilisée lors d'une exportation pour une valeur ignorée.
Principal
/*******/
Variable
/******/
VC : Nul Ou ValeurComposite;
Debut
...
Selon VC.ValeurCompositeType Faire
Cas ValeurCompositeTypeBinaire Faire
Ecran.Ecrire(Binaire(VC.ValeurParDefaut));
Fin Cas
Cas ValeurCompositeTypeCaractere Faire
Ecran.Ecrire(Caractere(VC.ValeurParDefaut));
Fin Cas
Cas ValeurCompositeTypeDate Faire
Ecran.Ecrire(Date(VC.ValeurParDefaut));
Fin Cas
Cas ValeurCompositeTypeEntier Faire
Ecran.Ecrire(Entier(VC.ValeurParDefaut));
Fin Cas
Cas ValeurCompositeTypeEnumere Faire
Ecran.Ecrire(Enumere(VC.ValeurParDefaut));
Fin Cas
Cas ValeurCompositeTypeReel Faire
Ecran.Ecrire(Reel(VC.ValeurParDefaut));
Fin Cas
Fin Selon
...
Fin Principal
- | - | - | - | - | - | - | - | - |