LAPostMnt - Manipular informações no apontamento de perda pelo APP Minha Produção
Linha de Produto: | Protheus | ||||||||||||
Segmento: | Manufatura | ||||||||||||
Módulo: | SIGAPCP - Planejamento e Controle da Produção | ||||||||||||
Parâmetro(s): |
| ||||||||||||
Idiomas: | Todos | ||||||||||||
País(es): | Todos | ||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||
Sistema(s) Operacional(is): | Todos |
Ponto de Entrada
| Descrição: | O ponto de entrada LAPostMnt é executado na requisição de apontamento de perda da API ProductionAppointment. Formato dos Campos Os campos devem respeitar seus respectivos formatos, conforme são utilizados no Protheus. Ex.: Campos do tipo Numérico são referenciados sem as aspas (9999) e campos do tipo Lógico são atualizados no formato .T. ou .F. Campos Customizados Os campos customizados são referenciados a partir de seus respectivos nomes na tabela de Apontamento de Perda (SBC). Ex.: oJson["BC_CSTDATA"] := CTOD("01/06/24") //Data no formato "DD/MM/AA" oJson["BC_CSTNUME"] := 100 oJson["BC_CSTLOGI"] := .T. | ||||||||
| Localização: | API ProductionAppointment, método POST lossAppointment - Responsável por enviar os dados ao programa MATA685 para persistir o apontamento da perda. | ||||||||
| Eventos: | Não se aplica. | ||||||||
| Programa Fonte: | ProductionAppointment.PRW | ||||||||
Sintaxe: | LAPostMnt( ) --> oJson | ||||||||
| Retorno: |
| ||||||||
| Observações: | Não é permitida a utilização de qualquer componente de interface gráfica nesse ponto de entrada, visto que a função será executada durante uma requisição REST. |
#INCLUDE "TOTVS.CH"
User Function LAPostMnt()
Local cJson := PARAMIXB[1]
Local oJson := JsonObject():New()
//Converte a string JSON para objeto JSON, para que seja possível manipular os dados.
oJson:FromJson(cJson)
If AllTrim(oJson["BC_MOTIVO"]) == "FH"
oJson["BC_OBSERVA"] := "Lançamento de perda por falha humana."
EndIf
//Converte o objeto Json com as informações manipuladas em uma String Json.
cJson := oJson:ToJson()
Conout("cJson: " + cJson)
//Limpa da memória o objeto Json utilizado.
FREEOBJ(oJson)
Return cJson