private void FrmPagarCargoAbonado_Load(object sender, EventArgs e)
{
booAgregando = true;
DataTableCargar();
ConfigurarForm();
CargarDatos();
MostrarDatos();
booAgregando = false;
FgReg.Focus();
}
private void ToolPdf_Click(object sender, EventArgs e)
{
if (FgReg.Rows.Count == 2)
{
return;
}
int n_idvta = Convert.ToInt32(FgReg.GetData(FgReg.Row, 8));
CN_est_movimientos objRegistro = new CN_est_movimientos(STU_SISTEMA);
objRegistro.STU_SISTEMA = STU_SISTEMA;
objRegistro.ExportarPdf(STU_SISTEMA.EMPRESAID, n_idvta);
objRegistro = null;
}
void HallarTotales()
{
double n_valor = 0;
int n_row = 0;
string c_dato = "";
for (n_row = 2; n_row <= FgReg.Rows.Count - 1; n_row++)
{
c_dato = FgReg.GetData(n_row, 7).ToString();
if (c_dato == "True")
{
n_valor = n_valor + Convert.ToDouble(FgReg.GetData(n_row, 6));
}
}
LblImpPag.Text = n_valor.ToString("0.00");
TxtImpPag.Text = n_valor.ToString("0.00");
}
private void TooNuevo_Click(object sender, EventArgs e)
{
if (FgReg.Rows.Count == 2)
{
return;
}
int n_idvta = Convert.ToInt32(FgReg.GetData(FgReg.Row, 8));
CN_est_movimientos objRegistro = new CN_est_movimientos(STU_SISTEMA);
objRegistro.STU_SISTEMA = STU_SISTEMA;
objRegistro.ImprimirComprobantePago(STU_SISTEMA.EMPRESAID, n_idvta, "", 0, 2, 1);
objRegistro = null;
//int n_idvta = Convert.ToInt32(FgReg.GetData(FgReg.Row, 7));
//string c_dato = "" + "|" + FgReg.GetData(FgReg.Row, 2) + "|" + DateTime.Now.ToString("dd/MM/yyyy") + "|" + "" + "|" + "" + "|" + C_CAJERO + "|" + C_LOCAL + "|" + FgReg.GetData(FgReg.Row, 4) + "|" + FgReg.GetData(FgReg.Row, 6) + "|" + FgReg.GetData(FgReg.Row, 3);
//CN_est_movimientos objRegistro = new CN_est_movimientos(STU_SISTEMA);
//objRegistro.STU_SISTEMA = STU_SISTEMA;
//objRegistro.ImprimirComprobantePago(STU_SISTEMA.EMPRESAID, n_idvta, c_dato, Convert.ToInt32(FgReg.GetData(FgReg.Row, 8)), 2);
//objRegistro = null;
}
void AsignarEntidad()
{
DataTable dtresul = new DataTable();
int n_row = 2;
string c_dato = "";
string C_RECIBO = "";
int N_SERVICIO = 0;
int N_UNIMED = 0;
string C_SERVICIO = "";
string C_PERIODO = "";
for (n_row = 0; n_row <= FgReg.Rows.Count - 1; n_row++)
{
c_dato = FgReg.GetData(n_row, 7).ToString();
if (c_dato == "True")
{
C_RECIBO = FgReg.GetData(n_row, 2).ToString();
N_SERVICIO = Convert.ToInt16(FgReg.GetData(n_row, 10).ToString());
N_UNIMED = Convert.ToInt16(FgReg.GetData(n_row, 11).ToString());
//C_PERIODO = "DEL " + Convert.ToDateTime(FgReg.GetData(n_row, 4)).ToString("dd/MM/yy") + " AL " + Convert.ToDateTime(FgReg.GetData(n_row, 4)).AddDays(30).ToString("dd/MM/yy");
c_dato = FgReg.GetData(n_row, 4).ToString();
C_SERVICIO = c_dato;
}
}
l_DocumentoDet.Clear();
l_DetDoc.Clear();
l_DetOCT.Clear();
e_Documento.n_id = 0;
e_Documento.n_idemp = STU_SISTEMA.EMPRESAID;
e_Documento.n_anotra = STU_SISTEMA.ANOTRABAJO;
e_Documento.n_idmes = STU_SISTEMA.MESTRABAJO;
e_Documento.n_idlib = N_IDLIBRO;
e_Documento.c_numreg = "";
e_Documento.n_idtippro = 23;
e_Documento.n_idcli = Convert.ToInt16(LbIdCliente.Text);
e_Documento.n_idpunvencli = 0;
e_Documento.n_idtipdoc = Convert.ToInt16(CboTipDoc.SelectedValue);
e_Documento.c_numser = TxtNumSer.Text;
e_Documento.c_numdoc = TxtNumDoc.Text;
if (e_Documento.n_idmes == 0)
{
e_Documento.d_fchreg = Convert.ToDateTime("01/01/" + e_Documento.n_anotra.ToString("0000"));
}
else
{
e_Documento.d_fchreg = Convert.ToDateTime("01/" + TxtFecha.Text.Substring(3, 2) + "/" + TxtFecha.Text.Substring(6, 4));
}
e_Documento.d_fchdoc = Convert.ToDateTime(TxtFecha.Text);
e_Documento.d_fchven = Convert.ToDateTime(TxtFecha.Text);
e_Documento.n_idconpag = 1;
e_Documento.n_idmon = Convert.ToInt16(CboMoneda.SelectedValue);
e_Documento.n_impbru = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
e_Documento.n_impbru2 = 0;
e_Documento.n_impbru3 = 0;
e_Documento.n_impinaf = 0;
e_Documento.n_impigv = (Convert.ToDouble(TxtImpPag.Text) - (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1)));
e_Documento.n_impisc = 0;
e_Documento.n_impotr = 0;
e_Documento.n_imptotven = Convert.ToDouble(TxtImpPag.Text);
e_Documento.n_tc = Convert.ToDouble(LblTc.Text);
e_Documento.n_impsal = Convert.ToDouble(TxtImpPag.Text);
e_Documento.n_idven = 0;
e_Documento.n_tasaigv = douIGVTasa;
e_Documento.c_glosa = "COBRANZA DEL CARGO Nº " + C_RECIBO;
e_Documento.n_impsubtot = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
e_Documento.n_pordsc = 0;
e_Documento.n_idtipope = 1;
e_Documento.n_idtipdocref = 0;
e_Documento.n_iddocref = 0;
e_Documento.c_serdocref = "";
e_Documento.c_numdocref = "";
string c_mon = "";
if (Convert.ToDouble(CboMoneda.SelectedValue) == 115)
{
c_mon = "SOLES.";
}
if (Convert.ToDouble(CboMoneda.SelectedValue) == 151)
{
c_mon = "DOLARES AMERICANOS.";
}
e_Documento.c_numlet = funLet.Convertir(TxtImpPag.Text, true, c_mon);
e_Documento.n_oriitem = 1; // INDICAMOS QUE LA VENTA NO TIENE GUIA DE REMISION
e_Documento.n_anulado = 0;
e_Documento.c_motnc = "";
e_Documento.n_idforpag = 1; // INDICAMOS QUE LA FORMA DE PAGO ES EN EFECTIVO
e_Documento.n_idtarcre = 0; // NO HAY TARJETA DE CREDITO
// PREPARAMOS EL DETALLE DE LA VENTA
BE_VTA_VENTASDET BE_Detalle = new BE_VTA_VENTASDET();
BE_Detalle.n_idvta = e_Documento.n_id;
BE_Detalle.n_canpro = 1;
BE_Detalle.n_iditem = N_SERVICIO;
//N_UNIMED = Convert.ToInt32(funGen.DataTableBuscar(dtservicio, "n_id", "n_idunimed", N_SERVICIO.ToString(), "N"));
BE_Detalle.n_idunimed = N_UNIMED;
BE_Detalle.n_preunibru = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
BE_Detalle.n_preuninet = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
BE_Detalle.n_imptot = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
BE_Detalle.c_desusu = C_SERVICIO;
BE_Detalle.n_idtipven = 0;
BE_Detalle.n_pordsc = 0;
BE_Detalle.n_porigv = douIGVTasa;
BE_Detalle.n_preuninetigv = Convert.ToDouble(TxtImpPag.Text);
BE_Detalle.n_imptotigv = Convert.ToDouble(TxtImpPag.Text);
BE_Detalle.n_idtipafeigv = 1;
BE_Detalle.c_datadi = "";
l_DocumentoDet.Add(BE_Detalle);
l_DetOCT.Clear();
BE_VTA_VENTASOCT entOC = new BE_VTA_VENTASOCT();
//// 1001 - Total valor de venta - operaciones gravadas
entOC.n_idvta = 0;
entOC.n_idcon = 1;
entOC.n_importe = (Convert.ToDouble(TxtImpPag.Text) / ((douIGVTasa / 100) + 1));
l_DetOCT.Add(entOC);
l_DetDat.Clear();
BE_VTA_VENTASDAT entDat = new BE_VTA_VENTASDAT();
entDat.n_idvta = 0;
entDat.n_idcaj = Convert.ToInt16(CboCajero.SelectedValue);
entDat.c_cajnom = STU_SISTEMA.USUARIOALIAS; //CboCajero.Text;
entDat.n_idloc = Convert.ToInt16(N_LOCAL);
entDat.c_locdes = C_LOCAL;
entDat.h_horemi = DateTime.Now.ToString("HH:mm:ss");
entDat.c_numpla = TxtNumPla.Text;
entDat.c_horini = "";
entDat.c_horfin = "";
entDat.c_tiempousu = "";
l_DetDat.Add(entDat);
double n_valor = 0;
string c_numasi = "";
int n_idcueite = 0;
int n_idcuedoc = 0;
int n_idcueigv = 0;
string c_abrtipdoc = "";
DataTable dtResult = new DataTable();
CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);
CN_con_diario o_diario = new CN_con_diario();
o_diario.mysConec = o_conec.mysConec;
c_numasi = o_diario.ObtenerUltimoAsiento(STU_SISTEMA.ANOTRABAJO, STU_SISTEMA.MESTRABAJO, 14, STU_SISTEMA.EMPRESAID);
o_conec = null;
// OBTENEMOS EL ID DE LA CUENTA CONTABLE DEL DOCUMENTO DE VENTA
dtResult = funGen.DataTableFiltrar(dtdoccuecon, "n_idtipdoc = " + Convert.ToInt16(CboTipDoc.SelectedValue) + " AND n_idmon = " + Convert.ToInt16(CboMoneda.SelectedValue) + "");
if (dtResult.Rows.Count == 0)
{
MessageBox.Show("¡ El tipo de documento seleccionado no tiene cuenta contable asignada, asignele una cuenta contable en el menu contabilidad !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
return;
}
n_idcuedoc = Convert.ToInt16(dtResult.Rows[0]["n_idcueven"]);
// OBTENEMOS EL ID DE LA CUENTA CONTABLE DEL IMPUESTO DE LA VENTA
dtResult = funGen.DataTableFiltrar(dtdocimp, "n_idtipdoc = " + Convert.ToInt16(CboTipDoc.SelectedValue) + "");
if (dtResult.Rows.Count == 0)
{
MessageBox.Show("¡ El tipo de documento seleccionado no tiene un impuesto asignado, asignele una cuenta contable en el menu contabilidad !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
return;
}
n_idcueigv = Convert.ToInt16(dtResult.Rows[0]["n_idcueven"]);
// OBTENEMOS EL ID DE LA CUENTA CONTABLE DEL SERVICIO
dtResult = funGen.DataTableFiltrar(dtpcite, "n_iditem = " + N_SERVICIO + "");
if (dtResult.Rows.Count == 0)
{
MessageBox.Show("¡ El item seleccionado no tiene cuenta contable asignada, asignele una cuenta contable en el menu contabilidad !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
return;
}
n_idcueite = Convert.ToInt16(dtResult.Rows[0]["n_idpcven"]);
// OBTENEMOS LA ABREVIATURA DEL TIPO DE DOUCMENTO
dtResult = funGen.DataTableFiltrar(dtTipDocumento, "n_id = " + Convert.ToInt16(CboTipDoc.SelectedValue) + "");
c_abrtipdoc = dtResult.Rows[0]["c_abr"].ToString();
// ******************************************
// CREAMOS LOS ASIENTOS CONTABLES DE LA VENTA
l_Diario.Clear();
// *****************
// AGREGAMOS EL DEBE
BE_CON_DIARIO ediario = new BE_CON_DIARIO();
ediario.n_id = 0;
ediario.n_idemp = STU_SISTEMA.EMPRESAID;
ediario.n_ano = STU_SISTEMA.ANOTRABAJO;
ediario.n_mes = STU_SISTEMA.MESTRABAJO;
ediario.n_lib = 14;
ediario.c_numasi = c_numasi;
ediario.n_idcue = n_idcuedoc;
ediario.n_tc = Convert.ToDouble(LblTc.Text);
if (Convert.ToInt16(CboMoneda.SelectedValue) == 115)
{
ediario.n_impdebsol = Convert.ToDouble(TxtImpPag.Text);
ediario.n_imphabsol = 0;
ediario.n_impdebdol = Convert.ToDouble(TxtImpPag.Text) / Convert.ToDouble(LblTc.Text);
ediario.n_imphabdol = 0;
}
else
{
ediario.n_impdebsol = Convert.ToDouble(TxtImpPag.Text) * Convert.ToDouble(LblTc.Text);
ediario.n_imphabsol = 0;
ediario.n_impdebdol = Convert.ToDouble(TxtImpPag.Text);
ediario.n_imphabdol = 0;
}
ediario.d_fchasi = Convert.ToDateTime(TxtFecha.Text);
ediario.d_orifchdoc = Convert.ToDateTime(TxtFecha.Text);
ediario.n_oriid = 0;
ediario.n_oriidtipdoc = Convert.ToInt16(CboTipDoc.SelectedValue);
ediario.n_oriidtipmon = Convert.ToInt16(CboMoneda.SelectedValue);
ediario.c_orinumdoc = TxtNumSer.Text + "-" + TxtNumDoc.Text;
ediario.c_origlo = "";
ediario.c_oridestipmon = CboMoneda.Text;
ediario.c_oridestipdoc = c_abrtipdoc;
ediario.c_orinomcli = TxtApeNom.Text;
ediario.c_orinumruc = "";
l_Diario.Add(ediario);
// *****************************
// ESCRIBIMOS EL IGV DE LA VENTA
if ((Convert.ToDouble(CboTipDoc.SelectedValue) == 2) || (Convert.ToDouble(CboTipDoc.SelectedValue) == 4))
{
BE_CON_DIARIO ediario2 = new BE_CON_DIARIO();
n_valor = 0;
n_valor = (Convert.ToDouble(TxtImpPag.Text) - (Convert.ToDouble(TxtImpPag.Text) / 1.18));
ediario2.n_id = 0;
ediario2.n_idemp = STU_SISTEMA.EMPRESAID;
ediario2.n_ano = STU_SISTEMA.ANOTRABAJO;
ediario2.n_mes = STU_SISTEMA.MESTRABAJO;
ediario2.n_lib = 14;
ediario2.c_numasi = c_numasi;
ediario2.n_idcue = n_idcueigv;
ediario2.n_tc = Convert.ToDouble(LblTc.Text);
if (Convert.ToInt16(CboMoneda.SelectedValue) == 115)
{
ediario2.n_impdebsol = 0;
ediario2.n_imphabsol = n_valor;
ediario2.n_impdebdol = 0;
ediario2.n_imphabdol = n_valor / Convert.ToDouble(LblTc.Text);
}
else
{
ediario2.n_impdebsol = 0;
ediario2.n_imphabsol = n_valor * Convert.ToDouble(LblTc.Text);
ediario2.n_impdebdol = 0;
ediario2.n_imphabdol = n_valor;
}
ediario2.d_fchasi = Convert.ToDateTime(TxtFecha.Text);
ediario2.d_orifchdoc = Convert.ToDateTime(TxtFecha.Text);
ediario2.n_oriid = 0;
ediario2.n_oriidtipdoc = Convert.ToInt16(CboTipDoc.SelectedValue);
ediario2.n_oriidtipmon = Convert.ToInt16(CboMoneda.SelectedValue);
ediario2.c_orinumdoc = TxtNumSer.Text + "-" + TxtNumDoc.Text;
ediario2.c_origlo = "";
ediario.c_oridestipmon = CboMoneda.Text;
ediario.c_oridestipdoc = c_abrtipdoc;
ediario.c_orinomcli = TxtApeNom.Text;
ediario.c_orinumruc = "";
l_Diario.Add(ediario2);
}
// *******************************
// ESCRIBIMOS EL HABER DEL ASIENTO
BE_CON_DIARIO ediario3 = new BE_CON_DIARIO();
if ((Convert.ToDouble(CboTipDoc.SelectedValue) == 2) || (Convert.ToDouble(CboTipDoc.SelectedValue) == 4))
{
n_valor = (Convert.ToDouble(TxtImpPag.Text) / 1.18);
}
else
{
n_valor = Convert.ToDouble(TxtImpPag.Text);
}
ediario3.n_id = 0;
ediario3.n_idemp = STU_SISTEMA.EMPRESAID;
ediario3.n_ano = STU_SISTEMA.ANOTRABAJO;
ediario3.n_mes = STU_SISTEMA.MESTRABAJO;
ediario3.n_lib = 14;
ediario3.c_numasi = c_numasi;
ediario3.n_idcue = n_idcueite;
ediario3.n_tc = Convert.ToDouble(LblTc.Text);
if (Convert.ToInt16(CboMoneda.SelectedValue) == 115)
{
ediario3.n_impdebsol = 0;
ediario3.n_imphabsol = n_valor;
ediario3.n_impdebdol = 0;
ediario3.n_imphabdol = n_valor / Convert.ToDouble(LblTc.Text);
}
else
{
ediario3.n_impdebsol = 0;
ediario3.n_imphabsol = n_valor * Convert.ToDouble(LblTc.Text);
ediario3.n_impdebdol = 0;
ediario3.n_imphabdol = n_valor;
}
ediario3.d_fchasi = Convert.ToDateTime(TxtFecha.Text);
ediario3.d_orifchdoc = Convert.ToDateTime(TxtFecha.Text);
ediario3.n_oriid = 0;
ediario3.n_oriidtipdoc = Convert.ToInt16(CboTipDoc.SelectedValue);
ediario3.n_oriidtipmon = Convert.ToInt16(CboMoneda.SelectedValue);
ediario3.c_orinumdoc = TxtNumSer.Text + "-" + TxtNumDoc.Text;
ediario3.c_origlo = "";
ediario.c_oridestipmon = CboMoneda.Text;
ediario.c_oridestipdoc = c_abrtipdoc;
ediario.c_orinomcli = TxtApeNom.Text;
ediario.c_orinumruc = "";
l_Diario.Add(ediario3);
}
private void CmdAce_Click(object sender, EventArgs e)
{
if (funFunciones.NulosC(TxtNumSer.Text) == "")
{
MessageBox.Show("¡ No ha especificado el numero de serie del documento !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
TxtNumSer.Focus();
return;
}
if (funFunciones.NulosC(TxtNumDoc.Text) == "")
{
MessageBox.Show("¡ No ha especificado el numero de documento !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
TxtNumDoc.Focus();
return;
}
if (FgReg.Rows.Count == 2)
{
MessageBox.Show("¡ No hay cargos a cobrar !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
FgReg.Focus();
return;
}
if (Convert.ToInt16(CboTipDoc.SelectedValue) == 0)
{
MessageBox.Show("¡ No ha especificado el tipo de documento que se emitira, debe definir el documento en el maestro de clientes !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
CboTipDoc.Focus();
return;
}
if (Convert.ToDouble(TxtImpPag.Text) == 0)
{
MessageBox.Show("¡ El abonado no tiene cargos pendientes !", "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
TxtImpPag.Focus();
return;
}
CN_vta_ventas o_ventas = new CN_vta_ventas();
string c_dato = "";
AsignarEntidad();
CN_est_conecta o_conec = new CN_est_conecta(STU_SISTEMA);
o_ventas.mysConec = o_conec.mysConec;
o_ventas.LstDetalle = l_DocumentoDet;
o_ventas.LstDocumentos = l_DetDoc;
o_ventas.LstDetalleOCT = l_DetOCT;
o_ventas.LstDatos = l_DetDat;
o_ventas.l_diario = l_Diario;
o_ventas.STU_SISTEMA = STU_SISTEMA;
int n_row = 0;
int n_idcargo = 0;
for (n_row = 0; n_row <= FgReg.Rows.Count - 1; n_row++)
{
c_dato = FgReg.GetData(n_row, 7).ToString();
if (c_dato == "True")
{
n_idcargo = Convert.ToInt32(FgReg.GetData(n_row, 9));
}
}
if (o_ventas.Insertar2(e_Documento, n_idcargo) == true)
{
CN_est_movimientos objRegistro = new CN_est_movimientos(STU_SISTEMA);
objRegistro.STU_SISTEMA = STU_SISTEMA;
objRegistro.ImprimirComprobantePago(STU_SISTEMA.EMPRESAID, Convert.ToInt32(o_ventas.n_IdGenerado), "", 0, N_VISTAPREVIA, 1);
objRegistro = null;
}
else
{
MessageBox.Show("¡ ¨Ha ocurrido un un problema, no se pudo guardar el registro ! Error Nº : " + o_ventas.IntErrorNumber.ToString() + " = " + o_ventas.StrErrorMensaje, "", MessageBoxButtons.OK, MessageBoxIcon.Information, MessageBoxDefaultButton.Button1);
}
CmdCan_Click(sender, e);
o_conec = null;
}
