IBM i - CLP - Définition d'une structure de données

Dans un CLP, il est possible de définir une DS comme c'est habituellement le cas en RPG

 Par exemple, pour découper la variable NIR (N° INSEE) :

 DCL        VAR(&NIR)    TYPE(*CHAR) LEN(13)                                  
 DCL        VAR(&SEXE)   TYPE(*CHAR) STG(*DEFINED) LEN(1) DEFVAR(&NIR  1)     
 DCL        VAR(&ANNAIS) TYPE(*CHAR) STG(*DEFINED) LEN(2) DEFVAR(&NIR  2)     
 DCL        VAR(&MONAIS) TYPE(*CHAR) STG(*DEFINED) LEN(2) DEFVAR(&NIR  4)     
 DCL        VAR(&DPNAIS) TYPE(*CHAR) STG(*DEFINED) LEN(2) DEFVAR(&NIR  6)     
 DCL        VAR(&CMNAIS) TYPE(*CHAR) STG(*DEFINED) LEN(3) DEFVAR(&NIR  8)     
 DCL        VAR(&ORDRE)  TYPE(*CHAR) STG(*DEFINED) LEN(3) DEFVAR(&NIR 11)     
 DCL        VAR(&CLENIR) TYPE(*CHAR) STG(*DEFINED) LEN(2) DEFVAR(&NIR 14)    

Cette fonctionnalité n'est valide qu'à partir de la V5R4.