Histórico da Página
...
Descrição: | QIPIntAPI - Eventos de Integração do SIGAQIP com as APIs do APP Minha Produção |
Versões: | Microsiga Protheus 12 |
Idioma: | Português (Brasil) |
Sistemas Operacionais Suportados: | Todos |
Compatível com as Bases de Dados: | Todos |
Parâmetro: | ParamIXB[1] - Objeto Json com dados correspondentes ao Evento (ParamIXB[4]), por exemplo:
|
Retorno: | xReturn, varia de acordo com o Evento (ParamIXB[4]), por exemplo:
|
Eventos de chamada de Ponto de Entrada: | Varia de acordo com o Evento (ParamIXB[4]):
|
Programa Fonte: | EnsaiosInspecaoDeProcessosAPI.prw |
Informações | ||
---|---|---|
| ||
|
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#DEFINE X5_CHAVE 3 User Function QIPINTAPI() Local aLabsFil := {} Local aSX5 := Nil Local cClasseAPI := Nil Local cEndPoint := Nil Local cEvento := Nil Local oDados := Nil If ParamIXB != Nil oDados := ParamIXB[1] cEndPoint := ParamIXB[2] cClasseAPI := ParamIXB[3] cEvento := ParamIXB[4] EndIf If cEvento == "laboratoriosRelacionadosAoUsuario" .AND. !Empty(oDados['loginUsuario']) .AND. oDados['loginUsuario'] == "USUARIO01" aAdd(aLabsFil, "LABQUI") Else ElseIf cEvento == "laboratoriosRelacionadosAoUsuario" aSX5 := FWGetSX5( "Q2" ) aEval(aSX5, {|aItem| aAdd(aLabsFil, aItem[X5_CHAVE]) }) EndIf Return aLabsFil |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas