* Non exaustif, loin s'en faut !
* Look at the Doc :
* http://publib.boulder.ibm.com/infocenter/iseries/v5r4/index.jsp
* Si vous utilisez Wdsc, votre code se reflete dans la vue Structure
* Une zone alpha de 25 de long
D zonea25 S 25
* Une zone alpha de longueur variable, (jusqu'à 500 car. ici)
* Très pratique pour les opérations de chaine de caractère,
* évite les %trim.
D zoneav500 S 500 varying
* Une zone numérique de 7 chiffres dont 2 décimales
D zonen72 S 7 2
* Debout, les Huns !
D zoneb S N
D zone2b S N
* Tableau de 99 postes de numérique (5 0)
D arn S 5 0 dim(99)
* Un constante
D Chiffre C '1234567890'
* La date du jour
D Datedujour S D inz(*job)
* Une data-structure
D NomPrenomAge DS
D Nom 20
D Prenom 25
D Age 2 0
* Une 2° data-structure
* Les sous-zones sont qualifiées :
* npaq.nom = "toto"
* npaq.age = 19
*(Dans le même genre, cf. likeds et likerec)
D npaq DS qualified
D npa 47
D Nom 20 overlay(npa)
D Prenom 25 overlay(npa:*next)
D Age 2 0 overlay(npa:*next)
* Une data-structure à occurence multiple
D MoisMontant DS occurs(12)
D Mois 10
D MontantHT 9 2
