BTQMAIN

Database

BTQMAIN

//TS@0OBSS JOB (00754533,,,9999),'KANMANI',CLASS=9,
// NOTIFY=TS@0OB,MSGCLASS=T
/*RESOURCE TERADATA
//STEP010 EXEC PGM=BTQMAIN
//STEPLIB DD DSN=DB.TS.TERADATA.TDB.APPLOAD,DISP=SHR
// DD DSN=SYS2.DB.TDB.TRLOAD,DISP=SHR
//INFILE DD DSN=TS@0OB.RDR.BUILD.CTLCARD(DATA),DISP=SHR
//SYSPRINT DD SYSOUT=*,DCB=(RECFM=VBA,LRECL=137)
//SYSABEND DD SYSOUT=*
//SYSTERM DD SYSOUT=*
//SAVEDATA DD DSN=TS@0OB.CYCLE.TEST38,DISP=(NEW,CATLG),
// UNIT=TDSTG,SPACE=(TRK,(1,1),RLSE),
// DCB=(LRECL=80,RECFM=FB,BLKSIZE=800)
//SYSIN DD DATA,DLM=##
.IMPORT DATA DDNAME=INFILE
.EXPORT DATA DDNAME=SAVEDATA
.SET SESSIONS 1
.SET ERROROUT STDERR
.SET ERROROUT STDERR
.LOGON C/KTHIAG2,KTHIAG2
USING CYCLE_TYPE(CHAR(1)),
FILLER (CHAR(79))
SELECT CYCLE_NUMBER FROM DMMKP_WORK.WORK_CURRENT_DAILY_CYCLE
WHERE CYCLE_TYPE =:CYCLE_TYPE;
.EXPORT RESET
.QUIT
This is my job.I get maxcc=0 but i dont get the o/p in the file.i have given 'D' in ts@0ob.rdr.build.ctlcard(data),i want where cycle_number='D'.
Pls tell wats the error in the query,why it is not woking.