Decision tables: Difference between revisions
Content added Content deleted
(→{{header|REXX}}: added visual comments and removed two other comments, showed an alternative requirement format. -- ~~~~) |
m (→{{header|REXX}}: added a comment. -- ~~~~) |
||
Line 742:
* a method of allowing the user to quit the interrogation
<lang rexx>/*REXX pgm demonstrates a decision table and possible corrective actions*/
ask.=
ask.1='Does the printer not print?'
Line 785 ⟶ 784:
if possible==0 then say 'No solutions given for the information supplied.'
exit /*stick a fork in it, we're done.*/
/*───────────────────────────────────ASKER subroutine───────────────────*/
asker: arg ?; oops=0; Qprefix=copies('─',9) '(question' ? "of" set') '
| |||