You can define your variables everywhere, *> they will be copied in WORKING-STORAGE SECTION. 01 text-1 pic x(30) value "Welcome in Hotel Triton!". 01 price pic 9(3). 01 price-disp pic ZZ9. ?>
Price with breakfast: Euro