Sintaxe:

RpcSetEnv( [ cRpcEmp ] [ cRpcFil ] [ cEnvUser ] [ cEnvPass ] [ cEnvMod ] [ cFunName ] [ aTables ] [ lShowFinal ] [ lAbend ] [ lOpenSX ] [ lConnect ] ) → lRet

Retorno:

lRet → Logical, Retorna .T. se abriu corretamente o ambiente com a empresa e filial. Se .F. não conseguiu abrir o ambiente.

Parâmetros:

Exemplo:

User Function fSetEnv()
Local aTables as array
 
aTables := {"CT1","CT2","CT3","CT4","CT5","CTF","CTE"}
 
//seta o ambiente com a empresa 99 filial 01 com os direitos do usuário administrador, módulo CTB
RpcSetEnv( "99","01", "Administrador", " ", "CTB", "CTBA102", aTables, , , ,  )
 
/************* Processamentos *************/
 
RpcClearEnv() //Encerra o ambiente, fechando as devidas conexões

Return Nil

O ambiente não deve ser inicializado ou encerrado em rotinas de menu do Protheus, o Protheus já entrega o ambiente aberto e preparado para a correta execução da rotina, caso o ambiente seja aberto ou fechado em rotinas de menu erros diversos podem ocorrer.

Essa situação também ocorrer para schedule (exceção para processo especial) e para REST quando já configurado com PrepareIn.

The post Abertura de ambiente com RpcSetEnv() first appeared on Código Expresso.

Pontos de Entrada Relevantes:

• M460MARK: Valida os pedidos marcados para geração de notas fiscais, localizado no início da função a460Nota. 
• M410PVNF: Localizado na opção “Outras Ações -> Prep Doc. Saída” no pedido de venda. 
• SX5NOTA: Utilizado para controlar a visibilidade de tabelas SX5 por filial, ideal para restringir o acesso a séries de notas fiscais. 
• CHGX5FIL: Permite o uso de tabelas 01 exclusivas em um SX5 compartilhado. 
• F040FRT: Manipula as filiais no cálculo de impostos. 
• F440COM: Calcula comissões para títulos de adiantamento. 
• M460FIM: Gravação dos dados após gerar NF de Saída e o titulo financeiro.

The post Pontos de Entrada do Faturamento – Protheus first appeared on Código Expresso.

Exemplo:

User Function fNomeAmb()
    Local aArea      := FWGetArea()
    Local cMensagem  := ""
 
    //Busca a informação e exibe
    cMensagem := "O nome do ambiente que esta rodando o sistema é: " + GetEnvServer()
    FWAlertInfo(cMensagem, "Teste GetEnvServer")
 
    FWRestArea(aArea)
Return

The post Buscando o nome do ambiente com GetEnvServer( ) – Advpl first appeared on Código Expresso.

Atualmente, com o dicionário de dados migrado para dentro do banco de dados, esses dados não devem mais ser acessados diretamente, sendo disponibilizadas funções para esse isso.

A classe FWSM0Util possui o método GetSM0Data() onde é possível informar o código da empresa, o código da filial e quais campos você deseja buscar a informação. A função retorna um array com os campos informados.

No exemplo abaixo é mostrado como recuperar o Nome, CNPJ/CPF e Cidade do cadastro da filial 01 da Empresa 99 de teste:

User Function fBuscaSM0()
Local aFieldSM0 := { ;
    "M0_CODIGO",;    //Posição [1]
    "M0_CODFIL",;    //Posição [2]
    "M0_NOMECOM",;   //Posição [3]
    "M0_CGC",;       //Posição [4]
    "M0_INSCM",;     //Posição [5]
    "M0_CIDENT",;    //Posição [6]
    "M0_ESTENT",;    //Posição [7]
    "M0_ENDENT",;    //Posição [8]
    "M0_BAIRENT",;   //Posição [9]
    "M0_CEPENT",;    //Posição [10]
    "M0_COMPENT",;   //Posição [11]
    "M0_TEL";        //Posição [12]
}
Local aSM0Data2 := {}

aSM0Data2 := FWSM0Util():GetSM0Data("99", "01", aFieldSM0)
If Len(aSM0Data2) > 0
    Alert(aSM0Data2[3][2]) //M0_NOMECOM
    Alert(aSM0Data2[4][2]) //M0_CGC
    Alert(aSM0Data2[6][2]) //M0_CIDENT
