Ponto de Entrada Inspeção de Processo

Boa Tarde, Pessoal!

Sou iniciante em programação ADVPL, estou tentando criar um P.E., que nao deixe concluir a processo de gravação do resultado na inspeção de processo. Porem esta dando erro :

Update error - File is in EOF - QPL990 in file C:\bamboo\xml-data\build-dir\TP11-OF20310-TECXWIN64\advpl\advplfile.cpp at line 72 on U_Q215TDOK(Q215TDOK.PRW) 14/02/2024 17:08:02 line : 17

Fonte :

User Function Q215TDOK() Local aArea := GetArea() Local aAreaQPL := QPL->(GetArea()) Local lRet := .T.

//lRet := MsgYesNo("Deseja continuar?", "Atenção")

IF QPL->QPL_APROVA :='' lRet:=.F. ENDIF

RestArea(aAreaQPL) RestArea(aArea) Return lRet

atenciosamente

compartilhar
  1. Você vai ver essas setas em qualquer página de pergunta. Com elas, você pode dizer se uma pergunta ou uma resposta foram relevantes ou não.
  2. Edite sua pergunta ou resposta caso queira alterar ou adicionar detalhes.
  3. Caso haja alguma dúvida sobre a pergunta, adicione um comentário. O espaço de respostas deve ser utilizado apenas para responder a pergunta.
  4. Se o autor da pergunta marcar uma resposta como solucionada, esta marca aparecerá.
  5. Clique aqui para mais detalhes sobre o funcionamento do TOTVS DevForum!

0 resposta

Não é a resposta que estava procurando? Procure outras perguntas com as tags advpl totvsresource protheus ou faça a sua própria pergunta.