1 DECLARE
1 DCL
2 variable-name
2 (
2.1+ ,
2.1 variable-name
2.2 )
3 CHARACTER
3 CHAR
4? 
4 ( length )
5? 
5 VARYING
5 VAR
6? Alignment and/or Scope and/or Storage
7 ;