public override int buscarRegistros()
{
TList_CfgFrota lista = TCN_CfgFrota.Buscar(cd_empresa.Text,
cd_produto.Text,
cd_localarm.Text,
id_despesa.Text,
null);
if (lista != null)
{
if (lista.Count > 0)
{
this.Lista = lista;
bsCfgFrota.DataSource = lista;
}
else
if ((vTP_Modo == Utils.TTpModo.tm_Standby) || (vTP_Modo == Utils.TTpModo.tm_busca))
{
bsCfgFrota.Clear();
}
return(lista.Count);
}
else
{
return(0);
}
}
private void btn_manutencao_Click(object sender, EventArgs e)
{
if (bsPneus.Current != null)
{
if ((bsPneus.Current as TRegistro_LanPneu).St_registro.ToUpper().Equals("M"))
{
MessageBox.Show("Pneu já se encontra em MANUTENÇÃO!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
else if ((bsPneus.Current as TRegistro_LanPneu).St_registro.ToUpper().Equals("R"))
{
int hodometro = 0;
using (Componentes.TFQuantidade fQtde = new Componentes.TFQuantidade())
{
fQtde.Ds_label = "Hodometro final";
TpBusca[] tpBuscas = new TpBusca[0];
Estruturas.CriarParametro(ref tpBuscas, "a.cd_empresa", (bsPneus.Current as TRegistro_LanPneu).Cd_empresa);
Estruturas.CriarParametro(ref tpBuscas, "a.id_pneu", (bsPneus.Current as TRegistro_LanPneu).Id_pneustr);
Estruturas.CriarParametro(ref tpBuscas, "a.id_veiculo", (bsPneus.Current as TRegistro_LanPneu).Id_veiculo);
Estruturas.CriarParametro(ref tpBuscas, "a.id_rodado", (bsPneus.Current as TRegistro_LanPneu).Id_rodado);
fQtde.Vl_default = Convert.ToDecimal(new CamadaDados.Frota.TCD_MovPneu().BuscarEscalar(tpBuscas, "a.hodometro", "id_mov desc").ToString());
fQtde.Vl_Minimo = fQtde.Vl_default;
fQtde.Casas_decimais = 0;
fQtde.St_permitirValorZero = false;
if (fQtde.ShowDialog() == DialogResult.OK)
{
hodometro = Convert.ToInt32(fQtde.Quantidade);
}
else
{
MessageBox.Show("Obrigatório informar hodometro para desativação!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
TCN_LanPneu.EnvioAlmoxarifado(bsPneus.Current as TRegistro_LanPneu, hodometro, null);
}
try
{
using (TFDadosMovPneu fDadosMovPneu = new TFDadosMovPneu())
{
if (fDadosMovPneu.ShowDialog() == DialogResult.OK)
{
if (fDadosMovPneu.rMovPneu != null)
{
try
{
TList_CfgFrota lCfg = TCN_CfgFrota.Buscar((bsPneus.Current as TRegistro_LanPneu).Cd_empresa,
string.Empty,
string.Empty,
string.Empty,
null);
if (!string.IsNullOrEmpty(lCfg[0].Tp_duplicata))
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.vCd_empresa = (bsPneus.Current as TRegistro_LanPneu).Cd_empresa;
fDup.vNm_empresa = (bsPneus.Current as TRegistro_LanPneu).Nm_empresa;
fDup.vCd_clifor = string.Empty;
fDup.vNm_clifor = string.Empty;
//Buscar endereco clifor oficina
CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fDup.vCd_clifor,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
1,
null);
if (lEnd.Count > 0)
{
fDup.vCd_endereco = lEnd[0].Cd_endereco;
fDup.vDs_endereco = lEnd[0].Ds_endereco;
}
if (lCfg.Count > 0)
{
fDup.vTp_docto = lCfg[0].Tp_doctostr;
fDup.vDs_tpdocto = lCfg[0].Ds_tpdocto;
fDup.vTp_duplicata = lCfg[0].Tp_duplicata;
fDup.vDs_tpduplicata = lCfg[0].Ds_tpduplicata;
fDup.vTp_mov = "P";
fDup.vCd_historico = lCfg[0].Cd_historico;
fDup.vDs_historico = lCfg[0].Ds_historico;
fDup.vDt_emissao = fDadosMovPneu.rMovPneu.Dt_movimentostr;
fDup.vVl_documento = fDadosMovPneu.rMovPneu.Valor_OS;
fDup.vNr_docto = fDadosMovPneu.rMovPneu.Nr_OS;
fDup.vSt_ecf = true;
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
fDadosMovPneu.rMovPneu.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
else
{
MessageBox.Show("Obrigatório informar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
}
fDadosMovPneu.rMovPneu.Cd_empresa = (bsPneus.Current as TRegistro_LanPneu).Cd_empresa;
fDadosMovPneu.rMovPneu.Cd_produto = (bsPneus.Current as TRegistro_LanPneu).Cd_produto;
fDadosMovPneu.rMovPneu.Id_pneu = (bsPneus.Current as TRegistro_LanPneu).Id_pneu;
fDadosMovPneu.rMovPneu.St_rodando = "N";
CamadaNegocio.Frota.TCN_MovPneu.GravarManutencao(fDadosMovPneu.rMovPneu, (bsPneus.Current as TRegistro_LanPneu), null);
MessageBox.Show("Pneu enviado para a manutenção!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}