SAPbobsCOM.GeneralService oGeneralService;
SAPbobsCOM.GeneralData oGeneralData;
SAPbobsCOM.GeneralData oChild;
SAPbobsCOM.GeneralDataCollection oChildrenDestino;
SAPbobsCOM.BusinessPartners ObjProveedor = (SAPbobsCOM.BusinessPartners)TConstantes.SBOLDObjeto.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oBusinessPartners);
SAPbobsCOM.Currencies ObjMoneda = (SAPbobsCOM.Currencies)TConstantes.SBOLDObjeto.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oCurrencyCodes);
SAPbobsCOM.Items ObjArticulo = (SAPbobsCOM.Items)TConstantes.SBOLDObjeto.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oItems);
pForma.Freeze(true);
string Code = "";
string CodeAnterior = "";
double Costo_Bruto_Total = 0;
double Costo_Neto_Total = 0;
double Descuento_Total = 0;
double Cubicaje_Total = 0;
double Peso_Total = 0;
string Fecha = TConstantes.SBOLDObjeto.SBO_Application.Company.ServerDate;
SAPbobsCOM.CompanyService sCmp;
sCmp = TConstantes.SBOLDObjeto.Company.GetCompanyService();
//Get GeneralService (oCmpSrv is the CompanyService)
oGeneralService = sCmp.GetGeneralService("LDT_OCEXT_ENC");
oGeneralData = (SAPbobsCOM.GeneralData)oGeneralService.GetDataInterface(SAPbobsCOM.GeneralServiceDataInterfaces.gsGeneralData);
oChildrenDestino = oGeneralData.Child("LDT_OCEXT_DET");
SAPbobsCOM.Company oCompany =(SAPbobsCOM.Company)TConstantes.SBOLDObjeto.Company;
SAPbobsCOM.AdminInfo oAdminInfo = oCompany.GetCompanyService().GetAdminInfo();
String MonedaSistema = oAdminInfo.SystemCurrency;