Print crystal report failed in SAP B1 add-ons

Question

I had develop a add-on for viewing Crystal Report in SAP B1 form. There was no problem in viewing and also the function in the crystal report viewer. (eg. export, search). The only problem is the print function in the crystal viewer cannot function at all. (Click on the button don't have trigger anything)
So anyone got suggestion on what happen to it? any others solution for it?
Is it possible i print it with SAP B1 print function?
I'm using:
- Crystal Report XI
- Reference used
       - CRAXDRT
       - CrystalActiveXReportViewerLib11
Thanks for any help and suggestion.

Answer 1

Hi hock,
i don't have hWnd set and its working.
my interface program is written in vb6 - so i guess its 0
or maybe it has something to do that i've this functions included.
i can't remember - iam developing too much things
Declare Function PEOpenEngine Lib "crpe32.dll" () As Integer
Declare Function PEGetErrorCode Lib "crpe32.dll" (ByVal printJob As Integer) As Integer
Declare Function PEOpenPrintJob Lib "crpe32.dll" (ByVal RptName As String) As Integer
Declare Function PEOutputToWindow Lib "crpe32.dll" ( _
                                                            ByVal printJob As Integer, _
                                                            ByVal Title As String, _
                                                            ByVal myLeft As Long, _
                                                            ByVal Top As Long, _
                                                            ByVal myWidth As Long, _
                                                            ByVal Height As Long, _
                                                            ByVal style As Long, _
                                                            ByVal PWindow As Long) As Integer
Declare Function PEOutputToPrinter Lib "crpe32.dll" ( _
                                                            ByVal printJob As Integer, _
                                                            ByVal nCopies As Integer) As Integer
Declare Function PEStartPrintJob Lib "crpe32.dll" ( _
                                                            ByVal printJob As Integer, _
                                                            ByVal WaitOrNot As Integer) As Integer
Declare Function PEClosePrintJob Lib "crpe32.dll" (ByVal printJob As Integer) As Integer
Declare Sub PECloseEngine Lib "crpe32.dll" ()
try it
regards
David