Code:
- C if (SHCO# <> 0)
- C/EXEC SQL DECLARE C1 CURSOR FOR
- C+ SELECT CMCSNAME, CMADDR1, CMCITY, CMCST#6, CMCST#3 FROM
- C+ CUSTML1 WHERE (CMCSNAME>=:SHCSNAME) AND CMCSNAME LIKE
- C+ :csgrpkwda AND (CMSRVCO#=:SHCO# and
- C+ CMDEL<>'D') ORDER BY CMCSNAME
- C/END-EXEC
- C*
- C else
- C/EXEC SQL DECLARE C1 CURSOR FOR
- C+ SELECT CMCSNAME, CMADDR1, CMCITY, CMCST#6, CMCST#3 FROM
- C+ CUSTML1 WHERE (CMCSNAME>=:SHCSNAME) AND CMCSNAME LIKE
- C+ :csgrpkwda AND CMDEL<>'D' ORDER BY CMCSNAME
- C/END-EXEC
- C endif
|
|