DEV Community: marlon-pinheiro

EPL LOGIX

marlon-pinheiro — Wed, 05 Oct 2022 19:06:46 +0000

O que é EPL

A sigla EPL significa "Entry Point Logix", através deste recurso é possível criar no Logix um ponto de entrada para a execução de uma rotina específica.

Quando o cliente identifica a necessidade de customizar um determinado ponto do sistema, ele deve entrar em contato com a Fábrica de Software e solicitar a criação deste ponto de entrada (mediando a realização de um orçamento).

Após a aprovação, a Fábrica de Software irá alterar o programa Padrão do Logix e colocar a chamada da função especifica.

Segue exemplo de como deve ser realizada a chamada da EPL no Logix.

IF LOG_existe_epl("tst0003y_epl_teste") THEN
   CALL tst0003y_epl_teste()
END IF

Uma vez criado o ponto de entrada no programa padrão, fica a cargo do cliente definir quem irá desenvolver o código específico, finalizado o desenvolvimento basta que o fonte seja compilado para que a rotina fique disponível no RPO do Logix.

Tipos de fontes no Logix

As chamadas de funções EPLs podem estar presentes em qualquer fonte do sistema. No Logix podemos classificar os fontes como MAINSOURCE ou SOURCE

MAINSOURCE é o programa principal, aquele que esta cadastrado no menu do sistema.

SOURCE são os fontes que possuem somente definições de funções.

Podemos pegar como exemplo o FIN10049 (MAINSOURCE) que internamente chama a função FIN85129 (SOURCE).

Por padrão todas as chamadas de EPL estão ativadas no sistema, para desativa-las existem algumas chaves de profile que precisam ser alteradas.

⚠️ Para que os controles de ativação/desativação de EPLs sejam realizados, é necessário que no fonte LOGIX seja utiliza a função LOG_existe_epl

Para exemplificar este cenário foram criados 3 fontes:

tst0001.4gl é um programa principal (MAINSOURCE)

tst0002.4gl é um fonte somente com definições de funções (SOURCE)

tst0003.4gl fonte específico (EPL)

Desativando EPLS

Segue abaixo lista das chaves que podem ser incluídas no arquivo de profile do Logix para desativar a execução das EPLS

LOGIX.EPL.ENABLE = 0

Desabilita todas as chamas de EPL no sistema. Independente do fonte em que ela esteja sendo chamada

LOGIX.EPL.MAINSOURCE.tst0001.ENABLE = 0

Desabilita todas as chamas de EPL identificas a partir da execução do programa principal

LOGIX.EPL.SOURCE.tst0001.ENABLE = 0

LOGIX.EPL.SOURCE.tst0002.ENABLE = 0

Desabilita todas as chamas de EPL somente do fonte que foi definido na chave.

LOGIX.EPL.FUNCTION.tst0003y_epl_teste.ENABLE = 0

Desabilita somente a função EPL que foi definida na chave

Exemplos

Segue exemplo utilizando cada uma das chaves

LOGIX.EPL.ENABLE = 1

Todas as EPLS liberadas

| *** [FRAMEWORK] INICIO ***
|
| [FRAMEWORK] Entrou na funcao - tst0001_inicia_processamento
| [FRAMEWORK] Teste execucao EPL [MAINSOURCE]
| [EPL] Chamada função TST0003Y_EPL_TESTE() [source: TST0001.4GL line: 41 function: TST0001_INICIA_PROCESSAMENTO()]
|
| >>> [EPL][FRAMEWORK] Entrou na funcao - tst0003y_epl_teste <<<
|
| [FRAMEWORK] Entrou na funcao - tst0002_function_logix
| [FRAMEWORK] Teste execucao EPL [FUNCTION]
| [EPL] Chamada função TST0003Y_EPL_TESTE() [source: TST0002.4GL line: 21 function: TST0002_FUNCTION_LOGIX()]
|
| >>> [EPL][FRAMEWORK] Entrou na funcao - tst0003y_epl_teste <<<
|
| *** [FRAMEWORK] FIM ***

LOGIX.EPL.ENABLE = 0

Todas as EPLS desabilitadas

| *** [FRAMEWORK] INICIO ***
|
| [FRAMEWORK] Entrou na funcao - tst0001_inicia_processamento
| [FRAMEWORK] Teste execucao EPL [MAINSOURCE]
| [EPL] Todas chamadas EPL desabilitadas. Função TST0003Y_EPL_TESTE() ignorada. [source: TST0001.4GL line: 40 function: TST0001_INICIA_PROCESSAMENTO()]
| [FRAMEWORK] Entrou na funcao - tst0002_function_logix
| [FRAMEWORK] Teste execucao EPL [FUNCTION]
| [EPL] Todas chamadas EPL desabilitadas. Função TST0003Y_EPL_TESTE() ignorada. [source: TST0002.4GL line: 21 function: TST0002_FUNCTION_LOGIX()]
| *** [FRAMEWORK] FIM ***

