public SAPbouiCOM.DataTable GenerarEncabezado(SAPbouiCOM.DataTable DT_SQL, SAPbouiCOM.DataTable DT_HEAD)
{
try
{
string FechaPago = DT_SQL.GetValue(0, 0).ToString();
string CantidadPagos = DT_SQL.GetValue(0, 1).ToString();
string MontoPagos = DT_SQL.GetValue(0, 2).ToString();//.Replace(".","");
string[] SeparaTotal = MontoPagos.Split('.');
string MontoEntero = SeparaTotal[0];
string MontoDecimal = SeparaTotal.Count() == 1 ? "00" : MontoPagos.Split('.')[1];
string sql = @"EXEC [dbo].[Min_Bancos_Generar_Encabezado_Archivo_PagoTXT]
@U_FechaPago = N'" + FechaPago + @"',
@U_CantidadPago = N'" + CantidadPagos + @"',
@U_MontoTotal = N'" + MontoEntero + MontoDecimal + "'";
DT_HEAD.ExecuteQuery(sql);
//Hay que establecer la columana de tipo TEXT para que puedan agregarse posteriormente los rgistros de detalle
string RC = DT_HEAD.GetValue(0, 0).ToString().Trim();
DT_HEAD.Clear();
DT_HEAD.Columns.Add("Info", SAPbouiCOM.BoFieldsType.ft_Text);
DT_HEAD.Rows.Add(1);
DT_HEAD.SetValue("Info", 0, RC);
//DT_HEAD.SetValue("Info", 0, "RC00354803021120160000100000000016184000578509689910000968991000 [email protected]");
}
catch (Exception) {}
return(DT_HEAD);
}
/// <summary>
/// Method InsertConfig
///
/// </summary>
/// <remarks>@author RCordova-2017/08/18</remarks>
public void InsertConfig()
{
mDtInspD.Clear();
mObjMtxInspDetails.Clear();
btnAdd.Item.Enabled = true;
//btnMod.Item.Enabled = false;
btnOk.Item.Enabled = true;
lIntHeadRejCounter = Convert.ToInt32(mlstInspection.Sum(x => x.RE) + mlstInspection.Sum(x => x.NP));
}
private SAPbouiCOM.DataTable Convert_SAP_DataTable(System.Data.DataTable pDataTable)
{
SAPbouiCOM.DataTable oDT = null;
SAPbouiCOM.Form oForm = SAPbouiCOM.Framework.Application.SBO_Application.Forms.ActiveForm;
if (CheckExistUniqueID(oForm, "DT_SubList"))
{
oDT = oForm.DataSources.DataTables.Item("DT_SubList");
oDT.Clear();
}
else
{
oDT = oForm.DataSources.DataTables.Add("DT_SubList");
}
//Add column to DataTable
foreach (System.Data.DataColumn c in pDataTable.Columns)
{
try
{
if (c.DataType.ToString() == "System.DateTime")
{
oDT.Columns.Add(c.ColumnName, SAPbouiCOM.BoFieldsType.ft_Date);
}
else
{
oDT.Columns.Add(c.ColumnName, SAPbouiCOM.BoFieldsType.ft_Text);
}
}
catch
{ }
}
//Add row to DataTable
foreach (System.Data.DataRow r in pDataTable.Rows)
{
oDT.Rows.Add();
foreach (System.Data.DataColumn c in pDataTable.Columns)
{
if (c.DataType.ToString() == "System.DateTime")
{
oDT.SetValue(c.ColumnName, oDT.Rows.Count - 1, r[c.ColumnName]);
}
else
{
oDT.SetValue(c.ColumnName, oDT.Rows.Count - 1, r[c.ColumnName].ToString());
}
}
}
return(oDT);
}
public SAPbouiCOM.DataTable ObtenerParametrosTXT(SAPbouiCOM.DataTable DT_PARAM)
{
SAPbobsCOM.GeneralService oGeneralService;
SAPbobsCOM.GeneralData oGeneralData = null;
SAPbobsCOM.GeneralDataParams oGeneralParams;
SAPbobsCOM.CompanyService oCmpSrv;
SAPbobsCOM.Company oCompany = Conexion.oCompany;
try
{
//get company service
if (!oCompany.Connected)
{
Funciones.Conectar_Aplicacion();
}
oCmpSrv = oCompany.GetCompanyService();
//Get GeneralService - Main UDO - Retrieve the relevant service
oGeneralService = oCmpSrv.GetGeneralService("Z_MIN_TXTPAGOS");
//GetByKey
oGeneralParams = (SAPbobsCOM.GeneralDataParams)oGeneralService.GetDataInterface(SAPbobsCOM.GeneralServiceDataInterfaces.gsGeneralDataParams);
oGeneralParams.SetProperty("Code", "1");
oGeneralData = oGeneralService.GetByParams(oGeneralParams);
DT_PARAM.Clear();
DT_PARAM.Columns.Add("Info", SAPbouiCOM.BoFieldsType.ft_Text);
DT_PARAM.Rows.Add(13);
DT_PARAM.SetValue("Info", 0, oGeneralData.GetProperty("U_TipoRegistro"));
DT_PARAM.SetValue("Info", 1, oGeneralData.GetProperty("U_Multifecha"));
DT_PARAM.SetValue("Info", 2, oGeneralData.GetProperty("U_Modalidad"));
DT_PARAM.SetValue("Info", 3, oGeneralData.GetProperty("U_Convenio"));
DT_PARAM.SetValue("Info", 4, oGeneralData.GetProperty("U_TipoPago"));
DT_PARAM.SetValue("Info", 5, oGeneralData.GetProperty("U_CodigoPlantilla"));
DT_PARAM.SetValue("Info", 6, oGeneralData.GetProperty("U_RUTEmpresa"));
DT_PARAM.SetValue("Info", 7, oGeneralData.GetProperty("U_RUTFilial"));
DT_PARAM.SetValue("Info", 8, oGeneralData.GetProperty("U_CorreoEmp"));
DT_PARAM.SetValue("Info", 9, oGeneralData.GetProperty("U_PlantillaRendici"));
DT_PARAM.SetValue("Info", 10, oGeneralData.GetProperty("U_DirectorioBanco"));
DT_PARAM.SetValue("Info", 11, oGeneralData.GetProperty("U_DirectorioRespaldo"));
DT_PARAM.SetValue("Info", 12, oGeneralData.GetProperty("U_FlujoActivo"));
}
catch (Exception) {}
return(DT_PARAM);
}
private SAPbouiCOM.DataTable Convert_SAP_DataTable(System.Data.DataTable pDataTable)
{
SAPbouiCOM.DataTable oDT = null;
SAPbouiCOM.Form oForm = oApp.Forms.ActiveForm;
if (CheckExistUniqueID(oForm, "DT_BALS"))
{
oDT = oForm.DataSources.DataTables.Item("DT_BALS");
oDT.Clear();
}
else
{
oDT = oForm.DataSources.DataTables.Add("DT_BALS");
}
//Add column to DataTable
foreach (System.Data.DataColumn c in pDataTable.Columns)
{
try
{
if (c.DataType.ToString() == "System.DateTime")
{
oDT.Columns.Add(c.ColumnName, SAPbouiCOM.BoFieldsType.ft_Date);
}
//else if (c.DataType.ToString() == "System.Int16")
//{
// oDT.Columns.Add(c.ColumnName, SAPbouiCOM.BoFieldsType.ft_Integer);
//}
//else if (c.DataType.ToString() == "System.Decimal")
//{
// oDT.Columns.Add(c.ColumnName, SAPbouiCOM.BoFieldsType.ft_Sum);
//}
else
{
oDT.Columns.Add(c.ColumnName, SAPbouiCOM.BoFieldsType.ft_Text);
}
}
catch
{ }
}
//Add row to DataTable
foreach (System.Data.DataRow r in pDataTable.Rows)
{
oDT.Rows.Add();
//foreach (System.Data.DataColumn c in pDataTable.Columns)
for (int i = 0; i < pDataTable.Columns.Count; i++)
{
//oDT.SetValue( c.ColumnName, oDT.Rows.Count - 1, r[c.ColumnName].ToString());
string Col_Name = pDataTable.Columns[i].ColumnName;
if (i > 3)
{
decimal tmp = 0;
decimal.TryParse(r[Col_Name].ToString(), out tmp);
if (tmp != 0)
{
oDT.SetValue(Col_Name, oDT.Rows.Count - 1, tmp.ToString("N0").Replace(',', '.'));
}
}
else
{
oDT.SetValue(Col_Name, oDT.Rows.Count - 1, r[Col_Name].ToString());
}
}
}
return(oDT);
}
public SAPbouiCOM.DataTable GenerarRegistros(SAPbouiCOM.DataTable DT_SQL, SAPbouiCOM.DataTable DT_DATOS, SAPbouiCOM.DataTable DT_ROWS)
{
try
{
oCompany = Program.oCompany;
SAPbobsCOM.Recordset recordset = (SAPbobsCOM.Recordset)oCompany.GetBusinessObject(SAPbobsCOM.BoObjectTypes.BoRecordset);
string sql = "";
string sNumPago = "";
int iNumAviso = 0;
DT_SQL.Clear();
DT_ROWS.Clear();
DT_ROWS.Columns.Add("Info", SAPbouiCOM.BoFieldsType.ft_Text);
for (int i = 0; i <= DT_DATOS.Rows.Count - 1; i++)
{
string val = DT_DATOS.GetValue(0, i).ToString();
if (DT_DATOS.GetValue(0, i).ToString() == "Y") //Registros Seleccionados
{
iNumAviso += 1;
sNumPago = DT_DATOS.GetValue(2, i).ToString();
//sql = @"EXEC [dbo].[Min_Bancos_Generar_Detalle_Pagos_Archivo_PagoTXT_Formato610]
// @NumPago = N'" + sNumPago + @"'
// ,@NumeroAviso = '" + iNumAviso.ToString() + "'";
//DT_SQL.ExecuteQuery(sql);
//recordset.DoQuery(sql);
//recordset.MoveFirst();
//if (!DT_SQL.IsEmpty)
//{
// for (int j = 0; j <= DT_SQL.Rows.Count - 1; j++)
// {
// var Linea = DT_SQL.GetValue(0, j);
// var Linea2 = recordset.Fields.Item(0).Value;
// recordset.MoveNext();
// DT_ROWS.Rows.Add();
// DT_ROWS.SetValue(0, DT_ROWS.Rows.Count - 1, DT_SQL.GetValue(0, j).ToString());
// //Linea = Convert.ToString(DT_ROWS.GetValue(0, DT_ROWS.Rows.Count - 1));
// }
//}
// SE DEBIO USAR System.Dat.DataTable porque el DT de SAP truncaba los resultado del SP
DataTable DtResultado = new DataTable();
SqlConnection SlqCon = new SqlConnection();
try
{
string sp = @"EXEC [" + oCompany.CompanyDB + @"].[dbo].[Min_Bancos_Generar_Detalle_Pagos_Archivo_PagoTXT_Formato610]
@NumPago = N'" + sNumPago + @"'
,@NumeroAviso = '" + iNumAviso.ToString() + "'";
SlqCon.ConnectionString = Conexion.CnSQL;
SqlCommand SqlCmd = new SqlCommand(sp, SlqCon);
SlqCon.Open();
//SqlCmd.CommandType = CommandType.Text;
//SqlCmd.Parameters.AddWithValue("@NumPago", sNumPago);
//SqlCmd.Parameters.AddWithValue("@NumeroAviso", iNumAviso.ToString());
SqlDataAdapter SqlDat = new SqlDataAdapter(SqlCmd);
SqlDat.Fill(DtResultado);
}
catch
{
DtResultado = null;
}
finally
{
if (SlqCon.State == ConnectionState.Open)
{
SlqCon.Close();
}
}
if (DtResultado.Rows.Count > 0)
{
for (int j = 0; j <= DtResultado.Rows.Count - 1; j++)
{
var Linea = DtResultado.Rows[j][0];
DT_ROWS.Rows.Add();
DT_ROWS.SetValue(0, DT_ROWS.Rows.Count - 1, Linea);
//Linea = Convert.ToString(DT_ROWS.GetValue(0, DT_ROWS.Rows.Count - 1));
}
}
}
}
}
catch (Exception) { }
return(DT_ROWS);
}