/* provide proper declarations for PL/I symbolic debugger: */
dcl ( double_quotes initial(1), no_double_quotes initial(0) ) fixed bin(7) static, /*values for switch argument*/
    type_string entry(char(*) varying, fixed bin(7)/*double_quotes or no_double_quotes*/);