Update QSHQRYSRCC.CLP

richardschoen · Feb 7, 2025 · 2f2d0e3 · 2f2d0e3
1 parent e1c0cb2
commit 2f2d0e3
Showing 1 changed file with 3 additions and 2 deletions.
diff --git a/QSHQRYSRCC.CLP b/QSHQRYSRCC.CLP
@@ -272,11 +272,12 @@
 
              /* Delete temporary source file */
              /* If selected.                 */
-             IF         COND(&SQLLOC *EQ *IFSFILE) THEN(DO)
+             /* IF         COND(&SQLLOC *EQ *IFSFILE) THEN(DO) */
              IF         COND(&DLTTMPSRC *EQ *YES) THEN(DO)
              DLTF       FILE(QTEMP/TMPQRYSRC)
+             MONMSG     MSGID(CPF0000)
              ENDDO
-             ENDDO
+            /*  ENDDO */
 
 /* If enabled, add a unique identify column to the table with values */
              IF         COND(&CRTIDCOL *EQ *YES) THEN(DO)