01 var-long-str PIC X(20) VALUE 'HELLO!'. 01 var-name PIC X(20) VALUE 'name'. 01 var-surname PIC X(20) VALUE 'name'. 01 var-rest PIC X(20).