// Definition of a constant
DCL-C max_size 100;
DCL-C max_size CONST(100);
DCL-C file_name 'example.txt';
// Variable definition
DCL-S file_name CHAR(10); CHAR(bytes) ... bytes count between 1 and 16,773,104
DCL-C msg_len 5000;
DCL-S message CHAR(msg_len); (5000 bytes)
DCL-S city VARCHAR(33); VARCHAR(bytes).. bytes count between 1 and 16,773,104
DCL-S cmdparm VARCHAR(10:4); :2 or 4 byte prfx stores the length of the item
DCL-S some_number INT(10); INT(digits) ...