LOCAL oCR
LOCAL oRpt

oCR = CREATEOBJECT(“CrystalRuntime.Application”)
oRpt = oCR.OpenReport(“myreport1.RPT”) && or you can pass a variable
IF oRpt.HasSavedData
oRpt.DiscardSavedData()
ENDIF
oRpt.PrintOut()

You can setup printer using this two options:
PrinterSetup( )
SelectPrinter( )