EndIf

Return 

Outra forma de utilização é mostrada no exemplo abaixo, onde a função retorna todos os campos presentes na SM0 daquela filial:

User Function f2BuscaSM0()
Local aSM0Data2 := {}
aSM0Data2 := FWSM0Util():GetSM0Data("99", "01")

Return 

The post Buscando informações da Empresa (SM0) com FWSM0Util first appeared on Código Expresso.

The post FWRest – Advpl first appeared on Código Expresso.

npm i -g @angular/cli@14

Ocorre o seguinte erro:

Esse erro ocorre por causa de uma politica de segurança do Powershell do Windows para evitar que scripts maliciosos sejam executados indevidamente no seu sistema. Por isso, todos os scripts que não forem assinados terão sua execução bloqueada. Ou seja, a política de execução está como Restricted (que é o padrão).

Você pode controlar estas permissões usando o cmdlet Set-ExecutionPolicy. E pode conferir qual a política de execução atual usando o cmdlet Get-ExecutionPolicy.

PS  C:\WINDOWS\system32> Get-ExecutionPolicy
Restricted

PS  C:\WINDOWS\system32> Set-ExecutionPolicy RemoteSigned
PS  C:\WINDOWS\system32> Get-ExecutionPolicy
RemoteSigned

Existem vários tipos de permissão que você pode usar com este cmdlet:

Restricted: Não carrega nem executa arquivos de configuração e/ou scripts do Powershell.

AllSigned: Só executa scripts e arquivos de configuração assinados por um fornecedor confiável, mesmo que o script tenha sido escrito por você mesmo (local).

RemoteSigned: É basicamente o mesmo que o acima, porém permite a execução de arquivos de configuração e/ou scripts locais.

Unrestricted: Carrega e executa todos os arquivos de configuração e scripts PowerShell. Pode ser pedida uma confirmação para executar scripts não assinados.

Bypass: Não há nenhuma restrição.

Undefined: Remove a política de execução atual. A não ser que ela esteja definida numa diretiva de grupo.

Alterando a politica do powersell:

Instalação do Angular após alteração:

Qualquer dúvida ou sugestão, deixe um comentário.

Abrç.

The post Erro: O arquivo C:\Program Files\nodejs\npm.ps1 não pode ser carregado porque a execução de scripts foi desabilitada neste sistema ao instalar o Angular – PO-UI first appeared on Código Expresso.

Com a pré-visualização, você pode revisar os dados do documento sem comprometer seu fluxo, evitando retrabalhos ou erros que poderiam impactar o atendimento ao cliente.

O Pré-DANFE é um facilitador para validação e não possui valor fiscal. ela permite a validação das informações da nota fiscal de forma visual, permitindo correções antes da transmissão da nota para a SEFAZ, evitando assim cancelamentos para correções.

Criamos essa customização para o ERP TOTVs Protheus, sendo possivel a impressão da visualização do Pré-DANFE dentro do Pedido de Vendas.

Entre em contato pra mais informações e solicitar uma demo de teste, ou nos envie um e-mail para contato: contato@codigoexpresso.com

The post Pré-visualização do DANFE – PRE-DANFE first appeared on Código Expresso.

Segue abaixo um exemplo do seu uso:

User Function fParamBox()

Local aPergs   := {}
Local cArquivo := Space(100)
Local cProdDe  := Space(TamSX3("B1_COD")[01])
Local cProdAt  := Space(TamSX3("B1_COD")[01])
 
aAdd(aPergs, {1, "Arquivo",     cArquivo, "", ".T.", "",    ".T.", 120, .T.})
aAdd(aPergs, {1, "Produto De",  cProdDe,  "", ".T.", "SB1", ".T.", 80,  .F.})
aAdd(aPergs, {1, "Produto Até", cProdAt,  "", ".T.", "SB1", ".T.", 80,  .T.})
 
If ParamBox(aPergs, "Informe os parâmetros")
    Alert(MV_PAR01)
    Alert(MV_PAR02)
    Alert(MV_PAR03)
EndIf

Return 

Proactively expedite intuitive paradigms without cutting-edge supply chains. Proactively deliver frictionless solutions via client-focused technologies.

Nesse exemplo é passado por parâmetro dois atributos na função ParamBox( );

aPergs – Um array contendo as perguntas, onde cada posição do array corresponde a um atributo especifico do parametro (pergunta):

aPergs[1] –

aPergs[2] – Titulo da pergunta

aPergs[3] – Valor da pergunta

Credibly benchmark focused metrics via sustainable schemas. Distinctively customize 24/7 partnerships before scalable applications. Intrinsicly impact timely services via world-class meta-services. Energistically matrix resource-leveling schemas before multimedia based synergy. Efficiently deliver scalable outsourcing after cross-media data.

Monotonectally foster long-term high-impact products rather than collaborative innovation. Synergistically fashion interdependent leadership via resource-leveling meta-services. Energistically disseminate plug-and-play internal or “organic” sources whereas distributed services. Quickly incentivize customized supply chains vis-a-vis customer directed outsourcing. Objectively drive top-line customer service.

The post Tudo sobre Parambox – ADVPL first appeared on Código Expresso.

Globally matrix best-of-breed products and intuitive communities. Energistically disintermediate excellent markets via enabled ROI. Proactively formulate best-of-breed innovation via wireless niches. Dynamically synergize extensive partnerships with fully tested internal or “organic” sources. Assertively enhance an expanded array of innovation through progressive content.

Enthusiastically mesh best-of-breed methodologies and resource maximizing quality vectors. Collaboratively supply low-risk high-yield internal or “organic” sources before tactical intellectual capital. Dramatically mesh cross-media process improvements whereas low-risk high-yield strategic theme areas. Continually fabricate B2C methodologies without client-focused quality vectors. Energistically envisioneer principle-centered technology vis-a-vis extensible architectures.

Appropriately parallel task user friendly initiatives through interdependent portals. Interactively pursue customized results through client-focused models. Professionally restore stand-alone data vis-a-vis interactive deliverables. Efficiently underwhelm parallel metrics without premier channels. Globally strategize client-based ideas vis-a-vis orthogonal internal or “organic” sources.

Distinctively aggregate optimal experiences with efficient initiatives. Holisticly predominate value-added paradigms after an expanded array of ROI. Rapidiously communicate cutting-edge customer service for interdependent imperatives. Holisticly network B2B portals with worldwide leadership skills. Holisticly target installed base value rather than extensible ideas.

The post O Novo Fluxo de Compras do Protheus first appeared on Código Expresso.

Para ressaltar, a diferença entre consulta padrão e consulta especifica é que a consulta padrão fornece ao usuário uma maneira simples para exibir e procurar valores nas tabelas do Protheus sem necessidade de uma função customizada, e a consulta específica é um programa customizado, criado via User Function, para trazer determinada informação para a consulta.

A consulta especifica tem como principal característica o total controle de todas os pontos da consulta por parte do desenvolvedor, nesse tipo de consulta temos apenas que definir qual será a função chamada para exibir a tela da consulta, e a função que será chamada caso a rotina de consulta retornar o valor lógico verdadeiro, em contra partida.

Já a consulta genérica não necessita de codificação advpl, mas que seja configurado as colunas, índices, filtros e o retorno, como no exemplo abaixo:

Nosso objetivo aqui é criar uma consulta que tenha as vantagens de uma consulta especifica mas seja configurável igual, assim como a padrão, alem de ser pratica.

Quickly simplify customized initiatives through professional metrics. Efficiently morph B2B supply chains without equity invested “outside the box” thinking.

Enthusiastically reconceptualize go forward initiatives via interoperable ideas. Completely simplify focused opportunities via standardized technology. Intrinsicly orchestrate interactive supply chains vis-a-vis market-driven paradigms.

Authoritatively generate functionalized convergence whereas vertical paradigms. Phosfluorescently plagiarize seamless information before cutting-edge communities. Enthusiastically redefine 24/7 functionalities with ethical web-readiness. Competently build quality applications with go forward “outside the box” thinking. Proactively transform 24/7 e-services via worldwide methodologies.

Conveniently whiteboard client-focused best practices rather than high-quality niche markets. Proactively embrace viral channels and intermandated meta-services. Enthusiastically empower long-term high-impact scenarios for cross functional experiences. Completely plagiarize reliable.

Fontes: TDN

The post Criando uma consulta Padrão (Especifica) Dinâmica com MarkBrow – Advpl first appeared on Código Expresso.