Has anyone created a calendar using mscal.ocx

sdk development
1

We are trying to create a calendar that when you click on the date the appropriate results from a query are displayed. Has anyone created the script for this to run?

Or does this work at all with BusinessObjects using mscal.ocx?

Any suggestions or scripts would be greatly appreciated… :?:

Mike V :canada: (BOB member since 2002-08-15)

2

To use mscal.ocx you need to

  1. Add the reference from c:\Program files\microsoft office\office1X\mscal.ocx.

  2. Add the control to the toolbox.

  3. Addd the calendar control to the form.

  4. From a report create a criteria range with prompts "StartDate: and “EndDate:”
    busobj.ActiveDocument.Variables(“StartDAte:”).Value = Calendar1.Value
    busobj.ActiveDocument.Variables(“EndDAte:”).Value = Calendar2.Value

  5. If the field that you are applying the criteria to is a Date field Type, then you need to Right Click on the Data Tree and EDIT DATA Provider.

C;lick on the Show SQL button

Convert the dates using the SQL Cdate function.
If not, BO passes the calendar date values as text. Which if you were selecting “01/01/01” to “01/01/03” would give you the following:
01/01/01
01/01/02
01/01/03
instead of the full set of date for the 3 years.
I use B0 5.18 :stuck_out_tongue:

rh.RHCHGD,
sum(rh.RHRCAM),
count(rh.RHRST),
glperiods.CMFQTR,
glperiods.CMFWEK,
Table__3.RSTDESC
FROM
glperiods,
rh,
REserve Types RST Table__3
WHERE
( rh.RHRST=Table__3.RSTCD1 )
AND ( rh.RHRSBT=Table__3.RSTCD2 )
AND ( glperiods.Hundredyear=rh.RHCHGD )
AND (
glperiods.Fdate >= cDate(@variable(‘StartDAte:’))
AND glperiods.Fdate <= cDate(@variable(‘EndDAte:’))
)
GROUP BY
glperiods.Fdate,
rh.RHACI#,
rh.RHRST,
rh.RHRSBT,
rh.RHCC,
rh.RHCHGD,
glperiods.CMFQTR,
glperiods.CMFWEK,
Table__3.RSTDESC

syspence (BOB member since 2007-04-14)