private string _Mtd_CrearComprobanteContable() { var _Str_TipoDocAjus = _Cls_VariosMetodos._Mtd_TipoDocument_INV(_Int_Sw == 1 ? "ctipodocent" : "ctipodocsal").Trim(); double _Dbl_Monto = 0; double.TryParse(_Txt_Monto.Text, out _Dbl_Monto); var _Cls_Proceso_Cont = new Clases._Cls_ProcesosCont(_Int_Sw == 1 ? "P_INV_AJUS_ENT" : "P_INV_AJUS_SAL"); var _Str_Cconceptocomp = _Cls_Proceso_Cont._Field_ConceptoComprobante; var _Str_Ctypcompro = _Cls_Proceso_Cont._Field_TipoComprobante; var _Int_Comprobante = _Cls_VariosMetodos._Mtd_Consecutivo_TCOMPROBANC(); var _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(_Dbl_Monto) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Monto) + "','0',GETDATE(),'" + Frm_Padre._Str_Use + "','1','0')"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); _Dg_Comprobante.Rows.Cast <DataGridViewRow>() .Where(x => x.Cells["Cuenta"].Value != null) .ToList() .ForEach(x => { var _Str_Cuenta = Convert.ToString(x.Cells["Cuenta"].Value).Trim(); var _Str_Descrip = Convert.ToString(x.Cells["Descripcion"].Value).Trim(); var _Str_TipoDocumento = _Str_TipoDocAjus; var _Str_Documento = _Txt_Ajuste.Text; double _Dbl_DebeD, _Dbl_HaberD; double.TryParse(Convert.ToString(x.Cells["Debe"].Value), out _Dbl_DebeD); double.TryParse(Convert.ToString(x.Cells["Haber"].Value), out _Dbl_HaberD); _Str_Cadena = "INSERT INTO TCOMPROBAND (ccompany,cidcomprob,corder,ccount,cdescrip,ctdocument,cnumdocu,cdatedocu,ctotdebe,ctothaber,cdateadd,cuseradd)VALUES('" + Frm_Padre._Str_Comp + "','" + _Int_Comprobante.ToString() + "','" + (x.Index + 1) + "','" + _Str_Cuenta + "','" + _Str_Descrip + "','" + _Str_TipoDocumento + "','" + _Str_Documento + "','" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_DebeD) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_HaberD) + "',GETDATE(),'" + Frm_Padre._Str_Use + "')"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); }); return(_Int_Comprobante.ToString()); }
private string _Mtd_CrearComprobanteContable() { double _Dbl_Debe, _Dbl_Haber; _Mtd_TotalDebeHaber(out _Dbl_Debe, out _Dbl_Haber); var _Cls_Proceso_Cont = new Clases._Cls_ProcesosCont("P_CXC_RET_ANUL_EMI"); var _Str_Cconceptocomp = _Cls_Proceso_Cont._Field_ConceptoComprobante; var _Str_Ctypcompro = _Cls_Proceso_Cont._Field_TipoComprobante; var _Int_Comprobante = _Cls_VariosMetodos._Mtd_Consecutivo_TCOMPROBANC(); var _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(_Dbl_Debe) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_Haber) + "','0',GETDATE(),'" + Frm_Padre._Str_Use + "','1','0')"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); CLASES._Cls_Varios_Metodos._Mtd_EliminarAuxiliarCont(Frm_Padre._Str_Comp, _Int_Comprobante.ToString()); _Dg_Comprobante.Rows.Cast <DataGridViewRow>() .Where(x => x.Cells["Cuenta"].Value != null) .ToList() .ForEach(x => { var _Str_Cuenta = Convert.ToString(x.Cells["Cuenta"].Value).Trim(); var _Str_Descrip = Convert.ToString(x.Cells["Descripcion"].Value).Trim(); var _Str_TipoDocumento = Convert.ToString(x.Cells["TipoDocumento"].Value).Trim(); var _Str_Documento = Convert.ToString(x.Cells["Documento"].Value).Trim(); double _Dbl_DebeD, _Dbl_HaberD; double.TryParse(Convert.ToString(x.Cells["Debe"].Value), out _Dbl_DebeD); double.TryParse(Convert.ToString(x.Cells["Haber"].Value), out _Dbl_HaberD); _Str_Cadena = "INSERT INTO TCOMPROBAND (ccompany,cidcomprob,corder,ccount,cdescrip,ctdocument,cnumdocu,cdatedocu,ctotdebe,ctothaber,cdateadd,cuseradd)VALUES('" + Frm_Padre._Str_Comp + "','" + _Int_Comprobante.ToString() + "','" + (x.Index + 1) + "','" + _Str_Cuenta + "','" + _Str_Descrip + "','" + _Str_TipoDocumento + "','" + _Str_Documento + "','" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_DebeD) + "','" + CLASES._Cls_Varios_Metodos._Mtd_MontosSQL(_Dbl_HaberD) + "',GETDATE(),'" + Frm_Padre._Str_Use + "')"; Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena); if (_Dbl_DebeD != 0) { CLASES._Cls_Varios_Metodos._Mtd_InsertAuxiliarCont(_Int_Comprobante.ToString(), _Str_Cuenta, Convert.ToString(_Txt_Cliente.Tag).Trim(), _Str_Descrip, _Str_TipoDocumento, _Str_Documento, _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(_Dbl_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(), _Str_Cuenta, Convert.ToString(_Txt_Cliente.Tag).Trim(), _Str_Descrip, _Str_TipoDocumento, _Str_Documento, _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(_Dbl_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.ToString()); }
/// <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); } //------------------------------------------------------------------- }