private void fPlanCta_ItemSeleccionadoOk(object sender, OOB.Contable.PlanCta.Ficha e)
{
if (e.Tipo == OOB.Contable.PlanCta.Enumerados.Tipo.Auxiliar)
{
fPlanCta.Close();
switch (IdControl)
{
case 1:
CtaPasivo = e;
L_CTA_PASIVO.Text = e.Cuenta;
break;
case 2:
CtaGasto = e;
L_CTA_GASTO.Text = e.Cuenta;
break;
case 3:
CtaBanco = e;
L_CTA_BANCO.Text = e.Cuenta;
break;
}
}
else
{
Helpers.Msg.Error("Cuenta No Puede Ser Seleccionada" + Environment.NewLine + "Debe Ser Una Cuenta Tipo Auxiliar");
fPlanCta.Visible = true;
}
}
public OOB.Resultado.ResultadoEntidad <decimal> Cuenta_GetSaldoAl(OOB.Contable.PlanCta.Ficha cta, DateTime al)
{
var result = new OOB.Resultado.ResultadoEntidad <decimal>();
try
{
var ficha = new DTO.Contable.Cuenta.SaldoAl()
{
Al = al, idCta = cta.Id
};
var resultDTO = _servicio.Contable_Cuenta_GetSaldoAl(ficha);
if (resultDTO.Result == DTO.EnumResult.isError)
{
result.Mensaje = resultDTO.Mensaje;
result.Result = OOB.Resultado.EnumResult.isError;
return(result);
}
result.Entidad = resultDTO.Entidad;
}
catch (Exception e)
{
result.Mensaje = e.Message;
result.Result = OOB.Resultado.EnumResult.isError;
}
return(result);
}
private void fPlanCta_ItemSeleccionadoOk(object sender, OOB.Contable.PlanCta.Ficha e)
{
if (e.Tipo == OOB.Contable.PlanCta.Enumerados.Tipo.Auxiliar)
{
fPlanCta.Close();
var item = (Detalle)bs.Current;
item.Cta = e;
item.Codigo = e.Codigo;
item.Descripcion = e.Nombre;
DGV.Rows[filaActual].ErrorText = "";
DGV.Rows[filaActual].Cells[columnaActual].ErrorText = "";
int c = 2;
if (e.Naturaleza == OOB.Contable.PlanCta.Enumerados.Naturaleza.Acreedora)
{
c = 3;
}
DGV.CurrentCell = DGV[c, filaActual];
}
else
{
Helpers.Msg.Error("Cuenta No Puede Ser Seleccionada. Debe Ser Una Cuenta Tipo Auxiliar");
}
}
private void CargarData()
{
var r01 = Globals.MyData.Banco_Concepto_GetById(Id);
if (r01.Result == OOB.Resultado.EnumResult.isError)
{
Helpers.Msg.Error(r01.Mensaje);
return;
}
Ficha = r01.Entidad;
L_CONCEPTO.Text = Ficha.Concepto;
L_CTA_PASIVO.Text = Ficha.CtaPasivo.Cuenta;
L_CTA_GASTO.Text = Ficha.CtaGasto.Cuenta;
L_CTA_BANCO.Text = Ficha.CtaBanco.Cuenta;
CtaPasivo = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.CtaPasivo.IdPlanCta,
Codigo = Ficha.CtaPasivo.CodigoCta,
Nombre = Ficha.CtaPasivo.DescripcionCta
};
CtaGasto = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.CtaGasto.IdPlanCta,
Codigo = Ficha.CtaGasto.CodigoCta,
Nombre = Ficha.CtaGasto.DescripcionCta
};
CtaBanco = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.CtaBanco.IdPlanCta,
Codigo = Ficha.CtaBanco.CodigoCta,
Nombre = Ficha.CtaBanco.DescripcionCta
};
}
public Movimiento(OOB.Contable.Cuenta.Filtro filt)
{
InitializeComponent();
filtro = filt;
Cta = filt.Cta;
L_DESDE.Text = filt.Desde.ToShortDateString();
L_HASTA.Text = filt.Hasta.ToShortDateString();
}
private void CargarData()
{
var r01 = Globals.MyData.Configuracion_CtasCierre();
if (r01.Result == OOB.Resultado.EnumResult.isError)
{
Helpers.Msg.Error(r01.Mensaje);
return;
}
CtaCierrePeriodo = r01.Entidad.CtaCierreMes;
TB_CUENTA.Text = CtaCierrePeriodo.Cuenta;
}
private void fPlanCta_ItemSeleccionadoOk(object sender, OOB.Contable.PlanCta.Ficha e)
{
if (e.Tipo == OOB.Contable.PlanCta.Enumerados.Tipo.Auxiliar)
{
fPlanCta.Close();
CtaCierrePeriodo = e;
L_CTA_1.Text = e.Cuenta;
}
else
{
Helpers.Msg.Error("Cuenta No Puede Ser Seleccionada" + Environment.NewLine + "Debe Ser Una Cuenta Tipo Auxiliar");
fPlanCta.Visible = true;
}
}
public OOB.Resultado.Resultado PlanCta_Eliminar(OOB.Contable.PlanCta.Ficha ficha)
{
var result = new OOB.Resultado.Resultado();
var resultDTO = _servicio.Contable_PlanCta_Eliminar(ficha.Id);
if (resultDTO.Result == DTO.EnumResult.isError)
{
result.Result = OOB.Resultado.EnumResult.isError;
result.Mensaje = resultDTO.Mensaje;
}
return(result);
}
public bool Elimina(OOB.Contable.PlanCta.Ficha ficha)
{
var msg = MessageBox.Show("Elimnar Cuenta Contable ?", "*** ALERTA ***", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button2);
if (msg == System.Windows.Forms.DialogResult.Yes)
{
var result = Globals.MyData.PlanCta_Eliminar(ficha);
if (result.Result == OOB.Resultado.EnumResult.isError)
{
Helpers.Msg.Error(result.Mensaje);
return(false);
}
return(true);
}
else
{
return(false);
}
}
private void fPlanCta_ItemSeleccionadoOk(object sender, OOB.Contable.PlanCta.Ficha e)
{
if (e.Tipo == OOB.Contable.PlanCta.Enumerados.Tipo.Auxiliar)
{
fPlanCta.Close();
switch (IdControl)
{
case 1:
CtaInventario = e;
L_CTA_INV.Text = e.Cuenta;
break;
case 2:
CtaCosto = e;
L_CTA_COSTO.Text = e.Cuenta;
break;
case 3:
CtaVenta = e;
L_CTA_VENTA.Text = e.Cuenta;
break;
case 4:
CtaMerma = e;
L_CTA_MERMA.Text = e.Cuenta;
break;
case 5:
CtaConsumo = e;
L_CTA_CONSUMO.Text = e.Cuenta;
break;
}
}
else
{
Helpers.Msg.Error("Cuenta No Puede Ser Seleccionada" + Environment.NewLine + "Debe Ser Una Cuenta Tipo Auxiliar");
fPlanCta.Visible = true;
}
}
private void CargarData()
{
var r01 = Globals.MyData.Bancos_Banco_GetById(Id);
if (r01.Result == OOB.Resultado.EnumResult.isError)
{
Helpers.Msg.Error(r01.Mensaje);
return;
}
Ficha = r01.Entidad;
L_BANCO.Text = Ficha.Banco;
L_CTA.Text = Ficha.CtaContable.Cuenta;
L_CTA_IGTF.Text = Ficha.CtaIGTF.Cuenta;
CtaContable = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.CtaContable.IdPlanCta
};
CtaIGTF = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.CtaIGTF.IdPlanCta
};
}
private void BT_LIMPIAR_GASTO_Click(object sender, EventArgs e)
{
L_CTA_GASTO.Text = "";
CtaGasto = null;
}
private void BT_LIMPIAR_CTA_IGTF_Click(object sender, EventArgs e)
{
CtaIGTF = null;
L_CTA_IGTF.Text = "";
}
private void CargarData()
{
var r01 = Globals.MyData.Empresa_Departamento_GetById(Id);
if (r01.Result == OOB.Resultado.EnumResult.isError)
{
Helpers.Msg.Error(r01.Mensaje);
return;
}
Ficha = r01.Entidad;
L_DEPARTAMENTO.Text = Ficha.Departamento;
switch (TabActivo)
{
case 0: //PRINCIPAL
L_CTA_INV.Text = Ficha.Sucursal_1.CtaInventario.Cuenta;
L_CTA_COSTO.Text = Ficha.Sucursal_1.CtaCosto.Cuenta;
L_CTA_VENTA.Text = Ficha.Sucursal_1.CtaVenta.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_1.CtaMerma.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_1.CtaMerma.Cuenta;
L_CTA_CONSUMO.Text = Ficha.Sucursal_1.CtaConsumoInterno.Cuenta;
CtaInventario = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_1.CtaInventario.IdPlanCta
};
CtaCosto = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_1.CtaCosto.IdPlanCta
};
CtaVenta = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_1.CtaVenta.IdPlanCta
};
CtaMerma = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_1.CtaMerma.IdPlanCta
};
CtaConsumo = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_1.CtaConsumoInterno.IdPlanCta
};
Sucursal = 1;
L_SUCURSAL.Text = "01";
break;
case 1: //PARAPARAL
L_CTA_INV.Text = Ficha.Sucursal_2.CtaInventario.Cuenta;
L_CTA_COSTO.Text = Ficha.Sucursal_2.CtaCosto.Cuenta;
L_CTA_VENTA.Text = Ficha.Sucursal_2.CtaVenta.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_2.CtaMerma.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_2.CtaMerma.Cuenta;
L_CTA_CONSUMO.Text = Ficha.Sucursal_2.CtaConsumoInterno.Cuenta;
CtaInventario = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_2.CtaInventario.IdPlanCta
};
CtaCosto = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_2.CtaCosto.IdPlanCta
};
CtaVenta = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_2.CtaVenta.IdPlanCta
};
CtaMerma = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_2.CtaMerma.IdPlanCta
};
CtaConsumo = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_2.CtaConsumoInterno.IdPlanCta
};
Sucursal = 2;
L_SUCURSAL.Text = "02";
break;
case 2: //AGUA DORADA
L_CTA_INV.Text = Ficha.Sucursal_3.CtaInventario.Cuenta;
L_CTA_COSTO.Text = Ficha.Sucursal_3.CtaCosto.Cuenta;
L_CTA_VENTA.Text = Ficha.Sucursal_3.CtaVenta.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_3.CtaMerma.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_3.CtaMerma.Cuenta;
L_CTA_CONSUMO.Text = Ficha.Sucursal_3.CtaConsumoInterno.Cuenta;
CtaInventario = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_3.CtaInventario.IdPlanCta
};
CtaCosto = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_3.CtaCosto.IdPlanCta
};
CtaVenta = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_3.CtaVenta.IdPlanCta
};
CtaMerma = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_3.CtaMerma.IdPlanCta
};
CtaConsumo = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_3.CtaConsumoInterno.IdPlanCta
};
Sucursal = 3;
L_SUCURSAL.Text = "03";
break;
case 3: //NAGUANAGUA
L_CTA_INV.Text = Ficha.Sucursal_4.CtaInventario.Cuenta;
L_CTA_COSTO.Text = Ficha.Sucursal_4.CtaCosto.Cuenta;
L_CTA_VENTA.Text = Ficha.Sucursal_4.CtaVenta.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_4.CtaMerma.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_4.CtaMerma.Cuenta;
L_CTA_CONSUMO.Text = Ficha.Sucursal_4.CtaConsumoInterno.Cuenta;
CtaInventario = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_4.CtaInventario.IdPlanCta
};
CtaCosto = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_4.CtaCosto.IdPlanCta
};
CtaVenta = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_4.CtaVenta.IdPlanCta
};
CtaMerma = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_4.CtaMerma.IdPlanCta
};
CtaConsumo = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_4.CtaConsumoInterno.IdPlanCta
};
Sucursal = 4;
L_SUCURSAL.Text = "04";
break;
case 4: //SUCURSAL 05
L_CTA_INV.Text = Ficha.Sucursal_5.CtaInventario.Cuenta;
L_CTA_COSTO.Text = Ficha.Sucursal_5.CtaCosto.Cuenta;
L_CTA_VENTA.Text = Ficha.Sucursal_5.CtaVenta.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_5.CtaMerma.Cuenta;
L_CTA_MERMA.Text = Ficha.Sucursal_5.CtaMerma.Cuenta;
L_CTA_CONSUMO.Text = Ficha.Sucursal_5.CtaConsumoInterno.Cuenta;
CtaInventario = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_5.CtaInventario.IdPlanCta
};
CtaCosto = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_5.CtaCosto.IdPlanCta
};
CtaVenta = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_5.CtaVenta.IdPlanCta
};
CtaMerma = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_5.CtaMerma.IdPlanCta
};
CtaConsumo = new OOB.Contable.PlanCta.Ficha()
{
Id = Ficha.Sucursal_5.CtaConsumoInterno.IdPlanCta
};
Sucursal = 5;
L_SUCURSAL.Text = "05";
break;
}
}
private void BT_LIMPIAR_BANCO_Click(object sender, EventArgs e)
{
L_CTA_BANCO.Text = "";
CtaBanco = null;
}
private void BT_LIMPIAR_CTA_Click(object sender, EventArgs e)
{
CtaContable = null;
L_CTA.Text = "";
}
private void BT_LIMPIAR_PASIVO_Click(object sender, EventArgs e)
{
L_CTA_PASIVO.Text = "";
CtaPasivo = null;
}
public Editar(OOB.Contable.PlanCta.Ficha ficha)
{
InitializeComponent();
Ficha = ficha;
}
