2022-07-20 20:08:12 -04:00

7 lines
138 B
Plaintext

**FREE
// Prototype for PRT program
dcl-pr PRT extpgm('PRT');
line char(132) const;
ctl char(10) const options(*nopass);
end-pr;