Skip to content

Commit

Permalink
Update RUNSQLSRCC.CLP
Browse files Browse the repository at this point in the history
  • Loading branch information
richardschoen authored Feb 7, 2025
1 parent b630b2c commit e51d5d2
Showing 1 changed file with 3 additions and 4 deletions.
7 changes: 3 additions & 4 deletions RUNSQLSRCC.CLP
Original file line number Diff line number Diff line change
Expand Up @@ -88,12 +88,11 @@

/* Read SQL from source member, scan and replace values */
/* and update the temp SQL member file in QTEMP */
OVRDBF FILE(TMPSRCMBR) +
TOFILE(&SQLSRCLIB/&SQLSRCFILE) +
MBR(&SRCMBR) OVRSCOPE(*ACTGRPDFN)
OVRDBF FILE(TMPQRYSRC) TOFILE(QTEMP/TMPQRYSRC) +
MBR(*FIRST) OVRSCOPE(*ACTGRPDFN)
CALL PGM(RUNSQLSRCR) PARM(&PARMS &PARMVALS +
&RTNERROR)
DLTOVR FILE(TMPSRCMBR) LVL(*ACTGRPDFN)
DLTOVR FILE(TMPQRYSRC) LVL(*ACTGRPDFN)


/* If rtnerror <> '0', bail out now */
Expand Down

0 comments on commit e51d5d2

Please sign in to comment.