Histórico da Página
Ponto de Entrada para manipulação
...
dos eventos de integração do SIGAQIP com o APP Minha Produção
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 Evento (ParamIXB[4]), por exemplo:
| ||
Retorno: | xReturn, varia de acordo com o eventoEvento (ParamIXB[4]), por exemplo:
| ||
Eventos de chamada de Ponto de Entrada: | Para o Evento | Programa Fonte: | EnsaiosInspecaoDeProcessosAPI.prwVaria de acordo com o Evento (ParamIXB[4]):
|
Programa Fonte: | QualityAPIManager.prw QIPLaudosEnsaios.prw InspecoesDeProcessosAPI.prw ResultadosEnsaiosInspecaoDeProcessosAPI.prw EnsaiosInspecaoDeProcessosAPI.prw |
Informações | ||
---|---|---|
| ||
|
Bloco de código | ||||||||||
---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE "TOTVS.CH" #DEFINE X5_CHAVE 3 User Function QIPINTAPI() Local oDadosxReturn := Nil Local cEndPoint aSX5 := Nil Local cClasseAPI := Nil Local cEndPoint := Nil Local cEvento := Nil Local oDados aLabsFil := {}Nil If ParamIXB != Nil oDados := ParamIXB[1] cEndPoint := ParamIXB[2] cClasseAPI := ParamIXB[3] cEvento := ParamIXB[4] EndIf If cEvento == "laboratoriosRelacionadosAoUsuario" xReturn := {} If !Empty(oDados['loginUsuario']) .AND. oDados['loginUsuario'] == "USUARIO01" aAdd(aLabsFilxReturn, "LABQUI") Else aSX5 := FWGetSX5( "Q2" ) aEval(aSX5, {|aItem| aAdd(xReturn, aItem[X5_CHAVE]) }) EndIf ElseIf cEvento == "bloqueiaDataInspecao" xReturn := .F. ElseIf cEvento == "bloqueiaHoraInspecao" xReturn := .F. ElseIf cEvento == "complementoAmostra" //Meu complemento de amostra ElseIf cEvento == "complementoResultados" //Meu complemento de resultados ElseIf cEvento == "complementoLaudo" //Meu complemento de laudo EndIf Return aLabsFilxReturn |
Import HTML Content
Visão Geral
Conteúdo das Ferramentas