... DIALOG oDlg CENTERED ON INIT (oBtn201:Disable(),oText2:SetFocus()) return nil FUNCTION PROTECT3() PRIVATE ARQ, BUFFERS, RET, PALAVRA, P, T, ARQUIVO1 SET CENTURY OFF REGISTRO := "HDHDHDHDRBRBRBRB99999999YYYYYYYYYYYY" HDSERIAL := SUBSTR(HDSERIAL(),1,8) ...