Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

Linha de Produto:TOTVS Varejo Lojas
Segmento:Varejo
Módulo:SigaLoja (Controle de Loja)
Função:

RmiXfunC

Ticket:Não há.
Story:

DVARLOJ1-8688

02. SITUAÇÃO/REQUISITO

Realizar a gravação de um de/para após a confirmação de integração

...

do Produto com o TVFR (TOTVS VAREJO FRANQUIAS E REDES).

Criar função onde seja possível verificar se o

...

status de integração de determinado Produto.

03. SOLUÇÃO

Na tentativa de identificar o status da integração, caso Caso seja confirmado a integração do Produto será gravado um de/para com Sistema de Origem = CONFIRMA.

Criado função VALIDINT - Validar a integração de cadastro, onde houve confirmação de gravação no sistema destino, com os parâmetros:

cOrigem = deve-se passar CONFIRMA

...

o campo MHM_SISORI = CONFIRMA.

Também foi criado a função RmiValInt, para que seja possível retornar o status de integração do Produto. Nesta função será retornado um Array com duas posições:

1º Posição = Logica (.T. para produto integrado ou .F. caso o mesmo não esteja integrado).

2º Posição = Caracter (Mensagem com o status da integração do Produto).


04. DEMAIS INFORMAÇÕES

Para a chamada da função RmiValInt deve-se informar dois parâmetros sendo eles: 

cAlias = Tabela do cadastro (ex: SB1)

...

cValor = registro do cadastro (ex:

...

código do produto)

lOrigem = deve-se passar .T., sistema de origem protheus

04. DEMAIS INFORMAÇÕES

...

Abaixo exemplo da chamada da rotina RmiValInt:


Bloco de código
titleExemplo!
User Function TesteVld()

Local aMsg := {}

    RpcSetType(3)
    RpcSetEnv("99", "01", , , , "TesteVld")

    Conout("----------------------- INICIO TesteVld" + Time() )

        aMsg := RmiValInt("SB1","21505")

        Conout(aMsg[1])
        Conout(aMsg[2])


Return



05. ASSUNTOS RELACIONADOS

...