PC Toledo

Enviado: **05 Jun 2014 03:49**

Boa noite pessoal...

Estou compilando meu programa com o xharbour... e vários prg já funcionaram...
Estou com o seguinte problema...
Tenho a seguinte função que utilizo para digitar o campo senha...

Código: Selecionar todos

PROCEDURE GETSEN(P1)
          IF GETPREVALI(P1)
             P1:SETFOCUS()
             P1:CARGO := ""
             DO WHILE P1:EXITSTATE() == 0
                IF P1:TYPEOUT()
                   P1:EXITSTATE := 5
                ENDIF
                DO WHILE P1:EXITSTATE() == 0
                   L2 := INKEY(0)
                   IF L2 >= 32 .AND. L2 <= 255
                      P1:CARGO := P1:CARGO() + CHR(L2)
                      GETAPPLYKE(P1, 42)
                   ELSEIF L2 = 8
                          P1:CARGO := SUBSTR(P1:CARGO(), 1, LEN(P1:CARGO()) - 1)
                          GETAPPLYKE(P1, L2)
                   ELSEIF L2 = 13
                          GETAPPLYKE(P1, L2)
                   ELSEIF L2 = 27
                          GETAPPLYKE(P1, L2)
                   ENDIF
                ENDDO
                IF .NOT. GETPOSTVAL(P1)
                   P1:EXITSTATE := 0
                ENDIF
             ENDDO
             P1:KILLFOCUS()
          ENDIF
          IF P1:EXITSTATE() <> 7
             P1:VARPUT(P1:CARGO())
          ENDIF

RETURN
*******************************************************************************

na compilação com o xharbour, está dando os seguintes erros...
Unresolved external '_HB_FUN_GETPREVALI' referenced from d:\trab\fontes\obj\sl_proc.obj
Unresolved external '_HB_FUN_GETAPPLYKE' referenced from d:\trab\fontes\obj\sl_proc.obj
Unresolved external '_HB_FUN_GETPOSTVAL' referenced from d:\trab\fontes\obj\sl_proc.obj

como faço pra ele reconhecer estas 3 funções?

Obrigada

Enviado: **05 Jun 2014 07:44**

Olá mhfferreira,

A diferença é que o Clipper usa no máximo 10 caracteres para variáveis e funções, por isso sua função funciona em Clipper. Porém no [x]Harbour, você precisa colocar o nome completo das funções que são:

Código: Selecionar todos

GETPREVALIDATE()
GETAPPLYKEY()
GETPOSTVALIDATE()

Enviado: **23 Jun 2014 16:34**

Obrigada Jairo... isto mesmo...
este é o problema do clipper... a gente "come" os comandos e depois nem se toca que o nome correto tem continuação...

valeu...

PC Toledo

erro com os comandos GETPREVALI, GETAPPLYKE e GETPOSTVAL

erro com os comandos GETPREVALI, GETAPPLYKE e GETPOSTVAL

erro com os comandos GETPREVALI, GETAPPLYKE e GETPOSTVAL

erro com os comandos GETPREVALI, GETAPPLYKE e GETPOSTVAL