ValeurParDefautElement : Nul Ou Objet Virtuel Lecture Public;
Elle est utilisée lors d'une exportation pour une valeur ignorée.
Principal
/*******/
Variable
/******/
VE : Nul Ou ValeurElementaire;
Debut
...
Selon VE.ValeurElementaireType Faire
Cas ValeurElementaireTypeBinaire Faire
Ecran.Ecrire(Binaire(VE.ValeurParDefaut));
Fin Cas
Cas ValeurElementaireTypeCaractere Faire
Ecran.Ecrire(Caractere(VE.ValeurParDefaut));
Fin Cas
Cas ValeurElementaireTypeDate Faire
Ecran.Ecrire(Date(VE.ValeurParDefaut));
Fin Cas
Cas ValeurElementaireTypeEntier Faire
Ecran.Ecrire(Entier(VE.ValeurParDefaut));
Fin Cas
Cas ValeurElementaireTypeEnumere Faire
Ecran.Ecrire(Enumere(VE.ValeurParDefaut));
Fin Cas
Cas ValeurElementaireTypeReel Faire
Ecran.Ecrire(Reel(VE.ValeurParDefaut));
Fin Cas
Fin Selon
...
Fin Principal
- | - | - | - | - | - | - | - | - |