private void TFOrcamentoProjeto_Load(object sender, EventArgs e) { this.Icon = Utils.ResourcesUtils.TecnoAliance_ICO; pDados.set_FormatZero(); if (this.rorcamento != null) { bsOrcamento.DataSource = new CamadaDados.Faturamento.Orcamento.TList_Orcamento() { this.rorcamento }; tslTotal.Text = rorcamento.lItens.Sum(p => p.Vl_subtotalliq).ToString("N2", new System.Globalization.CultureInfo("pt-BR")); CD_Empresa.Focus(); } else { bsOrcamento.AddNew(); (bsOrcamento.Current as CamadaDados.Faturamento.Orcamento.TRegistro_Orcamento).St_orcprojeto = "S"; CD_Empresa.Focus(); //Buscar vendedor do login CamadaDados.Financeiro.Cadastros.TList_CadClifor lVend = CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.BuscaVendedor(string.Empty, Utils.Parametros.pubLogin, null); if (lVend.Count > 0) { CD_CompVend.Text = lVend[0].Cd_clifor; NM_CompVend.Text = lVend[0].Nm_clifor; } } }
private void BuscarVendedor() { CamadaDados.Financeiro.Cadastros.TList_CadClifor lVend = CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.BuscaVendedor(string.Empty, (string.IsNullOrEmpty(pLogin) ? Utils.Parametros.pubLogin : pLogin), null); if (lVend.Count > 0) { cd_vendedor.Text = lVend[0].Cd_clifor; nm_vendedor.Text = lVend[0].Nm_clifor; } }
public static void Imprime_Duplicata(bool Altera_relatorio, List <CamadaDados.Financeiro.Duplicata.TRegistro_LanParcela> lParc, CamadaDados.Diversos.TList_CadEmpresa lEmpresa, CamadaDados.Financeiro.Cadastros.TList_CadClifor lSacado, bool St_imprimir, bool St_visualizar, bool St_exportpdf, string Path_exportpdf, bool St_enviaremail, List <string> Destinatarios, string Titulo, string Mensagem) { FormRelPadrao.Relatorio Relatorio = new FormRelPadrao.Relatorio(); Relatorio.Altera_Relatorio = Altera_relatorio; System.Windows.Forms.BindingSource Bin = new System.Windows.Forms.BindingSource(); Bin.DataSource = lParc; Relatorio.DTS_Relatorio = Bin; Relatorio.Nome_Relatorio = "TFDuplicata"; Relatorio.NM_Classe = "TFDuplicata"; Relatorio.Modulo = "FIN"; Relatorio.Parametros_Relatorio.Add("IMAGEM_RELATORIO", CamadaNegocio.ConfigGer.TCN_CadParamGer.BuscaVlImagem("IMAGEM_RELATORIO", string.Empty, null)); System.Windows.Forms.BindingSource bsEmpresa = new System.Windows.Forms.BindingSource(); bsEmpresa.DataSource = lEmpresa; System.Windows.Forms.BindingSource bsSacado = new System.Windows.Forms.BindingSource(); bsSacado.DataSource = lSacado; Relatorio.Adiciona_DataSource("DTS_EMPRESA", bsEmpresa); Relatorio.Adiciona_DataSource("DTS_SACADO", bsSacado); Relatorio.Gera_Relatorio(string.Empty, St_imprimir, St_visualizar, St_enviaremail, St_exportpdf, Path_exportpdf, Destinatarios, null, Titulo, Mensagem); }
private void bb_renovar_Click(object sender, EventArgs e) { //Buscar dados clifor CamadaDados.Financeiro.Cadastros.TList_CadClifor lClifor = CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.Busca_Clifor(rDados.Cd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lClifor.Count > 0) { lClifor[0].lEndereco = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(lClifor[0].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, 0, null); lClifor[0].lContato = CamadaNegocio.Financeiro.Cadastros.TCN_CadContatoCliFor.Buscar(string.Empty, lClifor[0].Cd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, false, false, string.Empty, 0, null); lClifor[0].lDadosBanc = CamadaNegocio.Financeiro.Cadastros.TCN_CadDados_Bancarios_Clifor.Busca(lClifor[0].Cd_clifor, string.Empty, string.Empty, string.Empty, null); using (Financeiro.Cadastros.TFClifor fClifor = new Financeiro.Cadastros.TFClifor()) { fClifor.Text = "Renovando Cadastro Cliente/Fornecedor"; fClifor.rClifor = lClifor[0]; if (fClifor.ShowDialog() == DialogResult.OK) { if (fClifor.rClifor != null) { try { fClifor.rClifor.Dt_renovacaocadastro = CamadaDados.UtilData.Data_Servidor(); fClifor.rClifor.Loginrenovacao = Utils.Parametros.pubLogin; CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.Gravar(fClifor.rClifor, null); st_renovarcadastro.Checked = false; dt_renovacaocadastro.Text = fClifor.rClifor.Dt_renovacaocadastrostr; bb_renovar.Enabled = false; MessageBox.Show("Cadastro renovado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); bool st_bloqfin = (vl_limitecredito.Value > decimal.Zero) && ((vl_limitecredito.Value - vl_debitoaberto.Value) < vl_financeiro.Value); bool st_bloqdeb = st_bloq_debitovencido.Checked && vl_debitovencido.Value > decimal.Zero; if ((!st_bloqfin) && (!st_bloqdeb) && (!st_bloqavulso.Checked)) { this.St_desbloqueado = true; this.DialogResult = DialogResult.OK; } } catch (Exception ex) { MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); } } } } } }
private void bb_consultar_Click(object sender, EventArgs e) { if (string.IsNullOrEmpty(cnpj.Text.SoNumero()) && string.IsNullOrEmpty(cpf.Text.SoNumero())) { MessageBox.Show("Obrigatorio informar CNPJ ou CPF para realizar consulta.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); return; } if (uf.SelectedIndex < 0) { MessageBox.Show("Obrigatorio informar UF para realizar consulta.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information); uf.Focus(); return; } try { //Verificar se o cliente nao existe na base de dados CamadaDados.Financeiro.Cadastros.TList_CadClifor lClifor = CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.Busca_Clifor(string.Empty, string.Empty, string.Empty, cnpj.Text, cpf.Text, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 1, null); if (lClifor.Count > 0) { rclifor = lClifor[0]; rclifor.lEndereco = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(rclifor.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, 0, null); } else { rclifor = ConsultaCad.TConsultaCad2.ConsultaCadClifor(cnpj.Text, cpf.Text, uf.Text, rCfgNfe); } DialogResult = DialogResult.OK; } catch (Exception ex) { MessageBox.Show("Não foi possivel consultar CNPJ na base da SEFAZ.\r\n" + "Realize o cadastro manualmente ou tente nova consulta mais tarde.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Error); } }
private void ImprimirDuplicata() { if (BS_Duplicata.Current != null) { //Buscar parcela TList_RegLanDuplicata lDup = TCN_LanDuplicata.Busca((BS_Duplicata.Current as TRegistro_LanDuplicata).Cd_empresa, (BS_Duplicata.Current as TRegistro_LanDuplicata).Nr_lancto.ToString(), string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, 0, string.Empty, null); lDup[0].Parcelas = new TCD_LanParcela().Select( new Utils.TpBusca[] { new Utils.TpBusca() { vNM_Campo = "a.cd_empresa", vOperador = "=", vVL_Busca = "'" + lDup[0].Cd_empresa.Trim() + "'" }, new Utils.TpBusca() { vNM_Campo = "a.nr_lancto", vOperador = "=", vVL_Busca = "" + lDup[0].Nr_lancto + "" } }, 0, string.Empty, string.Empty, string.Empty); if (lDup.Count > 0) { using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao()) { //Buscar dados Empresa CamadaDados.Diversos.TList_CadEmpresa lEmpresa = CamadaNegocio.Diversos.TCN_CadEmpresa.Busca(lDup[0].Cd_empresa, string.Empty, string.Empty, null); //Buscar dados do sacado CamadaDados.Financeiro.Cadastros.TList_CadClifor lSacado = CamadaNegocio.Financeiro.Cadastros.TCN_CadClifor.Busca_Clifor(lDup[0].Cd_clifor, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, false, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 0, null); //Buscar endereco sacado if (lSacado.Count > 0) { lSacado[0].lEndereco = CamadaNegocio.Financeiro.Cadastros.TCN_CadEndereco.Buscar(lDup[0].Cd_clifor, lDup[0].Cd_endereco, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, string.Empty, 0, null); } fImp.St_enabled_enviaremail = true; fImp.pCd_clifor = lDup[0].Cd_clifor; fImp.pMensagem = "DUPLICATAS DO DOCUMENTO Nº" + lDup[0].Nr_docto; if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail)) { TCN_LayoutDuplicata.Imprime_Duplicata(Altera_Relatorio, lDup[0].Parcelas, lEmpresa, lSacado, fImp.pSt_imprimir, fImp.pSt_visualizar, fImp.pSt_exportPdf, fImp.Path_exportPdf, fImp.pSt_enviaremail, fImp.pDestinatarios, "DUPLICATAS(S) DO DOCUMENTO Nº " + lDup[0].Nr_docto, fImp.pDs_mensagem); Altera_Relatorio = false; } } } } }