Avalados por :
Estimados,
Les dejo este código en Visual Basic.NET para que puedan cambiar el folio de una factura que por error se le haya asignado, o porque se saltaron algún correlativo, etc.
Este método de modificación usando el DI API de SBO es legal, no como el Update desde SQL.
Para usarlo deben seguir simples pasos.
1) Descargar Visual Basic, puede ser la versión EXPRESS, o si ya tienen Visual Studio no lo hagan.
2) Inicien un nuevo proyecto de tipo CONSOLA
3) En la pestaña proyecto --> agregar referencias --> COM --> SAP Business one DI API 8.81 (si tienen 8.8 o 2007 aparecerá la versión que tengan)
4) Antes de pegar el código, ejecuten el proyecto en blanco, luego de eso pegan el siguiente código
Module Modificar_folio
Sub main()
'Definir variables
Dim oCompany As SAPbobsCOM.Company
Dim lRetCode, ErrorCode As Long
Dim ErrorMessage As String
'Iniciar objeto de la compañía
oCompany = New SAPbobsCOM.Company
'Definir datos de la conexión
oCompany.DbServerType = SAPbobsCOM.BoDataServerTypes.dst_MSSQL2008 //Tipo de BD
oCompany.DbUserName = "sa"
oCompany.DbPassword = "*****" //Contraseña usuario SA
oCompany.Server = "SERVER" //IP o servidor de SQL
oCompany.CompanyDB = "SBODemoCL" //BASE DE DATOS
oCompany.UserName = "manager"
oCompany.Password = "******" //contraseña usuario manager
oCompany.language = SAPbobsCOM.BoSuppLangs.ln_English //lenguaje de SQL, si está en español usa SAPbobsCOM.BoSuppLangs.ln_Spanish
oCompany.UseTrusted = False
'Conectar a la base de SAP B1
lRetCode = oCompany.Connect()
Dim Retval As Long
Dim Document As SAPbobsCOM.Documents
Document = oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oInvoices)
If Document.GetByKey(/*DocEntry del documento*/) = True Then
Document.FolioNumber = /*Folio que asignarás*/
Document.FolioPrefixString = "/*Prefijo del folio*/"
Retval = Document.Update()
Else
MsgBox("No se encontraron registros")
End If
Call o
¿Nicolas, significa que hay 246 facturas con folios que no corresponden?
Nicolás,
¿En qué país operas? Sube tu consulta al partner para que te ayuden.
Saludos
Felipe, ¿cómo puedo anular folios ya asignados en SAP B1 9.1? Por error, la factura fue emitida 246 veces y necesito reutilizar los folios...
Felipe, ¿cómo debo anular el folio?
contacto@primeinstitute.com
(+51) 1641 9379
(+57) 1489 6964
© 2024 Copyright. Todos los derechos reservados.
Desarrollado por Prime Institute
