private void bb_empresa_Click(object sender, EventArgs e)
{
FormBusca.UtilPesquisa.BTN_BuscaEmpresa(new Componentes.EditDefault[] { cd_empresa, nm_empresa }, string.Empty);
if (!string.IsNullOrEmpty(cd_empresa.Text))
{
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(cd_empresa.Text,
string.Empty,
string.Empty,
string.Empty,
null);
if (lCfg.Count > 0)
{
cd_combustivel.Text = lCfg[0].Cd_combustivel;
ds_combustivel.Text = lCfg[0].Ds_combustivel;
id_despesa.Text = lCfg[0].Id_despesacombustivelstr;
ds_despesa.Text = lCfg[0].Ds_despesacombustivel;
}
else
{
MessageBox.Show("Não existe combustivel configurado para a empresa " + cd_empresa.Text.Trim() + ".",
"Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cd_empresa.Clear();
cd_empresa.Focus();
return;
}
}
}
private void afterNovo()
{
using (TFInfracoes fInfracao = new TFInfracoes())
{
if (fInfracao.ShowDialog() == DialogResult.OK)
{
if (fInfracao.rInfracoes != null)
{
//Buscar config abast
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fInfracao.rInfracoes.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 = fInfracao.rInfracoes.Cd_empresa;
fDup.vNm_empresa = fInfracao.rInfracoes.Nm_empresa;
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 = fInfracao.rInfracoes.Dt_infracaostr;
fDup.vVl_documento = fInfracao.rInfracoes.Vl_infracao;
fDup.vNr_docto = fInfracao.rInfracoes.Cd_infracao;
fDup.vSt_ecf = true;
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
fInfracao.rInfracoes.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
}
}
}
try
{
CamadaNegocio.Frota.Cadastros.TCN_Infracoes.Gravar(fInfracao.rInfracoes, null);
MessageBox.Show("Infração gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparRegistro();
id_infracao.Text = fInfracao.rInfracoes.Id_infracaostr;
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
private void empresa_SelectedIndexChanged(object sender, EventArgs e)
{
if (empresa.SelectedValue != null)
{
lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(empresa.SelectedValue.ToString(),
string.Empty,
string.Empty,
string.Empty,
null);
if (lCfg.Count > 0)
{
if (!string.IsNullOrEmpty(lCfg[0].Cd_terminal) && (lCfg[0].Cd_terminal == Utils.Parametros.pubTerminal))
{
tmpAbastecimento.Enabled = false;
if ((!string.IsNullOrEmpty(lCfg[0].Tp_concentrador)) && (lCfg[0].Porta_comunicacao > decimal.Zero))
{
lblConcentrador.Text = lCfg[0].Tipo_concentrador;
tmpAbastecimento.Interval = lCfg[0].Tmp_abastecimento > decimal.Zero ? Convert.ToInt32(lCfg[0].Tmp_abastecimento) : 5000;
//Abrir porta comunicacao
if (PostoCombustivel.TAutomacao.AbrirPorta(lCfg[0].Tp_concentrador, Convert.ToInt32(lCfg[0].Porta_comunicacao)))
{
lblStatus.Text = "ONLINE";
lblStatus.ForeColor = Color.Blue;
tmpAbastecimento.Enabled = true;
}
else
{
lblStatus.Text = "OFFLINE";
lblStatus.ForeColor = Color.Red;
}
}
else
{
lblConcentrador.Text = "SEM AUTOMAÇÃO";
}
}
else
{
lblConcentrador.Text = "SEM TERMINAL";
}
}
}
}
private void Processar()
{
if (bsAcerto.Current != null)
{
if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).St_registro.Trim().ToUpper().Equals("P"))
{
MessageBox.Show("Acerto ja se encontra PROCESSADO.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
if (MessageBox.Show("Confirma processamento do acerto?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1)
== DialogResult.Yes)
{
if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_sobradinheiro > decimal.Zero)
{
using (Financeiro.TFLanCaixa fCaixa = new Financeiro.TFLanCaixa())
{
fCaixa.Text = "CAIXA SOBRA DINHEIRO";
fCaixa.dsLanCaixa.AddNew();
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_Empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Nm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa;
//buscar cfg frota
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa,
string.Empty,
string.Empty,
string.Empty,
null);
if (lCfg.Count > 0)
{
if (!string.IsNullOrEmpty(lCfg[0].Cd_contager))
{
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Cd_ContaGer = lCfg[0].Cd_contager;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Ds_ContaGer = lCfg[0].Ds_contager;
fCaixa.CD_ContaGer.Enabled = false;
fCaixa.BB_ContaGer.Enabled = false;
}
}
fCaixa.RB_Receber.Checked = true;
fCaixa.RB_Pagar.Enabled = false;
fCaixa.RB_Receber.Enabled = false;
(fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa).Vl_RECEBER = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_sobradinheiro;
fCaixa.VL_Receber.Enabled = false;
if (fCaixa.ShowDialog() == DialogResult.OK)
{
if (fCaixa.dsLanCaixa.Current != null)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa = fCaixa.dsLanCaixa.Current as CamadaDados.Financeiro.Caixa.TRegistro_LanCaixa;
if (MessageBox.Show("Deseja gerar credito com a sobra de dinheiro?", "Pergunta", MessageBoxButtons.YesNo,
MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.Yes)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto = new CamadaDados.Financeiro.Adiantamento.TRegistro_LanAdiantamento();
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_motorista;
//endereco
CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_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)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.CD_Endereco = lEnd[0].Cd_endereco;
}
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Tp_movimento = "C";
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Dt_lancto = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Dt_lancto;
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Vl_adto = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Vl_RECEBER;
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.ST_ADTO = "A";
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.TP_Lancto = "R";
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rAdto.Cd_contager_qt = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rCaixa.Cd_ContaGer;
}
}
else
{
MessageBox.Show("Obrigatorio informar caixa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
else
{
MessageBox.Show("Obrigatorio informar caixa.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
if ((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_resultado < decimal.Zero)
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.Text = "DUPLICATA A PAGAR PARA O MOTORISTA";
//Empresa
fDup.vCd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
fDup.vNm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa;
fDup.cd_empresa.Enabled = false;
fDup.bb_empresa.Enabled = false;
//Cliente
fDup.vCd_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_motorista;
fDup.vNm_clifor = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_motorista;
fDup.cd_clifor.Enabled = false;
fDup.bb_clifor.Enabled = false;
//endereco
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;
fDup.cd_endereco.Enabled = false;
fDup.bb_endereco.Enabled = false;
}
fDup.vTp_mov = "P";
fDup.vVl_documento = Math.Abs((bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Vl_resultado);
fDup.vl_documento_index.Enabled = false;
fDup.vNr_docto = "AC" + (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Id_acertostr;
fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
else
{
if (MessageBox.Show("Deseja Processar o Acerto sem gerar Financeiro!.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.No)
{
return;
}
}
}
}
(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).lCartaFrete.ForEach(p =>
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.Text = "DUPLICATA CARTA FRETE Nº" + p.Nr_cartafretestr;
//Empresa
fDup.vCd_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
fDup.vNm_empresa = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Nm_empresa;
fDup.cd_empresa.Enabled = false;
fDup.bb_empresa.Enabled = false;
fDup.vTp_mov = "P";
fDup.vVl_documento = p.Vl_documento;
fDup.vl_documento_index.Enabled = false;
fDup.vNr_docto = "CARTAFRETE" + p.Nr_cartafretestr;
fDup.vDt_emissao = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
p.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
else
{
if (MessageBox.Show("Deseja Processar o Acerto sem gerar Financeiro!.", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1) == DialogResult.No)
{
return;
}
}
}
});
try
{
CamadaNegocio.Frota.TCN_AcertoMotorista.ProcessarAcerto(bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista, null);
MessageBox.Show("Acerto processado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparFiltros();
id_acerto.Text = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Id_acertostr;
cd_empresa.Text = (bsAcerto.Current as CamadaDados.Frota.TRegistro_AcertoMotorista).Cd_empresa;
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
private void afterNovo()
{
using (TFAbastAvulso fAbast = new TFAbastAvulso())
{
if (fAbast.ShowDialog() == DialogResult.OK)
{
if (fAbast.rAbast != null)
{
if (fAbast.rAbast.Tp_abastecimento.Trim().ToUpper().Equals("T") &&
fAbast.rAbast.Tp_pagamento.Trim().ToUpper().Equals("E"))
{
//Buscar config abast
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fAbast.rAbast.Cd_empresa,
string.Empty,
string.Empty,
string.Empty,
null);
if (!string.IsNullOrEmpty(lCfg[0].Tp_duplicata) && !string.IsNullOrEmpty(fAbast.vCd_clifor))
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.vCd_empresa = fAbast.rAbast.Cd_empresa;
fDup.vNm_empresa = fAbast.rAbast.Nm_empresa;
fDup.vCd_clifor = fAbast.vCd_clifor;
fDup.vNm_clifor = fAbast.rAbast.Nm_fornecedor;
fDup.vCd_endereco = fAbast.vCd_endereco;
fDup.vDs_endereco = fAbast.vDs_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 = fAbast.rAbast.Dt_abastecimentostr;
fDup.vVl_documento = fAbast.rAbast.Vl_subtotal;
fDup.vNr_docto = fAbast.rAbast.Nr_notafiscal;
fDup.vSt_ecf = true;
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
fAbast.rAbast.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
}
}
}
}
try
{
fAbast.rAbast.Tp_captura = "M";
fAbast.rAbast.Tp_registro = "A";
CamadaNegocio.Frota.TCN_AbastVeiculo.Gravar(fAbast.rAbast, null);
MessageBox.Show("Abastecimento gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
LimparFiltros();
id_abastecimento.Text = fAbast.rAbast.Id_abastecimentostr;
afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
public TFLanAbastFrota()
{
InitializeComponent();
lCfg = new CamadaDados.Frota.Cadastros.TList_CfgFrota();
}
private void afterGerarArqXml()
{
if (string.IsNullOrEmpty(CD_Empresa.Text))
{
MessageBox.Show("Obrigatório informar transportadora.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_Empresa.Focus();
return;
}
if (string.IsNullOrEmpty(nr_cte.Text))
{
if (dt_inicial.Text.Trim().Equals(string.Empty) || dt_inicial.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Obrigatorio informar data inicial.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
dt_inicial.Focus();
return;
}
if (dt_final.Text.Trim().Equals(string.Empty) || dt_final.Text.Trim().Equals("/ /"))
{
MessageBox.Show("Obrigatorio informar data final.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
dt_final.Focus();
return;
}
}
string path = string.Empty;
using (FolderBrowserDialog fbdPath = new FolderBrowserDialog())
{
if (fbdPath.ShowDialog() == DialogResult.OK)
{
path = fbdPath.SelectedPath.Trim();
}
else
{
return;
}
}
//Criar diretorio caso não exista
if (!System.IO.Directory.Exists(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy")))
{
System.IO.Directory.CreateDirectory(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy"));
}
else
if (System.IO.Directory.GetFiles(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy")).Length > 0)
{
if (MessageBox.Show("Apagar arquivos existentes no diretório?", "Pergunta", MessageBoxButtons.YesNo, MessageBoxIcon.Question, MessageBoxDefaultButton.Button1)
== DialogResult.Yes)
{
foreach (string s in System.IO.Directory.GetFiles(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy")))
{
System.IO.File.Delete(s);
}
}
}
try
{
TpBusca[] filtro = new TpBusca[3];
//Emissao Propria
filtro[0].vNM_Campo = "a.tp_emissao";
filtro[0].vOperador = "=";
filtro[0].vVL_Busca = "'P'";
//CTe
filtro[1].vNM_Campo = "a.cd_modelo";
filtro[1].vOperador = "=";
filtro[1].vVL_Busca = "57";
//CTe Aceito
filtro[2].vNM_Campo = "a.status_cte";
filtro[2].vOperador = "=";
filtro[2].vVL_Busca = "'100'";
if (!string.IsNullOrEmpty(nr_cte.Text))
{
Array.Resize(ref filtro, filtro.Length + 1);
filtro[filtro.Length - 1].vNM_Campo = "a.nr_ctrc";
filtro[filtro.Length - 1].vOperador = "=";
filtro[filtro.Length - 1].vVL_Busca = nr_cte.Text;
}
if (!string.IsNullOrEmpty(dt_inicial.Text.SoNumero()))
{
Array.Resize(ref filtro, filtro.Length + 1);
filtro[filtro.Length - 1].vNM_Campo = "convert(datetime, floor(convert(decimal(30,10), a.dt_emissao)))";
filtro[filtro.Length - 1].vOperador = ">=";
filtro[filtro.Length - 1].vVL_Busca = "'" + DateTime.Parse(dt_inicial.Text).ToString("yyyyMMdd") + "'";
}
if (!string.IsNullOrEmpty(dt_final.Text.SoNumero()))
{
Array.Resize(ref filtro, filtro.Length + 1);
filtro[filtro.Length - 1].vNM_Campo = "convert(datetime, floor(convert(decimal(30,10), a.dt_emissao)))";
filtro[filtro.Length - 1].vOperador = "<=";
filtro[filtro.Length - 1].vVL_Busca = "'" + DateTime.Parse(dt_final.Text).ToString("yyyyMMdd") + "'";
}
if (!string.IsNullOrEmpty(CD_Empresa.Text))
{
Array.Resize(ref filtro, filtro.Length + 1);
filtro[filtro.Length - 1].vNM_Campo = "a.cd_empresa";
filtro[filtro.Length - 1].vOperador = "=";
filtro[filtro.Length - 1].vVL_Busca = "'" + CD_Empresa.Text.Trim() + "'";
}
if (!string.IsNullOrEmpty(cd_remetente.Text))
{
Array.Resize(ref filtro, filtro.Length + 1);
filtro[filtro.Length - 1].vNM_Campo = "a.cd_remetente";
filtro[filtro.Length - 1].vOperador = "=";
filtro[filtro.Length - 1].vVL_Busca = "'" + cd_remetente.Text.Trim() + "'";
}
if (!string.IsNullOrEmpty(cd_destinatario.Text))
{
Array.Resize(ref filtro, filtro.Length + 1);
filtro[filtro.Length - 1].vNM_Campo = "a.cd_destinatario";
filtro[filtro.Length - 1].vOperador = "=";
filtro[filtro.Length - 1].vVL_Busca = "'" + cd_destinatario.Text.Trim() + "'";
}
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg = CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(CD_Empresa.Text,
string.Empty,
string.Empty,
string.Empty,
null);
if (lCfg.Count.Equals(0))
{
MessageBox.Show("Não existe configuração de CTe para transportadora selecionado.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
string msg = CTe.GerarArq.TGerarArq.GerarArquivoXmlPeriodo(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy"),
new CamadaDados.Faturamento.CTRC.TCD_ConhecimentoFrete().Select(filtro, 0, string.Empty),
lCfg[0]);
if (st_compactar.Checked)
{
ZipFile zip = new ZipFile(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy") + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy") + ".zip");
System.IO.DirectoryInfo dir = new System.IO.DirectoryInfo(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy"));
foreach (System.IO.FileInfo file in dir.GetFiles())
{
if (file.Name.Substring(file.Name.LastIndexOf('.') + 1, 3).Trim().Equals("xml"))
{
zip.AddFile(file.DirectoryName + "\\" + file.Name, string.Empty);
}
}
zip.Save();
}
MessageBox.Show("Arquivos gerados com sucesso." + (!string.IsNullOrEmpty(msg) ? "\r\n" + "Alguns arquivos não puderão ser gerados por inconsistências.\r\n" + msg.Trim() : string.Empty), "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
if (st_email.Checked)
{
using (FormRelPadrao.TFMsgEmail fEmail = new FormRelPadrao.TFMsgEmail())
{
fEmail.lAnexos.Add(path + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy") + System.IO.Path.DirectorySeparatorChar.ToString() + DateTime.Now.ToString("ddMMyyyy") + ".zip");
if (fEmail.ShowDialog() == DialogResult.OK)
{
List <string> lDest = new List <string>();
string[] aux = fEmail.pDs_destinatario.Split(new char[] { ';' });
foreach (string s in aux)
{
lDest.Add(s);
}
new FormRelPadrao.Email(lDest, fEmail.pTitulo, fEmail.Mensagem, fEmail.lAnexos).EnviarEmail();
}
}
}
}
catch (Exception ex)
{ MessageBox.Show("Erro: " + ex.Message); }
}
private void afterGrava()
{
if (bsAbastComposto.Count > 0)
{
CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = null;
if ((bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList().Exists(x => x.Tp_pagamento.Trim().ToUpper().Equals("E")))
{
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.vCd_empresa = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Cd_empresa;
fDup.vNm_empresa = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Nm_empresa;
fDup.vCd_clifor = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Cd_fornecedor;
fDup.vNm_clifor = (bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Nm_fornecedor;
//Buscar config abast
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar((bsAbastComposto.Current as CamadaDados.Frota.TRegistro_AbastVeiculo).Cd_empresa,
string.Empty,
string.Empty,
string.Empty,
null);
if (lCfg.Count > 0)
{
if (string.IsNullOrEmpty(lCfg[0].Tp_duplicata))
{
MessageBox.Show("Não existe Tp.duplicata na CFG.Frota cadastrada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
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 = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
fDup.vVl_documento = (bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList().Where(x => x.Tp_pagamento.Trim().ToUpper().Equals("E")).Sum(x => x.Vl_subtotal);
fDup.vNr_docto = "AGPABAST";
fDup.vSt_ecf = true;
fDup.St_bloquearccusto = true; //Centro Resultado sera lancado pelo modulo frota
fDup.St_editardataemissao = true;
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
rDup.Vl_documento_padrao = (bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList().Where(x => x.Tp_pagamento.Trim().ToUpper().Equals("E")).Sum(x => x.Vl_subtotal);
rDup.Parcelas[0].Vl_parcela_padrao = rDup.Parcelas[0].Vl_parcela;
}
}
}
else
{
MessageBox.Show("Não existe configuração frota para lançar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
}
try
{
CamadaNegocio.Frota.TCN_AbastVeiculo.Gravar((bsAbastComposto.List as IEnumerable <CamadaDados.Frota.TRegistro_AbastVeiculo>).ToList(), rDup, null);
MessageBox.Show("Abastecimentos gravados com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
bb_novo_abastecimento.Enabled = true;
bb_alterar_abastecimento.Enabled = true;
bb_gravar_abastecimento.Enabled = false;
bb_excluir_abastecimento.Enabled = true;
bsAbastComposto.Clear();
pAbastecimento.HabilitarControls(false, Utils.TTpModo.tm_Standby);
pAbastecimento.LimparRegistro();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
private void afterNovo()
{
using (TFManutencao fManut = new TFManutencao())
{
if (fManut.ShowDialog() == DialogResult.OK)
{
if (fManut.rManutencao != null)
{
if (!fManut.st_consumointerno && !string.IsNullOrEmpty(fManut.rManutencao.Cd_cliforOficina))
{
//Buscar config abast
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fManut.rManutencao.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 = fManut.rManutencao.Cd_empresa;
fDup.vNm_empresa = fManut.rManutencao.Nm_empresa;
fDup.vCd_clifor = fManut.rManutencao.Cd_cliforOficina;
fDup.vNm_clifor = fManut.rManutencao.Nm_cliforOficina;
//Buscar endereco clifor oficina
CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fManut.rManutencao.Cd_cliforOficina,
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 = fManut.rManutencao.Dt_realizadastr;
fDup.vVl_documento = fManut.rManutencao.Vl_realizada;
fDup.vNr_docto = fManut.rManutencao.Nr_notafiscal;
fDup.vSt_ecf = true;
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
fManut.rManutencao.rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
}
}
}
}
}
}
try
{
CamadaNegocio.Frota.Cadastros.TCN_ManutencaoVeiculo.Gravar(fManut.rManutencao, null);
MessageBox.Show("Manutenção gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparFiltros();
id_manutencao.Text = fManut.rManutencao.Id_manutencaostr;
id_veiculo.Text = fManut.rManutencao.Id_veiculostr;
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
private void afterNovoC()
{
using (TFDespComposta fDesp = new TFDespComposta())
{
if (fDesp.ShowDialog() == DialogResult.OK)
{
if (fDesp.lManutencao != null)
{
CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata rDup = null;
//Buscar config abast
CamadaDados.Frota.Cadastros.TList_CfgFrota lCfg =
CamadaNegocio.Frota.Cadastros.TCN_CfgFrota.Buscar(fDesp.lManutencao[0].Cd_empresa,
string.Empty,
string.Empty,
string.Empty,
null);
using (Financeiro.TFLanDuplicata fDup = new Financeiro.TFLanDuplicata())
{
fDup.vCd_empresa = fDesp.lManutencao[0].Cd_empresa;
fDup.vNm_empresa = fDesp.lManutencao[0].Nm_empresa;
fDup.vCd_clifor = fDesp.lManutencao[0].Cd_cliforOficina;
fDup.vNm_clifor = fDesp.lManutencao[0].Nm_cliforOficina;
//Buscar endereco clifor oficina
CamadaDados.Financeiro.Cadastros.TList_CadEndereco lEnd =
CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(fDesp.lManutencao[0].Cd_cliforOficina,
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)
{
if (string.IsNullOrEmpty(lCfg[0].Tp_duplicata))
{
MessageBox.Show("Não existe Tp.duplicata na CFG.Frota cadastrada!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
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 = CamadaDados.UtilData.Data_Servidor().ToString("dd/MM/yyyy");
fDup.vVl_documento = (fDesp.lManutencao as IEnumerable <CamadaDados.Frota.Cadastros.TRegistro_ManutencaoVeiculo>)
.ToList().Sum(x => x.Vl_realizada);
fDup.vNr_docto = "AGPDESP"; //agrupamento despesas
fDup.vSt_ecf = true;
fDup.St_bloquearccusto = true; //Centro Resultado sera lancado pelo modulo frota
if (fDup.ShowDialog() == DialogResult.OK)
{
if (fDup.dsDuplicata.Count > 0)
{
rDup = fDup.dsDuplicata.Current as CamadaDados.Financeiro.Duplicata.TRegistro_LanDuplicata;
rDup.Vl_documento_padrao = (fDesp.lManutencao as IEnumerable <CamadaDados.Frota.Cadastros.TRegistro_ManutencaoVeiculo>)
.ToList().Sum(x => x.Vl_realizada);
rDup.Parcelas[0].Vl_parcela_padrao = rDup.Parcelas[0].Vl_parcela;
}
}
else
{
return;
}
}
else
{
MessageBox.Show("Não existe configuração frota para lançar duplicata!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
}
try
{
CamadaNegocio.Frota.Cadastros.TCN_ManutencaoVeiculo.Gravar(fDesp.lManutencao, rDup, null);
MessageBox.Show("Manutenção gravada com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
this.LimparFiltros();
id_manutencao.Text = fDesp.lManutencao[0].Id_manutencaostr;
id_veiculo.Text = fDesp.lManutencao[0].Id_veiculostr;
this.afterBusca();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
