public void lista_utilizadores()
{
init();
StdBELista uList = _admBs.Consulta("SELECT * FROM utilizadores");
uList.Inicio();
while (!uList.NoFim())
{
CultureInfo idioma = CultureInfo.GetCultureInfo(uList.Valor("Idioma"));
Console.WriteLine("Utilizador: " + uList.Valor("Codigo"));
Console.WriteLine(" Codigo: " + uList.Valor("Codigo"));
Console.WriteLine(" Nome: " + uList.Valor("Nome"));
Console.WriteLine(" Email: " + uList.Valor("Email"));
Console.WriteLine(" Activo: " + uList.Valor("Activo"));
Console.WriteLine(" Administrador: " + uList.Valor("Administrador"));
Console.WriteLine(" PerfilSugerido: " + uList.Valor("PerfilSugerido"));
Console.WriteLine(" NaoPodeAlterarPwd: " + uList.Valor("NaoPodeAlterarPwd"));
Console.WriteLine(" Idioma: " + idioma);
Console.WriteLine(" LoginWindows: " + uList.Valor("LoginWindows"));
Console.WriteLine(" Telemovel: " + uList.Valor("Telemovel"));
Console.WriteLine(" Bloqueado: " + uList.Valor("Bloqueado"));
Console.WriteLine(" TentativasFalhadas: " + uList.Valor("TentativasFalhadas"));
Console.WriteLine(" AutenticacaoPersonalizada: " + uList.Valor("AutenticacaoPersonalizada"));
Console.WriteLine(" SuperAdministrador: " + uList.Valor("SuperAdministrador"));
Console.WriteLine(" Tecnico: " + uList.Valor("Tecnico"));
uList.Seguinte();
}
return;
}
public void lista_utilizador_aplicacoes(string user)
{
init();
StdBELista uaList = _admBs.Consulta("SELECT * FROM UtilizadoresAplicacoes WHERE Utilizador='" + user + "'");
uaList.Inicio();
while (!uaList.NoFim())
{
Console.WriteLine("Aplicacao: " + uaList.Valor("Apl"));
uaList.Seguinte();
}
return;
}
public void lista_utilizador_permissoes(string user)
{
init();
StdBELista upList = _admBs.Consulta("SELECT * FROM Permissoes WHERE Utilizador='" + user + "'");
upList.Inicio();
while (!upList.NoFim())
{
Console.WriteLine("Permissao: ");
Console.WriteLine(" Perfil: " + upList.Valor("Perfil"));
Console.WriteLine(" Empresa: " + upList.Valor("Empresa"));
upList.Seguinte();
}
return;
}
public void lista_perfis()
{
init();
StdBELista pList = _admBs.Consulta("SELECT * FROM perfis");
pList.Inicio();
while (!pList.NoFim())
{
Console.WriteLine("Perfil: " + pList.Valor("Codigo"));
Console.WriteLine(" Codigo: " + pList.Valor("Codigo"));
Console.WriteLine(" Nome: " + pList.Valor("Nome"));
pList.Seguinte();
}
return;
}
public void info()
{
init();
ErpBS motor = new ErpBS();
bool _false = false;
Console.WriteLine("License: " + !motor.Licenca.VersaoDemo);
Console.WriteLine("Language: " + _admBs.Params.get_Idioma());
Console.WriteLine("Seguranca Activa: " + _admBs.Params.get_SegurancaActiva());
Console.WriteLine("Seguranca Pro Emp Activa: " + _admBs.Params.get_SegurancaPorEmpActiva());
Console.WriteLine("Modo Seguranca: " + _admBs.Params.get_SegurancaActiva());
//Console.WriteLine("N Postos: " + adm.Utilizadores.listPostos.ListaPostos(ref _false).NumItens);
string backupsdir = Backupsdir;
if (backupsdir == null)
{
backupsdir = _admBs.SQLServer.DirectoriaBackup();
}
Console.WriteLine("DirectoriaBackup: " + backupsdir);
StdBELista uList = _admBs.Consulta("SELECT * FROM utilizadores");
Console.WriteLine("N Utilizadores: " + uList.NumLinhas());
uList.Inicio();
while (!uList.NoFim())
{
Console.WriteLine(" Utilizador: " + uList.Valor("Codigo") + ", " + uList.Valor("Nome"));
uList.Seguinte();
}
StdBELista eList = _admBs.Consulta("SELECT * FROM empresas");
Console.WriteLine("N Empresas: " + eList.NumLinhas());
eList.Inicio();
while (!eList.NoFim())
{
Console.WriteLine(" Empresa: " + eList.Valor("Codigo") + ", " + eList.Valor("IDNome"));
eList.Seguinte();
}
return;
}
private void btnImport_Click(object sender, EventArgs e)
{
if (lstDocuments != null && lstDocuments.NumLinhas() > 0)
{
bool occurredErrors = false;
bool occurredSomeIntegrations = false;
DialogResult oDialog = ERPContext.PSO.Dialogos.MostraDialogoEsperaAsync(
this,
"A processar documentos...",
new Action <Progress <int>, CancellationToken>((progress, cancel) =>
{
int i = 0;
lstDocuments.Inicio();
while (!lstDocuments.NoFim())
{
((IProgress <int>)progress).Report(Convert.ToInt32((decimal)i / (decimal)lstDocuments.NumLinhas() * 100));
if (lstDocuments.DaValor <bool>("Sel"))
{
Tuple <string, string> retValue = new Tuple <string, string>(String.Empty, String.Empty);
if (lstDocuments.DaValor <string>("DocType").Equals("Compra"))
{
retValue = BusinessProcesses.ImportSalesDocument(ERPContext, lstDocuments.DaValor <string>("Company"), lstDocuments.DaValor <string>("IDDoc"));
}
else if (lstDocuments.DaValor <string>("DocType").Equals("Encomenda"))
{
retValue = BusinessProcesses.ImportPurchasesDocument(ERPContext, lstDocuments.DaValor <string>("Company"), lstDocuments.DaValor <string>("IDDoc"));
}
else
{
retValue = new Tuple <string, string>(String.Empty, String.Empty);
}
if (retValue.Item1.Equals("ERRO"))
{
occurredErrors = true;
}
else
{
occurredSomeIntegrations = true;
}
SetGridText(lstDocuments.DaValor <string>("IDDoc"), retValue);
}
i++;
lstDocuments.Seguinte();
}
}));
// Erros
if (occurredErrors)
{
ERPContext.PSO.Dialogos.MostraMensagem(
StdBSTipos.TipoMsg.PRI_SimplesOk,
"Ocorreram erros na importação. Verifique as notas.",
StdBSTipos.IconId.PRI_Exclama);
}
else if (occurredSomeIntegrations)
{
ERPContext.PSO.Dialogos.MostraMensagem(
StdBSTipos.TipoMsg.PRI_SimplesOk,
"Integração terminada com sucesso.",
StdBSTipos.IconId.PRI_Informativo);
}
else
{
ERPContext.PSO.Dialogos.MostraMensagem(
StdBSTipos.TipoMsg.PRI_SimplesOk,
"Não foram efetuadas quaisquer integrações.",
StdBSTipos.IconId.PRI_Informativo);
}
}
else
{
ERPContext.PSO.Dialogos.MostraMensagem(
StdPlatBS100.StdBSTipos.TipoMsg.PRI_SimplesOk,
"Não há documentos para processar.",
StdBSTipos.IconId.PRI_Informativo);
}
}
public static Model.RespostaErro Encomendas_New(Model.DocVenda dv)
{
Lib_Primavera.Model.RespostaErro erro = new Model.RespostaErro();
GcpBEDocumentoVenda myEnc = new GcpBEDocumentoVenda();
GcpBELinhaDocumentoVenda myLin = new GcpBELinhaDocumentoVenda();
GcpBELinhasDocumentoVenda myLinhas = new GcpBELinhasDocumentoVenda();
PreencheRelacaoVendas rl = new PreencheRelacaoVendas();
List <Model.LinhaDocVenda> lstlindv = new List <Model.LinhaDocVenda>();
try
{
if (PriEngine.InitializeCompany(ElectroSinf.Properties.Settings.Default.Company.Trim(), ElectroSinf.Properties.Settings.Default.User.Trim(), ElectroSinf.Properties.Settings.Default.Password.Trim()) == true)
{
//atributos que por enquanto não são dinamicos:
string serie = "1";
double desconto = 0.0;
string armazem = "A1";
// Atribui valores ao cabecalho do doc
myEnc.set_Entidade(dv.Entidade);
myEnc.set_Serie(serie);
myEnc.set_Tipodoc(dv.DocType);
myEnc.set_TipoEntidade("C");
// Linhas do documento para a lista de linhas
//lstlindv = dv.LinhasDoc;
PriEngine.Engine.Comercial.Vendas.PreencheDadosRelacionados(myEnc, rl);
double pvp1 = 0, quantidade = 0;
string idArtigo = "";
int Stock = 0;
StdBELista carrinho = PriEngine.Engine.Consulta("SELECT * FROM TDU_Carrinho WHERE CDU_IdCliente='" + dv.Entidade + "'");
while (!carrinho.NoFim())
{
idArtigo = carrinho.Valor("CDU_IdArtigo");
quantidade = Convert.ToDouble(carrinho.Valor("CDU_Quantidade"));
armazem = carrinho.Valor("CDU_Armazem");
Stock = (int)PriEngine.Engine.Comercial.ArtigosArmazens.DaStockArtigo(idArtigo);
//ARMAZEM
if (quantidade > Stock)
{
erro.Erro = 1;
erro.Descricao = "quantidadeErrada";
return(erro);
}
pvp1 = PriEngine.Engine.Comercial.ArtigosPrecos.DaPrecoArtigoMoeda(idArtigo, "EUR", "UN", "PVP1", false, 0);
PriEngine.Engine.Comercial.Vendas.AdicionaLinha(myEnc, idArtigo, quantidade, armazem, "", pvp1, desconto);
carrinho.Seguinte();
}
/*
* foreach (Model.LinhaDocVenda lin in lstlindv)
* {
* pvp1 = PriEngine.Engine.Comercial.ArtigosPrecos.DaPrecoArtigoMoeda(lin.CodArtigo, "EUR", "UN", "PVP1", false, 0);
* PriEngine.Engine.Comercial.Vendas.AdicionaLinha(myEnc, lin.CodArtigo, lin.Quantidade, armazem, "", pvp1, desconto);
* }
*/
PriEngine.Engine.IniciaTransaccao();
PriEngine.Engine.Comercial.Vendas.Actualiza(myEnc, "Teste");
PriEngine.Engine.TerminaTransaccao();
erro.Erro = 0;
erro.Descricao = "Sucesso";
carrinho.Inicio();
while (!carrinho.NoFim())
{
idArtigo = carrinho.Valor("CDU_IdArtigo");
StdBECamposChave tdu_carrinho = new StdBECamposChave();
tdu_carrinho.AddCampoChave("CDU_IdCliente", dv.Entidade);
tdu_carrinho.AddCampoChave("CDU_IdArtigo", idArtigo);
PriEngine.Engine.TabelasUtilizador.Remove("TDU_Carrinho", tdu_carrinho);
carrinho.Seguinte();
}
return(erro);
}
else
{
erro.Erro = 1;
erro.Descricao = "Erro ao abrir empresa";
return(erro);
}
}
catch (Exception ex)
{
try
{
PriEngine.Engine.DesfazTransaccao();
}
catch (Exception)
{
}
erro.Erro = 1;
erro.Descricao = ex.Message;
Console.Write(erro.Descricao);
return(erro);
}
}
