[Ale]

Drv.IFOpBegin("ItemVenta")
        Drv.IFOpParamSet("Descripcion", "Item de prueba")
        Drv.IFOpParamFloatSet("Precio", 1.2345)
        Drv.IFOpParamFloatSet("IVA", 21.0)
        Drv.IFOpParamSet("CodigoProducto", "7791234567898")
        If (Drv.IFOpSend(1) = 0) Then
            CmdError("ItemVenta")
            Return
        End If
 
        Drv.IFOpBegin("Cerrar")
        If (Drv.IFOpSend(1) = 0) Then

hay un par de archivos con ejemplos en distintos lenguajes. la carpeta dice (VBnet).