Impecable Diego ¡! Y gracias, lo traduzc a C# en visual Studio2008 a ver que pasa
From: [email protected] [mailto:[email protected]] On Behalf Of Diego A. Montero Sent: lunes, 07 de septiembre de 2009 14:30 To: vbusers List Member Subject: [vbusers] OT HASAR Nota Credito Te paso las sentencias que utilizo para imprimir Notas de Créditos en la Hasar (VB6): Inicializo (siempre tengo que enviar contra que comprobante hago la NC slComan = Chr$(147) & Chr$(28) & "1" & Chr$(28) & 0001-00002382 HasarFP.Enviar slComan Encabezado slComan = Chr$(98) slComan = slComan & Chr$(28) & Right("0000" & objConec.strFactura.lCodCli, 4) & " - " & objConec.strFactura.sNombre If vlTipoC = NOTA_CREDITO_B Then slComan = slComan & Chr$(28) & IIf(Val(objConec.strFactura.sN_CUIT) = 0, "9", Val(objConec.strFactura.sN_CUIT)) slComan = slComan & Chr$(28) & "C" slComan = slComan & Chr$(28) & "2" slComan = slComan & Chr$(28) & " " Else slComan = slComan & Chr$(28) & objConec.strFactura.sN_CUIT slComan = slComan & Chr$(28) & objConec.strFactura.sTipIVA slComan = slComan & Chr$(28) & "C" slComan = slComan & Chr$(28) & objConec.strFactura.sDomici & " " End If HasarFP.Enviar slComan HasarFP.Encabezado(8) = "" HasarFP.Encabezado(9) = "" HasarFP.Encabezado(10) = "" Select Case vlTipoC Case "NC-A" slComan = Chr$(128) & Chr$(28) & "R" & Chr$(28) & "T" Case "NC-B" slComan = Chr$(128) & Chr$(28) & "S" & Chr$(28) & "T" Case "ND-A" slComan = Chr$(64) & Chr$(28) & "D" & Chr$(28) & "T" Case "ND-B" slComan = Chr$(64) & Chr$(28) & "E" & Chr$(28) & "T" Case "RC-X" slComan = Chr$(128) & Chr$(28) & "x" & Chr$(28) & "T" & Chr$(28) & Right("0000" & Trim(Str(strFactura.iPrefij)), 4) & "-" & Right("00000000" & Trim(Str(strFactura.dNroCom)), 8) End Select HasarFP.Enviar slComan Detalle de la NC If strFactura.sLetCmp = "A" Then HasarFP.ImprimirItem Left(slDet, 20), Round(dlPre, 3), dlCnt, dlAlc, dlImp Else HasarFP.ImprimirItem Left(slDet, 20), Round(dlPre * (1 + (dlAlc / 100)), 3), dlCnt, dlAlc, dlImp End If HasarFP.Subtotal True Cierro el comprobante HasarFP.Enviar Chr$(129) Finalizo HasarFP.Finalizar _____ From: [email protected] [mailto:[email protected]] On Behalf Of Ricardo Macrino Sent: Lunes, 7 de Septiembre de 2009 13:54 To: vbusers List Member Subject: [vbusers] OT HASAR Nota Credito Hola lista, haciendo un sistema de Facturacion con C# (OCX de Hasar version 051122) en VS2008 , (impresora MODELO_P320) ya casi listo pero me encontre con Error al tratar de hacer Notas de Credito no me aparece el metodo "DocumentoDeReferencia" marcado en el manual alguna idea de como solucionar esto? desde ya gracias y perdon por el OT -- Ricardo A. Macrino Sistemas Microsoft Puntonet c# Capital Federal - Rep. Argentina