LOGIX.EPL.MAINSOURCE.tst0001.ENABLE = 0

Todas as EPLS desativadas quando chamadas a partir do programa principal TST0001

| *** [FRAMEWORK] INICIO ***
|
| [FRAMEWORK] Entrou na funcao - tst0001_inicia_processamento
| [FRAMEWORK] Teste execucao EPL [MAINSOURCE]
| [EPL] Chamadas EPL desabilitadas para o programa principal TST0001. Função TST0003Y_EPL_TESTE() ignorada. [source: TST0001.4GL line: 40 function: TST0001_INICIA_PROCESSAMENTO()]
| [FRAMEWORK] Entrou na funcao - tst0002_function_logix
| [FRAMEWORK] Teste execucao EPL [FUNCTION]
| [EPL] Chamadas EPL desabilitadas para o programa principal TST0001. Função TST0003Y_EPL_TESTE() ignorada. [source: TST0002.4GL line: 21 function: TST0002_FUNCTION_LOGIX()]
| *** [FRAMEWORK] FIM ***

LOGIX.EPL.SOURCE.tst0001.ENABLE = 0

EPLS desativadas somente no fonte TST0001

| *** [FRAMEWORK] INICIO ***
|
| [FRAMEWORK] Entrou na funcao - tst0001_inicia_processamento
| [FRAMEWORK] Teste execucao EPL [MAINSOURCE]
| [EPL] Chamadas EPL desabilitadas para o fonte TST0001. Função TST0003Y_EPL_TESTE() ignorada. [source: TST0001.4GL line: 40 function: TST0001_INICIA_PROCESSAMENTO()]
| [FRAMEWORK] Entrou na funcao - tst0002_function_logix
| [FRAMEWORK] Teste execucao EPL [FUNCTION]
| [EPL] Chamada função TST0003Y_EPL_TESTE() [source: TST0002.4GL line: 21 function: TST0002_FUNCTION_LOGIX()]
|
| >>> [EPL][FRAMEWORK] Entrou na funcao - tst0003y_epl_teste <<<
|
| *** [FRAMEWORK] FIM ***

LOGIX.EPL.SOURCE.tst0002.ENABLE = 0

EPLS desativadas somente no fonte TST0002

| *** [FRAMEWORK] INICIO ***
|
| [FRAMEWORK] Entrou na funcao - tst0001_inicia_processamento
| [FRAMEWORK] Teste execucao EPL [MAINSOURCE]
| [EPL] Chamada função TST0003Y_EPL_TESTE() [source: TST0001.4GL line: 40 function: TST0001_INICIA_PROCESSAMENTO()]
|
| >>> [EPL][FRAMEWORK] Entrou na funcao - tst0003y_epl_teste <<<
|
| [FRAMEWORK] Entrou na funcao - tst0002_function_logix
| [FRAMEWORK] Teste execucao EPL [FUNCTION]
| [EPL] Chamadas EPL desabilitadas para o fonte TST0002. Função TST0003Y_EPL_TESTE() ignorada. [source: TST0002.4GL line: 21 function: TST0002_FUNCTION_LOGIX()]
| *** [FRAMEWORK] FIM ***

LOGIX.EPL.FUNCTION.tst0003y_epl_teste.ENABLE = 0

Desativando a chamada da EPL pelo nome da função

| *** [FRAMEWORK] INICIO ***
|
| [FRAMEWORK] Entrou na funcao - tst0001_inicia_processamento
| [FRAMEWORK] Teste execucao EPL [MAINSOURCE]
| [EPL] Chamada EPL desabilitada para a função TST0003Y_EPL_TESTE(). Função ignorada. [source: TST0001.4GL line: 40 function: TST0001_INICIA_PROCESSAMENTO()]
| [FRAMEWORK] Entrou na funcao - tst0002_function_logix
| [FRAMEWORK] Teste execucao EPL [FUNCTION]
| [EPL] Chamada EPL desabilitada para a função TST0003Y_EPL_TESTE(). Função ignorada. [source: TST0002.4GL line: 21 function: TST0002_FUNCTION_LOGIX()]
| *** [FRAMEWORK] FIM ***

Logix como servidor REST

marlon-pinheiro — Wed, 16 Feb 2022 01:41:25 +0000

Olá pessoas, tudo bem?

Hoje vamos configurar o Logix para ser um servidor REST, desta forma podemos fazer com que aplicativos externos busquem informações no Logix.

Criando um appserver REST

