/// <summary>
/// Método que genera el comprobante contable del aviso
/// </summary>
/// <returns>Retorna el id del comprobante contable</returns>
private int _Mtd_GenerarComprobante()
{
_G_Str_SentenciaSQL = "SELECT ctipdocavisocobro FROM TCONFIGCXC WHERE CCOMPANY='" + Frm_Padre._Str_Comp + "'";
string _Str_TipoDocAviso = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_G_Str_SentenciaSQL).Tables[0].Rows[0][0].ToString();
//-------------------------------------------------------
string _Str_ProcesoCont = "P_BCO_CHQ_CIAREL";
Clases._Cls_ProcesosCont _Cls_Proceso_Cont = new T3.Clases._Cls_ProcesosCont(_Str_ProcesoCont);
string _Str_Cconceptocomp = _Cls_Proceso_Cont._Field_ConceptoComprobante;
string _Str_Ctypcompro = _Cls_Proceso_Cont._Field_TipoComprobante;
//-------------------------------------------------------
int _Int_Comprobante = _myUtilidad._Mtd_Consecutivo_TCOMPROBANC();
string _Str_Cadena = "INSERT INTO TCOMPROBANC (ccompany,cidcomprob,ctypcomp,cname,cyearacco,cmontacco,cregdate,ctotdebe,ctothaber,cbalance,cdateadd,cuseradd,clvalidado,cstatus) VALUES ('" + Frm_Padre._Str_Comp + "','" + _Int_Comprobante + "','" + _Str_Ctypcompro + "','" + _Str_Cconceptocomp + "','" + Clases._Cls_ProcesosCont._Mtd_ContableAno(_Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate())) + "','" + Clases._Cls_ProcesosCont._Mtd_ContableMes(_Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate())) + "','" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(Convert.ToDouble(_Mtd_TotalDebeHaber(3))) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(Convert.ToDouble(_Mtd_TotalDebeHaber(4))) + "','0',GETDATE(),'" + Frm_Padre._Str_Use + "','1','9')";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
//-------------------------------------------------------
object _Ob_DebeD = new object();
object _Ob_HaberD = new object();
string _Str_DescripD = "";
int _Int_Contador = 0;
string _Str_Numdocu = "";
string _Str_TipoDocumento = "";
foreach (DataGridViewRow _Dg_Row in _Dg_Comprobante.Rows)
{
if (_Dg_Row.Cells[0].Value != null)
{
if (_Dg_Row.Cells[0].Value.ToString().Trim().Length > 0)
{
_Int_Contador++;
_Ob_DebeD = _Dg_Row.Cells[3].Value;
if (_Ob_DebeD == null)
{
_Ob_DebeD = 0;
}
else if (_Ob_DebeD.ToString().Trim().Length == 0)
{
_Ob_DebeD = 0;
}
//---------------------------
_Ob_HaberD = _Dg_Row.Cells[4].Value;
if (_Ob_HaberD == null)
{
_Ob_HaberD = 0;
}
else if (_Ob_HaberD.ToString().Trim().Length == 0)
{
_Ob_HaberD = 0;
}
//---------------------------
_Str_DescripD = Convert.ToString(_Dg_Row.Cells[2].Value).Trim().ToUpper();
//------------------------------------------------------------------------
if (_Int_Contador > _G_Str_AvisosCobros.Length)
{
_Str_Numdocu = "";
if (_Rbt_Cheque.Checked)
{
_Str_TipoDocumento = "CHEQ";
}
else
{
_Str_TipoDocumento = "TRANSF";
}
}
else
{
_Str_Numdocu = _G_Str_AvisosCobros[_Int_Contador - 1];
_Str_TipoDocumento = _Str_TipoDocAviso;
}
_Str_Cadena = "INSERT INTO TCOMPROBAND (ccompany,cidcomprob,corder,ccount,cdescrip,ctdocument,cnumdocu,cdatedocu,ctotdebe,ctothaber,cdateadd,cuseradd)";
_Str_Cadena += " VALUES('" + Frm_Padre._Str_Comp + "','" + _Int_Comprobante.ToString() + "','" + (_Dg_Row.Index + 1) + "','" + Convert.ToString(_Dg_Row.Cells[0].Value).Trim() + "','" + _Str_DescripD + "','" + _Str_TipoDocumento + "','" + _Str_Numdocu + "',GETDATE(),'" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(Convert.ToDouble(_Ob_DebeD)) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(Convert.ToDouble(_Ob_HaberD)) + "',GETDATE(),'" + Frm_Padre._Str_Use + "')";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
//if (Convert.ToDouble(_Ob_DebeD) > 0)
//{
// CLASES._Cls_Varios_Metodos._Mtd_InsertAuxiliarCont(_Int_Comprobante.ToString(), Convert.ToString(_Dg_Row.Cells[0].Value).Trim(), _Str_Proveedor, _Str_DescripD, Convert.ToString(_Txt_TipoDoc.Tag).Trim(), _Txt_Documento.Text.Trim().ToUpper(), _Cls_Formato._Mtd_fecha(_Dtp_Emision.Value), _Cls_Formato._Mtd_fecha(_Dtp_Vencimiento.Value), CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(Convert.ToDouble(_Ob_DebeD)), Clases._Cls_ProcesosCont._Mtd_ContableMes(_Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate())), Clases._Cls_ProcesosCont._Mtd_ContableAno(_Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate())), "D");
//}
//else
//{
// CLASES._Cls_Varios_Metodos._Mtd_InsertAuxiliarCont(_Int_Comprobante.ToString(), Convert.ToString(_Dg_Row.Cells[0].Value).Trim(), _Str_Proveedor, _Str_DescripD, Convert.ToString(_Txt_TipoDoc.Tag).Trim(), _Txt_Documento.Text.Trim().ToUpper(), _Cls_Formato._Mtd_fecha(_Dtp_Emision.Value), _Cls_Formato._Mtd_fecha(_Dtp_Vencimiento.Value), CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(Convert.ToDouble(_Ob_HaberD)), Clases._Cls_ProcesosCont._Mtd_ContableMes(_Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate())), Clases._Cls_ProcesosCont._Mtd_ContableAno(_Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate())), "H");
//}
}
}
}
return(_Int_Comprobante);
}
private string _Mtd_Proceso_P_CXC_FACTANUL(double _Pr_Dbl_MontoTotal)
{
var _Var_Datos = from Campos in _Dg_Grid.Rows.Cast <DataGridViewRow>()
where Convert.ToString(Campos.Cells["_Dg_GridCol_Print"].Value).Trim() == "1" & Convert.ToInt32(Campos.Cells["_Dg_GridCol_cidcomprobanul"].Value) > 0
select Convert.ToString(Campos.Cells["_Dg_GridCol_cidcomprobanul"].Value).Trim();
//-------------------------------------------------------------------
if (_Var_Datos.Count() > 0)
{
return(_Var_Datos.First());
}
else
{
string _Str_cidcomprob = "";
string _Str_cconceptocomp = "";
string _Str_ctypcompro = "";
string _Str_cyearacco = "";
string _Str_cmontacco = "";
string _Str_ccount = "";
string _Str_ctdocument = "";
string _Str_ccountName = "";
string _Str_cdescrip = "";
string _Str_FechaFact = "";
double _Dbl_Monto = 0;
int _Int_corder = 0;
string _Str_Sql = "";
string _Str_TipoDocFact = _MyUtilidad._Mtd_TipoDocument_CXC("ctipdocfact");
DataSet _Ds_A;
DataSet _Ds;
Clases._Cls_ProcesosCont _My_Cls_ProcesosCont = new T3.Clases._Cls_ProcesosCont("P_CXC_FACTANUL");
_Str_cconceptocomp = _My_Cls_ProcesosCont._Field_ConceptoComprobante;
_Str_ctypcompro = _My_Cls_ProcesosCont._Field_TipoComprobante;
_Str_cyearacco = Clases._Cls_ProcesosCont._Mtd_ContableAno(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate().ToShortDateString());
_Str_cmontacco = Clases._Cls_ProcesosCont._Mtd_ContableMes(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate().ToShortDateString());
//GUARDO LA CABECERA
double _Dbl_MontoTot = _Mtd_MontoTot();
_Str_cidcomprob = Convert.ToString(_MyUtilidad._Mtd_Consecutivo_TCOMPROBANC());
_Str_Sql = "insert into TCOMPROBANC (ccompany,cidcomprob,ctypcomp,cname,cyearacco,cmontacco,cregdate,ctotdebe,ctothaber,cbalance,cdateadd,cuseradd,clvalidado,cstatus) values ('";
_Str_Sql = _Str_Sql + Frm_Padre._Str_Comp + "','" + _Str_cidcomprob + "','" + _Str_ctypcompro + "','" + _Str_cconceptocomp + "','" + _Str_cyearacco + "','" + _Str_cmontacco + "','" + _My_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_MontoTot) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_MontoTot) + "',0,GETDATE(),'" + Frm_Padre._Str_Use + "',0,'9')";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
CLASES._Cls_Varios_Metodos._Mtd_EliminarAuxiliarCont(Frm_Padre._Str_Comp, _Str_cidcomprob);
//
_Str_Sql = "select * from VST_PROCESOSCONTD where cidproceso='P_CXC_FANUL_CIA_RELA' AND (ccompany='" + Frm_Padre._Str_Comp + "' OR ccompany IS NULL) order by cideprocesod";
var _Ds_InterComp = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
//GUARDO EL DETALLE
_Str_Sql = "select * from VST_PROCESOSCONTD where cidproceso='P_CXC_FACTANUL' AND (ccompany='" + Frm_Padre._Str_Comp + "' OR ccompany IS NULL) order by cideprocesod";
_Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
foreach (DataRow _Drow in _Ds.Tables[0].Rows)
{
if (Convert.ToString(_Drow["cideprocesod"]) == "1")
{
foreach (DataGridViewRow _DgRow in _Dg_Grid.Rows)
{
if (Convert.ToString(_DgRow.Cells["_Dg_GridCol_Print"].Value).Trim() == "1")
{
//--------------------------------------------
var _Bol_EsInterComp =
CLASES._Cls_Varios_Metodos._Mtd_EsClienteIC(
Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim());
if (_Bol_EsInterComp)
{
var _Row =
_Ds_InterComp.Tables[0].Rows.Cast <DataRow>().Where(
x => x["cideprocesod"].ToString() == "1").SingleOrDefault();
if (_Row != null)
{
_Str_ccount = Convert.ToString(_Row["ccount"]);
_Str_ctdocument = Convert.ToString(_Row["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Row["ccountname"]);
}
}
else
{
_Str_ccount = Convert.ToString(_Drow["ccount"]);
_Str_ctdocument = Convert.ToString(_Drow["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Drow["ccountname"]);
}
//--------------------------------------------
_DgRow.Cells["_Dg_GridCol_cidcomprobanul"].Value = _Str_cidcomprob;
//----------------
_Int_corder++;
_Str_Sql = "SELECT c_fecha_factura FROM TFACTURAM WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cfactura='" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "'";
_Ds_A = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds_A.Tables[0].Rows.Count > 0)
{
if (Convert.ToString(_Ds_A.Tables[0].Rows[0][0]).Length > 0)
{
_Str_FechaFact = Convert.ToDateTime(_Ds_A.Tables[0].Rows[0][0]).ToShortDateString();
}
}
_Str_cdescrip = _Str_ccountName + ".\nANUL.FACT " + _Str_FechaFact + " Nº " + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString();
_Dbl_Monto = _Mtd_MontoFactura(Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), 1);
if (_Dbl_Monto > 0)
{
if (Convert.ToString(_Drow["cnaturaleza"]) == "D")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctotdebe,cdateadd,cuseradd,cdescrip)";
}
else if (Convert.ToString(_Drow["cnaturaleza"]) == "H")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctothaber,cdateadd,cuseradd,cdescrip)";
}
_Str_Sql = _Str_Sql + " VALUES ('" + Frm_Padre._Str_Comp + "','" + _Str_cidcomprob + "','" + _Int_corder.ToString() + "','" + _Str_ccount + "','" + _Str_ctdocument + "','" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "','" + _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto) + "',GETDATE(),'" + Frm_Padre._Str_Use + "','" + _Str_cdescrip + "')";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
CLASES._Cls_Varios_Metodos._Mtd_InsertAuxiliarCont(_Str_cidcomprob, _Str_ccount, Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim(), _Str_cdescrip, _Str_TipoDocFact, Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)), "null", CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto), _Str_cmontacco, _Str_cyearacco, Convert.ToString(_Drow["cnaturaleza"]).Trim().ToUpper());
}
}
}
}
else if (Convert.ToString(_Drow["cideprocesod"]) == "2")
{
foreach (DataGridViewRow _DgRow in _Dg_Grid.Rows)
{
if (Convert.ToString(_DgRow.Cells["_Dg_GridCol_Print"].Value).Trim() == "1")
{
//--------------------------------------------
var _Bol_EsInterComp =
CLASES._Cls_Varios_Metodos._Mtd_EsClienteIC(
Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim());
if (_Bol_EsInterComp)
{
var _Row =
_Ds_InterComp.Tables[0].Rows.Cast <DataRow>().Where(
x => x["cideprocesod"].ToString() == "2").SingleOrDefault();
if (_Row != null)
{
_Str_ccount = Convert.ToString(_Row["ccount"]);
_Str_ctdocument = Convert.ToString(_Row["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Row["ccountname"]);
}
}
else
{
_Str_ccount = Convert.ToString(_Drow["ccount"]);
_Str_ctdocument = Convert.ToString(_Drow["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Drow["ccountname"]);
}
//--------------------------------------------
_Int_corder++;
_Str_Sql = "SELECT c_fecha_factura FROM TFACTURAM WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cfactura='" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "'";
_Ds_A = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds_A.Tables[0].Rows.Count > 0)
{
if (Convert.ToString(_Ds_A.Tables[0].Rows[0][0]).Length > 0)
{
_Str_FechaFact = Convert.ToDateTime(_Ds_A.Tables[0].Rows[0][0]).ToShortDateString();
}
}
_Str_cdescrip = _Str_ccountName + ".\nANUL.FACT " + _Str_FechaFact + " Nº " + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString();
_Dbl_Monto = _Mtd_MontoFactura(Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), 2);
if (_Dbl_Monto > 0)
{
if (Convert.ToString(_Drow["cnaturaleza"]) == "D")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctotdebe,cdateadd,cuseradd,cdescrip)";
}
else if (Convert.ToString(_Drow["cnaturaleza"]) == "H")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctothaber,cdateadd,cuseradd,cdescrip)";
}
_Str_Sql = _Str_Sql + " VALUES ('" + Frm_Padre._Str_Comp + "','" + _Str_cidcomprob + "','" + _Int_corder.ToString() + "','" + _Str_ccount + "','" + _Str_ctdocument + "','" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "','" + _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto) + "',GETDATE(),'" + Frm_Padre._Str_Use + "','" + _Str_cdescrip + "')";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
CLASES._Cls_Varios_Metodos._Mtd_InsertAuxiliarCont(_Str_cidcomprob, _Str_ccount, Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim(), _Str_cdescrip, _Str_TipoDocFact, Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)), "null", CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto), _Str_cmontacco, _Str_cyearacco, Convert.ToString(_Drow["cnaturaleza"]).Trim().ToUpper());
}
}
}
}
else if (Convert.ToString(_Drow["cideprocesod"]) == "3")
{
foreach (DataGridViewRow _DgRow in _Dg_Grid.Rows)
{
if (Convert.ToString(_DgRow.Cells["_Dg_GridCol_Print"].Value).Trim() == "1")
{
//--------------------------------------------
var _Bol_EsInterComp =
CLASES._Cls_Varios_Metodos._Mtd_EsClienteIC(
Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim());
if (_Bol_EsInterComp)
{
var _Row =
_Ds_InterComp.Tables[0].Rows.Cast <DataRow>().Where(
x => x["cideprocesod"].ToString() == "3").SingleOrDefault();
if (_Row != null)
{
_Str_ccount = Convert.ToString(_Row["ccount"]);
_Str_ctdocument = Convert.ToString(_Row["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Row["ccountname"]);
}
}
else
{
_Str_ccount = Convert.ToString(_Drow["ccount"]);
_Str_ctdocument = Convert.ToString(_Drow["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Drow["ccountname"]);
}
//--------------------------------------------
_Int_corder++;
_Str_Sql = "SELECT c_fecha_factura FROM TFACTURAM WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cfactura='" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "'";
_Ds_A = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds_A.Tables[0].Rows.Count > 0)
{
if (Convert.ToString(_Ds_A.Tables[0].Rows[0][0]).Length > 0)
{
_Str_FechaFact = Convert.ToDateTime(_Ds_A.Tables[0].Rows[0][0]).ToShortDateString();
}
}
_Str_cdescrip = _Str_ccountName + ".\nANUL.FACT " + _Str_FechaFact + " Nº " + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString();
_Dbl_Monto = _Mtd_MontoFactura(Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), 3);
if (_Dbl_Monto > 0)
{
if (Convert.ToString(_Drow["cnaturaleza"]) == "D")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctotdebe,cdateadd,cuseradd,cdescrip)";
}
else if (Convert.ToString(_Drow["cnaturaleza"]) == "H")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctothaber,cdateadd,cuseradd,cdescrip)";
}
_Str_Sql = _Str_Sql + " VALUES ('" + Frm_Padre._Str_Comp + "','" + _Str_cidcomprob + "','" + _Int_corder.ToString() + "','" + _Str_ccount + "','" + _Str_ctdocument + "','" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "','" + _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto) + "',GETDATE(),'" + Frm_Padre._Str_Use + "','" + _Str_cdescrip + "')";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
CLASES._Cls_Varios_Metodos._Mtd_InsertAuxiliarCont(_Str_cidcomprob, _Str_ccount, Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim(), _Str_cdescrip, _Str_TipoDocFact, Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)), "null", CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto), _Str_cmontacco, _Str_cyearacco, Convert.ToString(_Drow["cnaturaleza"]).Trim().ToUpper());
}
}
}
}
else
{
foreach (DataGridViewRow _DgRow in _Dg_Grid.Rows)
{
if (Convert.ToString(_DgRow.Cells["_Dg_GridCol_Print"].Value).Trim() == "1")
{
//--------------------------------------------
var _Bol_EsInterComp =
CLASES._Cls_Varios_Metodos._Mtd_EsClienteIC(
Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim());
if (_Bol_EsInterComp)
{
var _Row =
_Ds_InterComp.Tables[0].Rows.Cast <DataRow>().Where(
x => x["cideprocesod"].ToString() == "4").SingleOrDefault();
if (_Row != null)
{
_Str_ccount = Convert.ToString(_Row["ccount"]);
_Str_ctdocument = Convert.ToString(_Row["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Row["ccountname"]);
}
}
else
{
_Str_ccount = Convert.ToString(_Drow["ccount"]);
_Str_ctdocument = Convert.ToString(_Drow["ctipodocumento"]);
_Str_ccountName = Convert.ToString(_Drow["ccountname"]);
}
//--------------------------------------------
_Int_corder++;
_Str_Sql = "SELECT c_fecha_factura FROM TFACTURAM WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cfactura='" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "'";
_Ds_A = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds_A.Tables[0].Rows.Count > 0)
{
if (Convert.ToString(_Ds_A.Tables[0].Rows[0][0]).Length > 0)
{
_Str_FechaFact = Convert.ToDateTime(_Ds_A.Tables[0].Rows[0][0]).ToShortDateString();
}
}
_Str_cdescrip = _Str_ccountName + ".\nANUL.FACT " + _Str_FechaFact + " Nº " + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString();
_Dbl_Monto = _Mtd_MontoFactura(Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), 4);
if (_Dbl_Monto > 0)
{
if (Convert.ToString(_Drow["cnaturaleza"]) == "D")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctotdebe,cdateadd,cuseradd,cdescrip)";
}
else if (Convert.ToString(_Drow["cnaturaleza"]) == "H")
{
_Str_Sql = "insert into TCOMPROBAND (ccompany,cidcomprob,corder,ccount,ctdocument,cnumdocu,cdatedocu,ctothaber,cdateadd,cuseradd,cdescrip)";
}
_Str_Sql = _Str_Sql + " VALUES ('" + Frm_Padre._Str_Comp + "','" + _Str_cidcomprob + "','" + _Int_corder.ToString() + "','" + _Str_ccount + "','" + _Str_ctdocument + "','" + _DgRow.Cells["_Dg_GridCol_factura"].Value.ToString() + "','" + _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto) + "',GETDATE(),'" + Frm_Padre._Str_Use + "','" + _Str_cdescrip + "')";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
CLASES._Cls_Varios_Metodos._Mtd_InsertAuxiliarCont(_Str_cidcomprob, _Str_ccount, Convert.ToString(_DgRow.Cells["_Dg_GridCol_ccliente"].Value).Trim(), _Str_cdescrip, _Str_TipoDocFact, Convert.ToString(_DgRow.Cells["_Dg_GridCol_factura"].Value).Trim(), _My_Formato._Mtd_fecha(Convert.ToDateTime(_Str_FechaFact)), "null", CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto), _Str_cmontacco, _Str_cyearacco, Convert.ToString(_Drow["cnaturaleza"]).Trim().ToUpper());
}
}
}
}
}
_Mtd_ActualizarCidcomprobAnul(_Str_cidcomprob);
return(_Str_cidcomprob);
}
//-------------------------------------------------------------------
}
