lnResult=SQLEXEC(gnConnHandle,"exec sp_DisplaySchedule ?gdLoadF,?gdLoadT, ?<b>gnViewDept</b>")

>
>gdLoadF=DTOC(DATE())
>gdLoadF=CTOT(gdLoadF+" 00:00:00")
>
>gdLoadT=DTOC(DATE())
>gdLoadT=CTOT(gdLoadT+" 23:59:00")
>
>lnResult=SQLEXEC(gnConnHandle,"exec sp_DisplaySchedule ?gnViewDept,?gdLoadF,?gdLoadT")
>
>IF lnResult < 1
>   aError(lcErrtxt)
>   DO disperr
>ENDIF
>
>