A primeira coisa a ser feita é criar um novo appserver que será utilizado exclusivamente para responder as requisições que serão realizadas.

Para facilitar a identificação e uma futura manutenção, nomeie o appserver de forma clara para que qualquer pessoa que for acessar o servidor saiba qual a finalidade daquele appserver. Nossa sugestão é criar um appserver com o nome appserver_web ou appserver_rest

Para criar o appserver sugerimos a leitura do seguinte artigo.

Configurando o appserver REST

Feita a criação do appserver, agora vamos realizar as configurações necessárias.

Segue abaixo todas as configurações que precisam ser realizadas no arquivo totvsappserver.ini

[ONSTART]
REFRESHRATE=30
JOBS=HTTPJOB

[HTTPJOB]
MAIN=HTTP_START
ENVIRONMENT=DBOracle-34

[HTTPV11]
ENABLE=1
SOCKETS=HTTPREST
TIMEOUT=600

[HTTPREST]
PORT=9070
URIS=RESTMAIN
SECURITY=1
SSL2=0
SSL3=1
TLS1=3
TSL1_0=1
TSL1_1=1
TSL1_2=1

# *** Certificado 01
#CERTIFICATE=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\cert.pem
#KEY=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\key.pem

# *** Certificado 02
# CERTIFICATE=D:\TOTVS\LOGIX\bin\4371_appserver_https\certificates\JVD60103166.cer
# KEY=D:\TOTVS\LOGIX\bin\4371_appserver_https\certificates\JVD60103166.key

# *** Certificado 03
CERTIFICATE=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\totvs_certificate.crt
KEY=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\totvs_certificate_key.pem

[RESTMAIN]
URL=/rest
INSTANCES=3,10
ONSTART=LOGIXRESTSTART
ONCONNECT=LOGIXRESTCONNECT
ONEXIT=LOGIXRESTEXIT

# *** REST FIM

[WEBSERVICES]
userid=admlog

[HTTP]
enable=1
port=80
path=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\web

[HTTPS]
enable=1
port=443
path=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\web

[SSL]
TYPE=TCPIP
PORT=26011
SecureConnection=1

[SSLCONFIGURE]
SSL2    = 0
SSL3    = 1
TLS1_0  = 1
TLS1_1  = 1
TLS1_2  = 1
HSM=0
BUGS=1
STATE=1
VERBOSE=1
tryprotocols=1

# *** Certificado 01
#CERTIFICATESERVER=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\cert.pem
#KEYSERVER=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\key.pem

# *** Certificado 02
# CERTIFICATESERVER=D:\TOTVS\LOGIX\bin\4371_appserver_https\certificates\JVD60103166.cer
# KEYSERVER=D:\TOTVS\LOGIX\bin\4371_appserver_https\certificates\JVD60103166.key

# *** Certificado 03
CERTIFICATESERVER=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\totvs_certificate.crt
KEYSERVER=D:\TOTVS\LOGIX\bin\4372_appserver_rest_https\certificates\totvs_certificate_key.pem

Note que estamos realizando o apontamento para alguns certificados.
Neste artigo explicamos como fazer a criação destes certificados.

Inicializando o appserver REST

Com tudo configurado você já pode fazer a inicialização do appserver.

Criando um novo appserver no Logix

marlon-pinheiro — Wed, 16 Feb 2022 01:38:18 +0000

Olá pessoas, tudo bem?

Preciso criar um novo appserver para o Logix e agora o que eu faço?
Vamos aqui demonstrar de forma pratica como cria-lo, o que precisa ser alterado e como acessa-lo.

Criando um novo appserver

A forma mais fácil de criar um novo appserver é você acessar o seu servidor de aplicação, localizar o diretório dos appservers já existentes, pegar um appserver como modelo e fazer um Ctrl+C / Ctrl+V

Finalizada a cópia da pasta é necessário editar o arquivo totvsappserver.ini e alterar a porta de comunicação na sessão [TCP]

[TCP]
TYPE=TCPIP
PORT=4320

Caso essa informação não seja alterada será apresentado um erro no momento da inicialização do appserver.

Exemplo

