Dim shl As Shell
        Dim param As List=Array As String("/print","/copies=1","/CloseWhenDone","C:\B4JCassa\stampa_ricevuta.dtt")
        shl.Initialize("shl", "C:\B4JCassa\rptview.exe", param)
        shl.Run(-1)
        Wait For shl_ProcessCompleted (Success As Boolean, ExitCode As Int, StdOut As String, StdErr As String)
        Log(Success)
        Log(ExitCode)
        Log(StdOut)
        Log(StdErr)