Versão atual:

NOFUNCW Opção não disponível no Protheus

Meu fonte deu um erro de função, sendo que antes o mesmo já era usado. A função está presente no fonte, o que pode ter acontecido?

Trecho do fonte e print em anexo.

User Function RFINA008()

Private oProcess := MsNewProcess():New({|| Atualiza(oDlg) } , "Atualizando.....","Aguarde...",.T.) 

  DEFINE MSDIALOG oDlg TITLE "Excluir" FROM 000, 000  TO 120, 140 COLORS 0, 16777215 PIXEL

    DEFINE SBUTTON oSButton1 FROM 041, 008 TYPE 01 OF oDlg ENABLE ACTION oProcess:Activate()
    DEFINE SBUTTON oSButton2 FROM 041, 034 TYPE 02 OF oDlg ENABLE ACTION CLOSE(oDlg)

  ACTIVATE MSDIALOG oDlg CENTERED


return

Static Function Atualiza(oDlg)
    Receb()
    Pagar()
    movi()
    CLOSE(oDlg)
Return

erro.png Capturar.PNG

Versões (2):

Ver a versão formatada

NOFUNCW Opção não disponível no Protheus

  • criado 30 de Jan de 2023

Comentário

new question