[WARN ][SERVER] [Thread 25272] Trying acquire port 4320 (Bind error #10048:Address already in use.)

Em caso de sucesso, será apresentada a seguinte informação

[INFO ][SERVER] [Thread 8440] Application Server started on port 4320
TotvsTec Server started.

Pronto, agora já temos um novo appserver, simples né?

Acessando o novo appserver

Quando criamos um appserver ele pode fazer parte do seu conjunto já existente de Master/Slaves ou ter uma função especifica como por exemplo, ser um appserver exclusivo para a geração de debug.

Vamos exemplificar as duas situação.

Meu novo appserver será utilizado como um SLAVE.

Neste caso você precisa acessar o seu appserver MASTER, editar o arquivo totvsappserver.ini e incluir uma nova sessão para que o appserver_master consiga identificar o novo appserver.
No exemplo abaixo estou dizendo que o meu novo appserver é o [SLAVE03]
O seu appserver Master deve ter uma estrutura semelhante ao exemplo abaixo:

[SERVERNETWORK]
Masterconnection=0
Servers=SLAVE01,SLAVE02,SLAVE03

[SLAVE01]
type=TCPIP
server=localhost
port=4311
connections=10

[SLAVE02]
type=TCPIP
server=localhost
port=4312
connections=10

[SLAVE03]
type=TCPIP
server=localhost
port=4320
connections=10

Finalizada essas alterações é necessário reiniciar o appserver_master para que o novo appserver seja identificado.

Meu novo appserver será utilizado para geração de debug.

Digamos que você queira criar um appserver de uso exclusivo para geração de debug. Neste caso você precisa somente inicializar o appserver e fazer com que o seu smartclient ** se comunique com o appserver.
Para que o smartclient consiga localizar o appserver, voce vai precisar editar o arquivo **totvssmarclient.ini e criar uma nova sessão de comunicação. No meu exemplo estou criando a sessão [TCP_DEBUG], mas você poderia informar qualquer outro nome aqui, exemplo: ( [DEBUG_LOGIX] )

[TCP_DEBUG]
SERVER=localhost
PORT=4320

No momento da execução do totvssmartclient.exe, basta informar o nome da sessão criada no campo Comunicação no Cliente conforme exemplo:

Pronto agora já estamos com acesso direto ao novo appserver.

TOTVS CERTIFICATE

marlon-pinheiro — Mon, 14 Feb 2022 22:44:58 +0000

Olá pessoas, tudo bem?

Neste artigo quero demonstrar para vocês como é fácil realizar a criação e instalação do certificado TOTVS em seu ambiente.

Preparando o Ambiente

Para deixar tudo bem organizado, vamos criar uma pasta chamada certificados logo abaixo do diretório configurado como ROOTPATH do seu sistema.

Se o ROOTPATH for c:\totvs\logix, vamos criar uma pasta certificados abaixo de logix, ficando da seguinte forma, c:\totvs\logix\certificados

Agora faça download dos seguintes arquivos e coloque dentro da pasta certificados.

Criando o certificado

Finalizada a preparação do ambiente, vamos para a parte de criação do seu certificado. Abra o prompt de comando e entre no diretório certificados, nele teremos o arquivo totvs_certificates.exe. Vamos dar um RUN neste executavel, segue abaixo a lista de parâmetros possíveis de ser utilizada.

-cert: Nome do arquivo de certificado. 
(padrão: totvs_certificate.crt) (*1)

-key: Nome do arquivo de chave de certificado. 
(padrão: totvs_certificate_key.pem) (*1)

-passwd: Palavra chave do certificado (senha)

-issuer: Nome do emissor do certificado. (*2)

-host: Permite o registro de 'N' nomes ou IPs
 para o servidor no certificado (*3)

*1 - Quando não definido assume o nome padrão

*2 - Se o emissor não for definido será usado 
o primeiro nome de máquina fornecido, senão 
usará o primeiro IP, como nome do emissor.

*3 - se não for definido nenhum "HostName", 
serão incluídos de forma automática o nome padrão 
da máquina (host name), e também acrescido dos 
sufixos de Domínio (DNS Suffix), assim como 
também serão incluídos os endereços 
(HostName) de acesso local (localhost e 127.0.0.1)

O comando final deve ficar semelhante ao exemplo abaixo:

totvs_certificates.exe -cert totvs_certificate.crt -key totvs_certificate_key.pem -passwd Totvs@123 -issuer marlon.pinheiro@totvs.com.br -host nome_maquina

Pronto agora será criado 2 novos arquivos dentro do diretório ( totvs_certificate.crt e totvs_certificate_key.pem )

Instalando os certificados

Agora vamos para a parte final do processo, a instalação dos certificados. O processo de instalação também é simples, basta dar dois cliques no arquivo .crt e será aberto um configurador do Windows para realizar a instalação do certificado.

Execute primeiramente o arquivo totvs_certificate_CA.crt e depois faça o mesmo processo para o arquivo que você criou totvs_certificate.crt

Finalizada a criação, ao visualizar as propriedades do certificado teremos a seguinte estrutura:

Tarefa concluída com sucesso !!!

Fontes utilizadas para criação deste artigo:
https://tdn.totvs.com/pages/viewpage.action?pageId=548376390
https://tdn.totvs.com/pages/viewpage.action?pageId=539526365