private void NovoProduto()
{
using (Proc_Commoditties.TFAtualizaCadProduto fAtualiza = new Proc_Commoditties.TFAtualizaCadProduto())
{
fAtualiza.Text = "Novo Cadastro Produto";
fAtualiza.Cd_empresa = CD_Empresa;
fAtualiza.Cd_tabelapreco = CD_TabelaPreco;
fAtualiza.pSt_servico = pSt_servico;
if (fAtualiza.ShowDialog() == DialogResult.OK)
{
if (fAtualiza.rProd != null)
{
try
{
TCN_CadProduto.Gravar(fAtualiza.rProd, null);
MessageBox.Show("Produto cadastrado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
CD_Produto.Text = fAtualiza.rProd.CD_Produto;
CD_Produto_Leave(this, new EventArgs());
ConsultaPreco();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
private void bb_novoProd_Click(object sender, EventArgs e)
{
using (TFProduto fProd = new TFProduto())
{
if (fProd.ShowDialog() == DialogResult.OK)
{
if (fProd.rProd != null)
{
try
{
TCN_CadProduto.Gravar(fProd.rProd, null);
cd_produto.Text = fProd.rProd.CD_Produto;
MessageBox.Show("Produto gravado com sucesso.", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
BuscarProduto();
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Error); }
}
}
}
}
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 bbLerArquivo_Click(object sender, EventArgs e)
{
using (OpenFileDialog op = new OpenFileDialog())
{
op.Filter = "Arquivo CSV|*.csv";
if (op.ShowDialog() == DialogResult.OK)
{
using (StreamReader rd = new StreamReader(op.FileName))
{
string linha = null;
while ((linha = rd.ReadLine()) != null)
{
string[] colunas = linha.Split(';');
if (colunas.Length.Equals(2))
{
TList_CadProduto lProd = TCN_CadProduto.Busca(string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
"A",
colunas[0],
string.Empty,
string.Empty,
string.Empty,
string.Empty,
string.Empty,
1,
string.Empty,
string.Empty,
null);
if (lProd.Count > 0)
{
decimal qtd = decimal.Zero;
decimal.TryParse(colunas[1], out qtd);
lProd[0].Qt_dias_PrazoGarantia = qtd;
bsProduto.Add(lProd[0]);
}
else
{
bsProduto.Add(new TRegistro_CadProduto {
Codigo_alternativo = colunas[0], Qt_dias_PrazoGarantia = decimal.Parse(colunas[1])
});
}
}
}
if (bsProduto.Count > 0)
{
int cont = (bsProduto.List as IEnumerable <TRegistro_CadProduto>).Count(p => string.IsNullOrEmpty(p.CD_Produto));
if (cont > 0)
{
tslRegInconsistente.Text = "Registros Inconsistentes {" + cont.ToString() + " }";
}
else
{
tslRegInconsistente.Text = string.Empty;
}
}
else
{
tslRegInconsistente.Text = string.Empty;
}
}
}
}
}
private void afterGrava()
{
if (rProd != null)
{
if (!string.IsNullOrEmpty(cd_tabelapreco.Text))
{
if (vl_precovenda.Value > 0)
{
TRegistro_LanPrecoItem rPreco = new TRegistro_LanPrecoItem();
rPreco.CD_Empresa = cd_empresa.Text;
rPreco.CD_TabelaPreco = cd_tabelapreco.Text;
rPreco.Dt_preco = CamadaDados.UtilData.Data_Servidor();
rPreco.VL_PrecoVenda = vl_precovenda.Value;
rProd.lPrecoItem.Add(rPreco);
TCN_CadProduto.Gravar(rProd, null);
MessageBox.Show("Produto Atualizado com sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
}
}
else
{
MessageBox.Show("É necessário informar tabela preço!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Adicionar Código de Barras
if (!string.IsNullOrEmpty(codBarra.Text))
{
rProd.lCodBarra.Add(
new TRegistro_CodBarra()
{
Cd_codbarra = codBarra.Text
});
}
try
{
if (string.IsNullOrEmpty(cd_local.Text))
{
MessageBox.Show("Informe o Local de Armazenagem para ajustar estoque!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
cd_local.Focus();
return;
}
if (qtd_entrada.Value.Equals(decimal.Zero))
{
MessageBox.Show("Informe a QTD de ajuste de estoque do produto!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
qtd_entrada.Focus();
return;
}
if (vl_entrada.Value.Equals(decimal.Zero))
{
MessageBox.Show("Informe o Valor Médio do produto!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
vl_entrada.Focus();
return;
}
if (quantidade.Value != qtd_entrada.Value)
{
//Gravar no estoque
TRegistro_LanEstoque regEstoque = new TRegistro_LanEstoque();
regEstoque.Cd_empresa = cd_empresa.Text;
regEstoque.Cd_produto = cd_produto.Text;
regEstoque.Cd_local = cd_local.Text;
regEstoque.Dt_lancto = CamadaDados.UtilData.Data_Servidor();
regEstoque.Vl_medioestoque = vl_entrada.Value;
regEstoque.St_registro = "A";
regEstoque.Tp_lancto = "M";
if (quantidade.Value < qtd_entrada.Value)
{
regEstoque.Tp_movimento = "E";
regEstoque.Qtd_entrada = qtd_entrada.Value - quantidade.Value;
regEstoque.Vl_subtotal = vl_entrada.Value * (qtd_entrada.Value - quantidade.Value);
}
else
{
regEstoque.Tp_movimento = "S";
regEstoque.Qtd_saida = quantidade.Value - qtd_entrada.Value;
regEstoque.Vl_subtotal = vl_entrada.Value * (quantidade.Value - qtd_entrada.Value);
}
regEstoque.Vl_unitario = vl_entrada.Value;
//Gravar Estoque
TCN_LanEstoque.GravarEstoque(regEstoque, null);
//Atualizar Vl.Médio
TCN_LanEstoque.AcertarVlMedio(regEstoque, null);
}
else
{
MessageBox.Show("Não é possivel alterar estoque de produto mantendo a mesma quantidade!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
return;
}
//Gravar Produto
CamadaNegocio.Estoque.Cadastros.TCN_CadProduto.Gravar(rProd, null);
MessageBox.Show("Produto Atualizado com sucesso!", "Mensagem", MessageBoxButtons.OK, MessageBoxIcon.Information);
LimparCampos();
BB_Gravar.Visible = false;
BB_Cancelar.Visible = false;
BB_Novo.Visible = true;
pDados.Enabled = false;
}
catch (Exception ex)
{ MessageBox.Show(ex.Message.Trim(), "Erro", MessageBoxButtons.OK, MessageBoxIcon.Information); }
}
}
public static string Gravar(TRegistro_Adicionais val, BancoDados.TObjetoBanco banco)
{
bool st_transacao = false;
TCD_Adicionais qtb_orc = new TCD_Adicionais();
try
{
if (banco == null)
{
st_transacao = qtb_orc.CriarBanco_Dados(true);
}
else
{
qtb_orc.Banco_Dados = banco;
}
string ret = string.Empty;
if (string.IsNullOrEmpty(val.CD_Grupo_prod))
{
ret = qtb_orc.Gravar(val);
}
else
{
TList_CadProduto lprod = new TList_CadProduto();
lprod = TCN_CadProduto.Busca(string.Empty, string.Empty,
val.CD_Grupo_prod, string.Empty, string.Empty, string.Empty,
string.Empty, string.Empty, string.Empty, string.Empty,
string.Empty, string.Empty, string.Empty, string.Empty, 0,
string.Empty, string.Empty, null);
lprod.ForEach(p =>
{
val.CD_Produto = p.CD_Produto;
ret = qtb_orc.Gravar(val);
});
}
// val.Id_Local = Convert.ToDecimal(CamadaDados.TDataQuery.getPubVariavel(ret, "@P_ID_Local"));
if (st_transacao)
{
qtb_orc.Banco_Dados.Commit_Tran();
}
return(val.CD_Grupo.ToString());
}
catch (Exception ex)
{
if (st_transacao)
{
qtb_orc.Banco_Dados.RollBack_Tran();
}
throw new Exception("Erro gravar adicional: " + ex.Message.Trim());
}
finally
{
if (st_transacao)
{
qtb_orc.deletarBanco_Dados();
}
}
}
