Histórico da Página

El punto de entrada AF010TOK valida

los datos digitados antes

de la grabación.

#include "rwmake.ch"

User function AF010TOK()
Local aArea := GetArea()
Local cMensagem := ""
Local lRet := .T.
Local cChapa := AllTrim(M->N1_CHAPA)

If !Empty(cChapa)
    If Len(cChapa) <> 6
        cMensagem := "Numero

de la plaqueta no está en el estándar de dígitos."
        Help("ATFA010",1,"HELP","VALCHAPA",cMensagem,1,0)
        lRet := .F.
    Endif
Endif

RestArea(aArea)
SN1->(DbSetOrder(1))

Return lRet

Portugués(Brasil)

Microsiga_Protheus10_

y_Microsiga_Protheus11

Todos

Todas

lRet

ATFA010A.PRW