Linha Microsiga Protheus

Árvore de páginas

01. DADOS GERAIS

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 o status de integração de determinado Produto.

03. SOLUÇÃO

Caso seja confirmado a integração do Produto será gravado um de/para com 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)

A baixo exemplo da chamada da rotina RmiValInt:

Chamada
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


Retorno:

Retorno
----------------------- INICIO TesteVld11:26:42
.T.
PRODUTO integrado, aguardando retorno de confirmação, UUID de referência 15927cd7-9601-ad48-26cb-d3559e294d33

05. ASSUNTOS RELACIONADOS