public static string ValidarLogin(string Login_BI, string Senha_BI)
{
//Buscar CNPJ das empresas ativas
TList_CadEmpresa lEmp = TCN_CadEmpresa.Busca(string.Empty, string.Empty, "A", null);
string emp = string.Empty;
string virg = string.Empty;
lEmp.Where(p => !string.IsNullOrEmpty(p.rClifor.Nr_cgc.SoNumero())).ToList().ForEach(p =>
{
emp += virg + "'" + p.rClifor.Nr_cgc.SoNumero() + "'";
virg = ",";
});
HttpClient client = new HttpClient();
client.BaseAddress = new Uri(Parametros.WS_ServidorHelpDesk);
HttpResponseMessage response = client.GetAsync("api/HelpDesk/ValidarLogin?login="******"&senha=" + Senha_BI + "&Cnpj=" + emp).Result;
if (response.IsSuccessStatusCode)
{
return(response.Content.ReadAsStringAsync().Result.SoNumero());
}
else
{
return(string.Empty);
}
}
public override int buscarRegistros()
{
TList_CadEmpresa lista = TCN_CadEmpresa.Busca(CD_Empresa.Text, NM_Empresa.Text, "", null);
if (lista != null)
{
if (lista.Count > 0)
{
this.Lista = lista;
BS_CadEmpresa.DataSource = lista;
BS_CadEmpresa_PositionChanged(this, new EventArgs());
}
else
if ((vTP_Modo == TTpModo.tm_Standby) || (vTP_Modo == TTpModo.tm_busca))
{
BS_CadEmpresa.Clear();
}
return(lista.Count);
}
else
{
return(0);
}
}
private void Gera_Faturamento()
{
try
{
if ((BS_Comissao != null) && (BS_Comissao.Count > 0))
{
if ((BS_Fechamento_Comissao != null) && (BS_Fechamento_Comissao.Count > 0) && (g_Fechamento_Comissao.Rows.Count > 0))
{
try
{
if (VL_Com_Liberada.Text.Trim() == "")
{
VL_Com_Liberada.Text = "0";
}
if (Convert.ToDecimal(VL_Com_Liberada.Text) == 0)
{
throw new Exception("Não existe Valores Liberados para se Faturar!");
}
}
catch
{
throw new Exception("Problemas com o Valores Liberados para Faturar!");
}
if (Existe_Empresas_Diferentes() == true)
{
throw new Exception("Você deve Faturar somente Comissões de E!");
}
// Cria a Lista com os selecionados
TList_Lan_Comissao List_Comissao = new TList_Lan_Comissao();
for (int i = 0; i < g_Fechamento_Comissao.SelectedRows.Count; i++)
{
TRegistro_Lan_Comissao Reg_Lan_Comissao = BS_Fechamento_Comissao[g_Fechamento_Comissao.SelectedRows[i].Index] as TRegistro_Lan_Comissao;
List_Comissao.Add(Reg_Lan_Comissao);
}
TList_CadVendedor List_Vendedor = TCN_CadVendedor.Busca((BS_Fechamento_Comissao.Current as TRegistro_Lan_Comissao).CD_Vendedor.ToString(), "", "", "", "", "", "", "", "", "", "");
TRegistro_CadVendedor Reg_Vendedor = List_Vendedor[0];
if (List_Vendedor.Count == 0)
{
throw new Exception("Vendedor: " + (BS_Fechamento_Comissao.Current as TRegistro_Lan_Comissao).CD_Vendedor.ToString() + " - " + (BS_Fechamento_Comissao.Current as TRegistro_Lan_Comissao).NM_Vendedor + "não encontrado.");
}
if (List_Vendedor[0].CD_condpgto_comissao == "")
{
throw new Exception("Vendedor: " + (BS_Fechamento_Comissao.Current as TRegistro_Lan_Comissao).CD_Vendedor.ToString() + " - " + (BS_Fechamento_Comissao.Current as TRegistro_Lan_Comissao).NM_Vendedor + "\r\n sem condição de Pagamento configurada. Verifique cadastro de Vendedor.");
}
string Moeda_Padrao = TCN_CadParamGer.BuscaVlString("CD_MOEDA_PADRAO");
if (Moeda_Padrao == "")
{
throw new Exception("Moeda Padrão não encontrado. Verificar configurações Gerais");
}
string Produto_Comissao = TCN_CadParamGer.BuscaVlString("CD_PRODUTO_COMISSAO");
if (Produto_Comissao == "")
{
throw new Exception("Produto Comissão não encontrado. Verificar configurações Gerais");
}
TRegistro_CadProduto Reg_Produto = TCN_CadProduto.Busca_Produto_Codigo(Produto_Comissao);
if ((Reg_Produto == null) || (Reg_Produto.CD_Unidade == ""))
{
throw new Exception("Unidade da Comissão não encontrado. Verificar configurações Gerais");
}
string CFG_Pedido_Comissao = TCN_CadParamGer.BuscaVlString("CFG_Pedido_Comissao");
if (CFG_Pedido_Comissao == "")
{
throw new Exception("Configuração de Pedido de Comissão não encontrado. Verificar configurações Gerais");
}
TRegistro_CadClifor Reg_Clifor_Vendedor = new TRegistro_CadClifor();
Reg_Clifor_Vendedor = TCN_CadClifor.Busca_Clifor_Codigo(List_Vendedor[0].Cd_clifor);
TList_CadEmpresa List_Empresa = new TList_CadEmpresa();
TRegistro_CadEmpresa Reg_Empresa = new TRegistro_CadEmpresa();
List_Empresa = TCN_CadEmpresa.Busca((BS_Fechamento_Comissao.Current as TRegistro_Lan_Comissao).CD_Empresa, "", "", null);
Reg_Empresa = List_Empresa[0];
TList_CadEndereco List_Endereco = new TList_CadEndereco();
TRegistro_CadEndereco Reg_Endereco = new TRegistro_CadEndereco();
List_Endereco = TCN_CadEndereco.Buscar(List_Vendedor[0].Cd_clifor, List_Vendedor[0].Cd_endereco, "", "", "", "", "", "",
"", "", "", "", "", "", "", 0, null);
Reg_Endereco = List_Endereco[0];
TList_RegLanDuplicata Duplicata = new TList_RegLanDuplicata();
Duplicata = Gera_Financeiro(CFG_Pedido_Comissao, List_Vendedor[0].CD_condpgto_comissao, Moeda_Padrao, Reg_Empresa, Reg_Clifor_Vendedor, Reg_Endereco);
if (Duplicata == null)
{
throw new Exception("Por favor! \r\n - Verifique os dados das Duplicatas");
}
decimal Total_Faturar = Convert.ToDecimal(VL_Com_Liberada.Text);
bool Pode_Gravar = false;
bool ST_SequenciaNF = false;
decimal NR_Nota = 0;
TCD_CadCFGPedidoFiscal Pedido_Fiscal = new TCD_CadCFGPedidoFiscal();
TpBusca[] vBusca = new TpBusca[0];
Array.Resize(ref vBusca, vBusca.Length + 1);
vBusca[vBusca.Length - 1].vNM_Campo = "a.cfg_pedido";
vBusca[vBusca.Length - 1].vVL_Busca = "'" + CFG_Pedido_Comissao + "'";
vBusca[vBusca.Length - 1].vOperador = "=";
Array.Resize(ref vBusca, vBusca.Length + 1);
vBusca[vBusca.Length - 1].vNM_Campo = "a.TP_FISCAL";
vBusca[vBusca.Length - 1].vVL_Busca = "'N'";
vBusca[vBusca.Length - 1].vOperador = "=";
DataTable DT_Pedido_Fiscal = Pedido_Fiscal.Buscar(vBusca, 0);
if (DT_Pedido_Fiscal.Rows.Count > 0)
{
if (DT_Pedido_Fiscal.Rows[0]["nr_serie"].ToString().Trim() != string.Empty)
{
TList_CadSerieNF List_SerieNF = TCN_CadSerieNF.Busca(DT_Pedido_Fiscal.Rows[0]["nr_serie"].ToString().Trim(),
string.Empty,
decimal.Zero,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
null);
if (List_SerieNF.Count > 0)
{
if (List_SerieNF[0].ST_SequenciaAutoBool == false)
{
TFNumero_Nota Numero_Nota = new TFNumero_Nota();
Numero_Nota.pCd_empresa = Reg_Empresa.Cd_empresa;
Numero_Nota.pNm_empresa = Reg_Empresa.Nm_empresa;
Numero_Nota.pCd_clifor = Reg_Clifor_Vendedor.Cd_clifor;
Numero_Nota.pNm_clifor = Reg_Clifor_Vendedor.Nm_clifor;
Numero_Nota.pNr_serie = DT_Pedido_Fiscal.Rows[0]["nr_serie"].ToString().Trim();
Numero_Nota.pDs_serie = DT_Pedido_Fiscal.Rows[0]["ds_serie"].ToString().Trim();
Numero_Nota.pTp_nota = "P";
if (Numero_Nota.ShowDialog() == DialogResult.OK)
{
NR_Nota = Numero_Nota.pNr_notafiscal;
Pode_Gravar = true;
}
else
{
Pode_Gravar = false;
}
}
else
{
ST_SequenciaNF = true;
Pode_Gravar = true;
}
}
else
{
throw new Exception("A Configuração do Pedido:" + CFG_Pedido_Comissao + "não está correta. Vefrificar numero de série!");
}
}
}
else
{
throw new Exception("A Configuração do Pedido:" + CFG_Pedido_Comissao + "não está correta");
}
if (Pode_Gravar == true)
{
TCN_Lan_Fechamento_Comissao.Gera_Faturamento(List_Comissao, NR_Nota, ST_SequenciaNF, Duplicata, Reg_Vendedor, Moeda_Padrao, Produto_Comissao, Reg_Produto, CFG_Pedido_Comissao,
Reg_Clifor_Vendedor, Reg_Empresa, Reg_Endereco, Total_Faturar, null);
MessageBox.Show("Comissão Faturada com Sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
afterNovo();
}
else
{
throw new Exception("De Alguma forma o processo foi cancelado!");
}
}
}
}
catch (Exception e)
{
MessageBox.Show("Erro: \r\n\r\n" + e.Message, "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
finally
{
}
}
private void ImprimirRecibo()
{
if (bindingSourceCaixa.Current != null)
{
using (FormRelPadrao.TFGerenciadorImpressao fImp = new FormRelPadrao.TFGerenciadorImpressao())
{
//Preencher dados empresa da duplicata
BindingSource Empresa = new BindingSource();
Empresa.DataSource = TCN_CadEmpresa.Busca((bindingSourceCaixa.Current as TRegistro_LanCaixa).Cd_Empresa, string.Empty, string.Empty, null);
decimal valor = (bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR > 0 ?
(bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_PAGAR : (bindingSourceCaixa.Current as TRegistro_LanCaixa).Vl_RECEBER;
string Valor_Extenso = string.Empty;
string transf = string.Empty;
//Buscar Moeda da Conta Gerencial
TList_Moeda lMoeda =
new TCD_Moeda().Select(
new TpBusca[]
{
new TpBusca()
{
vNM_Campo = string.Empty,
vOperador = "exists",
vVL_Busca = "(select 1 from tb_fin_contager x " +
"where x.cd_moeda = a.cd_moeda " +
"and x.cd_contager = '" + (bindingSourceCaixa.Current as TRegistro_LanCaixa).Cd_ContaGer.Trim() + "')"
}
}, 1, string.Empty);
if (lMoeda.Count > 0)
{
Valor_Extenso = new Extenso().ValorExtenso(valor, lMoeda[0].Ds_moeda_singular, lMoeda[0].Ds_moeda_plural);
}
else
{
Valor_Extenso = new Extenso().ValorExtenso(valor, "Real", "Reais");
}
//Criar objeto Relatório
FormRelPadrao.Relatorio Rel = new FormRelPadrao.Relatorio();
BindingSource Bin = new BindingSource();
Rel.Altera_Relatorio = Altera_Relatorio;
Bin.DataSource = new TList_LanCaixa()
{
bindingSourceCaixa.Current as TRegistro_LanCaixa
};
Rel.DTS_Relatorio = Bin;
Rel.Nome_Relatorio = "TFConsulatCaixa_Recibo";
Rel.NM_Classe = Name;
Rel.Ident = "TFConsulatCaixa_Recibo";
Rel.Modulo = "FIN";
fImp.St_enabled_enviaremail = true;
fImp.pCd_clifor = string.Empty;
BindingSource moeda = new BindingSource();
moeda.DataSource = lMoeda[0];
Rel.Parametros_Relatorio.Add("VALOREXTENSO", Valor_Extenso);
Rel.Parametros_Relatorio.Add("VALOR", valor);
if (bsTransf.Current != null)
{
Rel.Adiciona_DataSource("TRANSF", bsTransf);
transf = "S";
}
else
{
transf = "N";
}
Rel.Parametros_Relatorio.Add("TRANSFERENCIA", transf);
Rel.Adiciona_DataSource("MOEDA", moeda);
if (Empresa.Count > 0)
{
if ((Empresa.List[0] as CamadaDados.Diversos.TRegistro_CadEmpresa).Img != null)
{
Rel.Parametros_Relatorio.Add("IMAGEM_RELATORIO", (Empresa.List[0] as CamadaDados.Diversos.TRegistro_CadEmpresa).Img);
}
}
Rel.Adiciona_DataSource("EMPRESA", Empresa);
fImp.pMensagem = "RECIBO DE MOVIMENTAÇÃO CAIXA";
if (Altera_Relatorio)
{
Rel.Gera_Relatorio(string.Empty,
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
null,
"RECIBO DE MOVIMENTAÇÃO CAIXA",
fImp.pDs_mensagem);
Altera_Relatorio = false;
}
else
if ((fImp.ShowDialog() == DialogResult.OK) || (fImp.pSt_enviaremail))
{
Rel.Gera_Relatorio(string.Empty,
fImp.pSt_imprimir,
fImp.pSt_visualizar,
fImp.pSt_enviaremail,
fImp.pSt_exportPdf,
fImp.Path_exportPdf,
fImp.pDestinatarios,
null,
"RECIBO DE MOVIMENTAÇÃO CAIXA",
fImp.pDs_mensagem);
}
}
}
}