private void _Mtd_ImprimirComprobante(string _P_Str_Comprobante)
{
try
{
PrintDialog _Print = new PrintDialog();
_PrintComprob:
if (_Print.ShowDialog() == DialogResult.OK)
{
Cursor = Cursors.WaitCursor;
REPORTESS _Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _P_Str_Comprobante + "'", _Print, true);
Cursor = Cursors.Default;
if (MessageBox.Show("¿El comprobante se imprimió correctamente?", "Requerimiento", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
_Frm.Close();
_Frm.Dispose();
string _Str_Cadena = "UPDATE TCOMPROBANC SET cstatus='1',clvalidado='1',cvalidate='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprob='" + _P_Str_Comprobante + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
MessageBox.Show("El comprobante ha sido actualizado.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
_Frm.Close();
_Frm.Dispose();
goto _PrintComprob;
}
}
else
{
MessageBox.Show("Debe actualizar el comprobante desde el notificador 'COMPROBANTES DE ANTICIPO POR IMPRIMIR'", "Requerimiento", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
catch { Cursor = Cursors.Default; MessageBox.Show("Error al intentar imprimir.\nDebe actualizar el comprobante desde el notificador 'COMPROBANTES DE ANTICIPO POR IMPRIMIR'.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
private void _Mtd_Adicional()
{
try
{
Cursor = Cursors.WaitCursor;
PrintDialog _Print = new PrintDialog();
Cursor = Cursors.Default;
_Pnl_Adicional.Visible = false;
Cursor = Cursors.WaitCursor;
Frm_Inf_Varios _Frm = new Frm_Inf_Varios(9, _Num_Desde.Value.ToString(), _Num_Hasta.Value.ToString());
Cursor = Cursors.Default;
_Frm.Size = this.Size;
_Frm.ShowDialog(this);
if (MessageBox.Show("¿Las tarjetas fueron impresas correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
Cursor = Cursors.WaitCursor;
string _Str_Cadena = "Update TINVFISICOM set cimpreso='1' where ccompany='" + Frm_Padre._Str_Comp + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
Cursor = Cursors.Default;
//--------------------------------
MessageBox.Show("A continuación el reporte de verificación de tarjetas emitidas", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
Cursor = Cursors.WaitCursor;
_Print = new PrintDialog();
Cursor = Cursors.Default;
if (_Print.ShowDialog() == DialogResult.OK)
{
_Bt_Imprimir.Enabled = false;
Cursor = Cursors.WaitCursor;
_Frm_R = new REPORTESS(new string[] { "VST_INVENTARIOFISICO" }, "", "T3.Report.rVerificacionTar", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "'", _Print, true);
Cursor = Cursors.Default;
if (MessageBox.Show("¿El reporte fue impreso correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
_Frm_R.Close();
_Bt_Imprimir.Enabled = false;
Cursor = Cursors.WaitCursor;
_Str_Cadena = "Update TINVFISICOM set cimpvertaremit='1' where ccompany='" + Frm_Padre._Str_Comp + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
Cursor = Cursors.Default;
System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)Application.OpenForms["Frm_Padre"])._Frm_Contenedor._async_Default);
this._Bt_AbrirConteo.Visible = true;
}
else
{
_Bt_Imprimir.Enabled = true;
}
}
//--------------------------------
}
else
{
_Pnl_Adicional.Visible = true;
}
}
catch { Cursor = Cursors.Default; MessageBox.Show("No se pudo conectar con la impresora", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); _Pnl_Adicional.Visible = true; Cursor = Cursors.Default; }
}
private void _Mtd_ImprimirNDyComprobante(string _P_Str_ND, string _P_Str_Comprobante)
{
try
{
int _Int_Sw = 0;
REPORTESS _Frm;
PrintDialog _Print = new PrintDialog();
_PrintComprob:
if (_Print.ShowDialog() == DialogResult.OK)
{
if (_Int_Sw == 0 | _Int_Sw == 1)
{
Cursor = Cursors.WaitCursor;
_Frm = new REPORTESS(new string[] { "VST_NOTADEBITO_SINDET" }, "", "T3.Report.rNotaDebitoSDet", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and cidnotadebitocxp='" + _P_Str_ND + "'", _Print, true);
Cursor = Cursors.Default;
//_Frm.ShowDialog();
if (MessageBox.Show("¿La ND se imprimió correctamente?", "Requerimiento", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.No)
{
_Frm.Close();
_Frm.Dispose();
_Int_Sw = 1;
goto _PrintComprob;
}
else
{
A:
string _Str_Numero = InputBox.Show("Introduzca el número de control").Text;
if (_Str_Numero.Trim().Length > 0)
{
string _Str_Cadena = "Select cnumcontrolnd from TNOTADEBITOCP where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cnumcontrolnd='" + _Str_Numero + "'";
if (Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena).Tables[0].Rows.Count > 0)
{
MessageBox.Show("El número de control del documento ya fue registrado. Debe intentarlo nuevamente.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Question);
goto A;
}
else
{
_Int_Sw = 0;
Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTADEBITOCP", "cnumcontrolnd='" + _Str_Numero + "',cestatusfirma='2',cimpresa='1',cactivo='1',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotadebitocxp='" + _P_Str_ND + "'");
}
}
else
{
MessageBox.Show("Debe ingresar el número de control", "Información", MessageBoxButtons.OK, MessageBoxIcon.Question);
goto A;
}
}
}
if (_Int_Sw == 0 | _Int_Sw == 2)
{
if (_Int_Sw == 0)
{
MessageBox.Show("Se va a proceder a imprimir el comprobante contable.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information); _Int_Sw = 2; goto _PrintComprob;
}
Cursor = Cursors.WaitCursor;
_Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _P_Str_Comprobante + "'", _Print, true);
Cursor = Cursors.Default;
if (MessageBox.Show("¿El comprobante se imprimió correctamente?", "Requerimiento", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.No)
{
_Frm.Close();
_Frm.Dispose();
goto _PrintComprob;
}
else
{
_Frm.Close();
_Frm.Dispose();
string _Str_Cadena = "UPDATE TCOMPROBANC SET cstatus='1',clvalidado='1',cvalidate='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprob='" + _P_Str_Comprobante + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)Application.OpenForms["Frm_Padre"])._Frm_Contenedor._async_Default);
MessageBox.Show("El comprobante ha sido actualizado.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
}
else
{
MessageBox.Show("Debe imprimir la ND y actualizar el comprobante desde el notificador 'COMPROBANTES DE ANTICIPO POR IMPRIMIR'", "Requerimiento", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
catch { Cursor = Cursors.Default; MessageBox.Show("Error al intentar imprimir.\nDebe imprimir la ND y actualizar el comprobante desde el notificador 'COMPROBANTES DE ANTICIPO POR IMPRIMIR'.", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
private void _Mtd_Anular()
{
try
{
string _Str_cncanu = "";
string _Str_cidcomprob = "";
bool _Bol_cexedentecobro = false;
string _Str_Sql = "select cidcomprobanul,ccliente,cexedentecobro from TNOTACREDICC where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text + "'";
DataSet _Ds2 = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds2.Tables[0].Rows.Count > 0)
{
if (_Ds2.Tables[0].Rows[0]["cexedentecobro"].ToString().Trim() == "1")
{
_Bol_cexedentecobro = true;
}
if (_Str_MyProceso == "F1")
{
_Str_Sql = "UPDATE TNOTACREDICC SET cmotivoanulacion='" + _Cmb_Motivo.SelectedValue.ToString() + "',cfechaanul='" + _My_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.Text.Trim() + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
_Str_cncanu = _MyUtilidad._Mtd_Correlativo("SELECT MAX(cncanu) FROM TNCANUL WHERE ccompany='" + Frm_Padre._Str_Comp + "'");
if (!Program._MyClsCnn._mtd_conexion._Mtd_ExistenRegistros("SELECT * FROM TNCANUL WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidnotcredit='" + _Txt_Cod.Text.Trim() + "'"))
{
_Str_Sql = "INSERT INTO TNCANUL (ccompany,cidnotcredit,cncanu,cdescripcion,cfechaanul,cactivo,cestatusfirma,cdateadd,cuseradd,cdelete) VALUES('" +
Frm_Padre._Str_Comp + "','" + _Txt_Cod.Text + "','" + _Str_cncanu + "','" + _Txt_Descripcion.Text.ToUpper() + "','" + _My_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',0,1,'" + _My_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "','" + Frm_Padre._Str_Use + "',0)";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
}
MessageBox.Show("Se cargo la NC como anulada.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
if (_Rbt_NoAnul.Checked)
{
_Mtd_Actualizar_NoAnul();
}
else
{
_Mtd_Actualizar_Anul();
}
_Mtd_Ini();
_Bt_Anular.Enabled = false;
_Tb_Tab.SelectedIndex = 0;
}
else if (_Str_MyProceso == "F2")
{
PrintDialog _Print = new PrintDialog();
_PrintG:
if (_Print.ShowDialog() == DialogResult.OK)
{
string _Str_Id_Comprobante = "";
string _Str_Cadena = "SELECT cidcomprobanul FROM TNOTACREDICC WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.Text.Trim() + "'";
DataSet _DsTemp = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena);
if (_DsTemp.Tables[0].Rows[0][0] == System.DBNull.Value | _DsTemp.Tables[0].Rows[0][0].ToString().Trim() == "0")
{
if (_Bol_cexedentecobro)
{
_Str_Id_Comprobante = _MyUtilidad._Mtd_Proceso_P_CXC_NC_A(_Txt_Cod.Text.Trim(), "P_CXC_NCEXCD_A");
}
else
{
if (CLASES._Cls_Varios_Metodos._Mtd_EsClienteIC(_Txt_CodCliente.Text.Trim()))
{
_Str_Id_Comprobante = _MyUtilidad._Mtd_Proceso_P_CXC_NC_A(_Txt_Cod.Text.Trim(), "P_CXC_NC_A_IC");
}
else
{
_Str_Id_Comprobante = _MyUtilidad._Mtd_Proceso_P_CXC_NC_A(_Txt_Cod.Text.Trim(), "P_CXC_NC_A");
}
}
_Str_Sql = "UPDATE TNOTACREDICC SET cidcomprobanul='" + _Str_Id_Comprobante + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.Text.Trim() + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
}
else
{
_Str_Id_Comprobante = _DsTemp.Tables[0].Rows[0][0].ToString().Trim();
}
REPORTESS _Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Str_Id_Comprobante + "'", _Print, true);
_Frm.MdiParent = this.MdiParent;
_Frm.Show();
if (MessageBox.Show("¿La impresión se ha realizado correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
_Str_Sql = "UPDATE TNOTACREDICC SET canulado='1' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredicc='" + _Txt_Cod.Text.Trim() + "' and ccliente='" + _Txt_CodCliente.Text.Trim() + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
_Str_Sql = "UPDATE TNCANUL SET cactivo=1,cestatusfirma=2 WHERE ccompany='" + Frm_Padre._Str_Comp + "' and cidnotcredit='" + _Txt_Cod.Text.Trim() + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
MessageBox.Show("Se anuló correctamente la N.C.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
if (_Rbt_NoAnul.Checked)
{
_Mtd_Actualizar_NoAnul();
}
else
{
_Mtd_Actualizar_Anul();
}
_Mtd_Ini();
_Bt_Anular.Enabled = false;
_Tb_Tab.SelectedIndex = 0;
}
else
{
_Frm.Close();
GC.Collect();
goto _PrintG;
}
}
}
}
}
catch (Exception _Ex) { MessageBox.Show(_Ex.Message); Cursor = Cursors.Default; }
}
private void _Mtd_Anular()
{
try
{
string _Str_Sql = "";
string _Str_TpoDoc = "";
string _Str_cidcomprob = "";
string _Str_cidcomprobret = "";
string _Str_Cadena = "select cidcomprobanul,cdiferenciaprec,cproveedor from TNOTACREDICP where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text + "' and cproveedor='" + _Txt_CodProveedor.Text + "'";
DataSet _Ds2 = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena);
if (_Ds2.Tables[0].Rows.Count > 0)
{
PrintDialog _Print = new PrintDialog();
_Print:
if (_Print.ShowDialog() == DialogResult.OK)
{
_Txt_Clave.Text = "";
_Pnl_Clave.Visible = false;
//_________________________________
int _Int_Id_Comprobante = new int();
CLASES._Cls_Varios_Metodos _Cls_Proceso = new T3.CLASES._Cls_Varios_Metodos(true);
_Str_Cadena = "Select cidcomprobanul from TNOTACREDICP where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'";
DataSet _DsTemp = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena);
if (_DsTemp.Tables[0].Rows[0][0] == System.DBNull.Value | _DsTemp.Tables[0].Rows[0][0].ToString().Trim() == "0")
{
_Str_Cadena = "Select cidcomprob from TNOTACREDICP where cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'";
_DsTemp = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena);
_Int_Id_Comprobante = Convert.ToInt32(_Cls_Proceso._Mtd_CrearComprobanteAnulacion(_DsTemp.Tables[0].Rows[0][0].ToString().Trim()));
_Mtd_InsertAuxiliarCont(_DsTemp.Tables[0].Rows[0][0].ToString().Trim(), _Int_Id_Comprobante.ToString());
Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTACREDICP", "cidcomprobanul='" + _Int_Id_Comprobante.ToString() + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'");
}
else
{
_Int_Id_Comprobante = Convert.ToInt32(_DsTemp.Tables[0].Rows[0][0].ToString().Trim());
}
Cursor = Cursors.WaitCursor;
REPORTESS _Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Int_Id_Comprobante.ToString() + "'", _Print, true);
Cursor = Cursors.Default;
if (MessageBox.Show("¿La impresión se ha realizado correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
//----------------------------------------------------------------------------------
Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTACREDICP", "canulado='1',cfechaanul='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' and ccompany='" + Frm_Padre._Str_Comp + "' and cidnotacreditocxp='" + _Txt_Cod.Text.Trim() + "' and cproveedor='" + _Txt_CodProveedor.Text.Trim() + "'");
Program._MyClsCnn._mtd_conexion._Mtd_modificar("TCOMPROBANC", "cstatus='1',clvalidado='1',cvalidate='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "'", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Int_Id_Comprobante.ToString() + "'");
_Str_Sql = "SELECT ctipodocnc FROM TCONFIGCXP WHERE ccompany='" + Frm_Padre._Str_Comp + "'";
DataSet _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds.Tables[0].Rows.Count > 0)
{
_Str_TpoDoc = Convert.ToString(_Ds.Tables[0].Rows[0]["ctipodocnc"]);
}
//_________________________________
//_________________________________ANULO CUENTAS POR PAGAR
_Str_Cadena = "UPDATE TFACTPPAGARM SET cactivo=0,canulado=1,cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cproveedor='" + _Txt_CodProveedor.Text + "' AND ctipodocument='" + _Str_TpoDoc + "' and cnumdocu='" + _Txt_Cod.Text + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
_Str_Cadena = "UPDATE TMOVCXPM SET cactivo=0,canulado=1,cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cproveedor='" + _Txt_CodProveedor.Text + "' AND ctipodocument='" + _Str_TpoDoc + "' and cnumdocu='" + _Txt_Cod.Text + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
_Str_Sql = "SELECT cidcomprobret FROM TFACTPPAGARM WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cproveedor='" + _Txt_CodProveedor.Text + "' AND ctipodocument='" + _Str_TpoDoc + "' and cnumdocu='" + _Txt_Cod.Text + "'";
_Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds.Tables[0].Rows.Count > 0)
{
_Str_cidcomprobret = Convert.ToString(_Ds.Tables[0].Rows[0]["cidcomprobret"]);
}
//ANULO RETENCION DE IVA
if (_Str_cidcomprobret != "")
{
_Str_Cadena = "UPDATE TCOMPROBANRETC SET canulado=1,cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprobret='" + _Str_cidcomprobret + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
_Str_Sql = "SELECT cidcomprob FROM TCOMPROBANRETC WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprobret='" + _Str_cidcomprobret + "'";
_Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Sql);
if (_Ds.Tables[0].Rows.Count > 0)
{
if (Convert.ToString(_Ds.Tables[0].Rows[0]["cidcomprob"]) != "")
{
_Str_Cadena = "UPDATE TCOMPROBANC SET cstatus='9' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprob='" + Convert.ToString(_Ds.Tables[0].Rows[0]["cidcomprob"]) + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Sql);
}
}
}
System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)this.MdiParent)._Frm_Contenedor._async_Default);
MessageBox.Show("La operación fué realizada correctamente", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
_Mtd_ini();
_Tb_Tab.SelectedIndex = 0;
if (_Rbt_NoAnul.Checked)
{
_Mtd_Actualizar_NoAnul();
}
else
{
_Mtd_Actualizar_Anul();
}
}
else
{
_Frm.Close();
GC.Collect();
goto _Print;
}
}
else
{
_Pnl_Clave.Visible = false;
_Txt_Clave.Text = "";
}
}
}
catch (Exception _Ex) { MessageBox.Show("No se puede contactar con la impresora", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); Cursor = Cursors.Default; }
}
private void _Mtd_Generar(string _P_Str_cidnotrecepc, string _P_Str_cidrecepcion, string _P_Str_Proveedor, string _P_Str_Factuta)
{
string _Str_Cadena = "SELECT ISNULL(cidcomprob,0) FROM TNOTARECEPC WHERE cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cidnotrecepc='" + _P_Str_cidnotrecepc + "'";
DataSet _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena);
if (_Ds.Tables[0].Rows.Count > 0)
{
int _Int_ID_Comprobante = new int();
if (_Ds.Tables[0].Rows[0][0].ToString().Trim() == "0")
{
double _Dbl_MontoInvend = 0;
if (_Txt_Invendible.Text.Trim().Length > 0)
{
_Dbl_MontoInvend = Convert.ToDouble(_Txt_Invendible.Text);
}
CLASES._Cls_Varios_Metodos _Cls_Procesos = new T3.CLASES._Cls_Varios_Metodos(true);
if (_Dbl_MontoInvend == 0)
{
_Int_ID_Comprobante = _Cls_Procesos._Mtd_Proceso_P_COMPRA(_Txt_NR.Text.Trim(), _P_Str_cidrecepcion, _P_Str_Proveedor, _P_Str_Factuta);
}
else
{
_Dbl_MontoInvend = _Mtd_RetornarInvendible(_P_Str_cidrecepcion, _P_Str_Proveedor, _P_Str_Factuta);
_Int_ID_Comprobante = _Cls_Procesos._Mtd_Proceso_P_COMPRA_INVEND(_Txt_NR.Text.Trim(), _P_Str_cidrecepcion, _Dbl_MontoInvend, _P_Str_Proveedor, _P_Str_Factuta);
}
Program._MyClsCnn._mtd_conexion._Mtd_modificar("TNOTARECEPC", "cidcomprob='" + _Int_ID_Comprobante.ToString() + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "'", "cgroupcomp='" + Frm_Padre._Str_GroupComp + "' AND ccompany='" + Frm_Padre._Str_Comp + "' AND cidnotrecepc='" + _P_Str_cidnotrecepc + "'");
}
else
{
_Int_ID_Comprobante = Convert.ToInt32(_Ds.Tables[0].Rows[0][0].ToString().Trim());
}
try
{
Cursor = Cursors.WaitCursor;
PrintDialog _Print = new PrintDialog();
Cursor = Cursors.Default;
_PrintComprob:
if (_Print.ShowDialog() == DialogResult.OK)
{
Cursor = Cursors.WaitCursor;
REPORTESS _Frm = new REPORTESS(new string[] { "vst_reportecomprobante" }, "", "T3.Report.rcomprobante", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "' and cidcomprob='" + _Int_ID_Comprobante + "'", _Print, true);
Cursor = Cursors.Default;
if (MessageBox.Show("¿El comprobante se imprimió correctamente?", "Requerimiento", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
_Frm.Close();
_Frm.Dispose();
double _Dbl_Reten = _Mtd_PorcRetencion(_P_Str_Proveedor);
string _Str_Impuesto = _Txt_Impuesto.Text;
if (_Str_Impuesto.Trim().Length == 0)
{
_Str_Impuesto = "0";
}
bool _Bol_Verificar = true;
if (_Dbl_Reten > 1 & Convert.ToDouble(_Str_Impuesto) > 0 & _Cls_VariosMetodos._Mtd_CompaniaRetieneImp(Frm_Padre._Str_Comp))
{
Cursor = Cursors.WaitCursor;
if (CLASES._Cls_Varios_Metodos._Mtd_VerificarConexionExterna())
{
if (!_Mtd_ExisteComprobanteRetencion(_Str_Proveedor, _Str_TpoDocGian, _P_Str_Factuta))
{
_Cls_VariosMetodos._Mtd_Proceso_GenerarComprobRetencion(_Str_Proveedor, _Str_TpoDocGian, _Txt_Document.Text, _Str_Recepcion);
}
}
else
{
_Bol_Verificar = false;
}
Cursor = Cursors.Default;
}
if (_Bol_Verificar)
{
_Str_Cadena = "UPDATE TCOMPROBANC SET cstatus='1',clvalidado='1',cvalidate='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDate()) + "',cdateupd='" + _Cls_Formato._Mtd_fecha(CLASES._Cls_Varios_Metodos._Mtd_SQLGetDateServ()) + "',cuserupd='" + Frm_Padre._Str_Use + "' WHERE ccompany='" + Frm_Padre._Str_Comp + "' AND cidcomprob='" + _Int_ID_Comprobante + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)this.MdiParent)._Frm_Contenedor._async_Default);
MessageBox.Show("La operación ha sido realizada correctamente", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
else
{
MessageBox.Show("Problemas de conexión para crear la retención. Por favor espere un minuto e intente nuevamente.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
this.Close();
}
else
{
_Frm.Close();
_Frm.Dispose();
goto _PrintComprob;
}
}
else
{
_Pnl_Clave.Visible = false;
_Txt_Clave.Text = "";
}
}
catch (Exception _Ex) { Cursor = Cursors.Default; MessageBox.Show("Error al intentar imprimir.\n" + _Ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
else
{
MessageBox.Show("No se encontró la nota de recepción", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
private void _Mtd_Imprimir()
{
if (this.InvokeRequired)
{
ChangeProgressBarCallback callback = new ChangeProgressBarCallback(_Mtd_Imprimir);
}
else
{
try
{
PrintDialog _Print;
progressBar1.Maximum = 100;
Cursor = Cursors.WaitCursor;
string _Str_Cadena = "Select cimpreso from TINVFISICOM where ccompany='" + Frm_Padre._Str_Comp + "'";
DataSet _Ds = Program._MyClsCnn._mtd_conexion._Mtd_RetornarDataset(_Str_Cadena);
Cursor = Cursors.Default;
if (_Ds.Tables[0].Rows.Count > 0)
{
if (_Ds.Tables[0].Rows[0][0].ToString().Trim() == "1")
{
MessageBox.Show("Se va a imprimir el reporte de verificación de tarjetas emitidas.", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
//--------------------------------
Cursor = Cursors.WaitCursor;
_Print = new PrintDialog();
Cursor = Cursors.Default;
if (_Print.ShowDialog() == DialogResult.OK)
{
_Bt_Imprimir.Enabled = false;
Cursor = Cursors.WaitCursor;
_Frm_R = new REPORTESS(new string[] { "VST_INVENTARIOFISICO" }, "", "T3.Report.rVerificacionTar", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "'", _Print, true);
Cursor = Cursors.Default;
if (MessageBox.Show("¿El reporte fue impreso correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
_Frm_R.Close();
Cursor = Cursors.WaitCursor;
_Str_Cadena = "Update TINVFISICOM set cimpvertaremit='1' where ccompany='" + Frm_Padre._Str_Comp + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
Cursor = Cursors.Default;
System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)Application.OpenForms["Frm_Padre"])._Frm_Contenedor._async_Default);
_Pnl_Panel_1.Enabled = false;
this._Bt_AbrirConteo.Visible = true;
}
else
{
_Bt_Imprimir.Enabled = true;
_Pnl_Panel_1.Enabled = true;
_Pnl_Panel_2.Enabled = true;
}
}
//--------------------------------
}
else
{
bool _Bol_No = false;
bool _Bol_Impreso = false;
if (MessageBox.Show("¿Desea imprimir la tarjetas?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
if (MessageBox.Show("¿Desea imprimir la totalidad de las tarjetas?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
_Bt_Imprimir.Enabled = false;
Cursor = Cursors.WaitCursor;
Frm_Inf_Varios _Frm = new Frm_Inf_Varios(9, "0", "0");
Cursor = Cursors.Default;
_Frm.Size = this.Size;
_Frm.ShowDialog(this);
if (MessageBox.Show("¿Las tarjetas fueron impresas correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
Cursor = Cursors.WaitCursor;
_Str_Cadena = "Update TINVFISICOM set cimpreso='1' where ccompany='" + Frm_Padre._Str_Comp + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
Cursor = Cursors.Default;
_Bol_Impreso = true;
}
else
{
_Pnl_Adicional.BringToFront();
_Pnl_Adicional.Visible = true;
}
}
else
{
_Pnl_Adicional.BringToFront();
_Pnl_Adicional.Visible = true;
}
}
else
{
_Bol_No = true;
_Bol_Impreso = true;
}
if (_Bol_Impreso)
{
MessageBox.Show("A continuación el reporte de verificación de tarjetas emitidas", "Información", MessageBoxButtons.OK, MessageBoxIcon.Information);
Cursor = Cursors.WaitCursor;
_Print = new PrintDialog();
Cursor = Cursors.Default;
if (_Print.ShowDialog() == DialogResult.OK)
{
_Bt_Imprimir.Enabled = false;
Cursor = Cursors.WaitCursor;
_Frm_R = new REPORTESS(new string[] { "VST_INVENTARIOFISICO" }, "", "T3.Report.rVerificacionTar", "Section1", "cabecera", "rif", "nit", "ccompany='" + Frm_Padre._Str_Comp + "'", _Print, true);
Cursor = Cursors.Default;
if (MessageBox.Show("¿El reporte fue impreso correctamente?", "Información", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
{
_Frm_R.Close();
if (_Bol_No)
{
Cursor = Cursors.WaitCursor;
_Str_Cadena = "Update TINVFISICOM set cimpreso='1' where ccompany='" + Frm_Padre._Str_Comp + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
Cursor = Cursors.Default;
}
_Str_Cadena = "Update TINVFISICOM set cimpvertaremit='1' where ccompany='" + Frm_Padre._Str_Comp + "'";
Program._MyClsCnn._mtd_conexion._Mtd_EjecutarSentencia(_Str_Cadena);
System.Threading.ThreadPool.QueueUserWorkItem(((Frm_Padre)Application.OpenForms["Frm_Padre"])._Frm_Contenedor._async_Default);
_Pnl_Panel_1.Enabled = false;
_Bt_Generar.Enabled = false;
this._Bt_AbrirConteo.Visible = true;
}
else
{
_Bt_Imprimir.Enabled = true;
_Pnl_Panel_1.Enabled = true;
_Pnl_Panel_2.Enabled = true;
}
}
else
{
_Bt_Imprimir.Enabled = true;
_Pnl_Panel_1.Enabled = true;
_Pnl_Panel_2.Enabled = true;
}
}
}
}
}
catch { Cursor = Cursors.Default; MessageBox.Show("No se pudo conectar con la impresora", "Error", MessageBoxButtons.OK, MessageBoxIcon.Error); _Bt_Imprimir.Enabled = true; Cursor = Cursors.Default; }
finally
{
Cursor = Cursors.Default;
progressBar1.Value = 0;
progressBar1.Refresh();
ticker.Stop();
_Pnl_Espere.Visible = false;
}
}
}