diff --git a/PRT_CL/PRTCL.zip b/PRT_CL/PRTCL.zip new file mode 100644 index 0000000..c54b474 Binary files /dev/null and b/PRT_CL/PRTCL.zip differ diff --git a/Utils/QRY.CMD b/Utils/QRY.CMD index d184ae2..4a20c89 100644 --- a/Utils/QRY.CMD +++ b/Utils/QRY.CMD @@ -2,7 +2,7 @@ /* CPP is QRYC */ PARM KWD(FILE) TYPE(QUAL) PROMPT('File Name') QUAL: QUAL TYPE(*NAME) MIN(1) - QUAL TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL + - *CURLIB)) PROMPT('Library') + QUAL TYPE(*NAME) DFT(*LIBL) SPCVAL((*LIBL) + + (*CURLIB)) PROMPT('Library') PARM KWD(SELECT) TYPE(*CHAR) LEN(1) DFT(N) + PROMPT('Select? (Y/N')