ajuda com erro em Folder...help

[ROQUE]

estou fazendo assim:

Code: Select all

 DEFINE DIALOG Tela NAME "FOLDER"
                /*
                @ 0.5, 1 FOLDER oFld PROMPTS "Pedido" ;
                         DIALOGS "PEDIDO" ;
                         SIZE 225, 245
                */

                REDEFINE FOLDER oFld ID 4001 OF Tela;
                         PROMPTS "One", "Two" ;
                         DIALOGS "PEDIDO", "ITENS"

                REDEFINE SAY                ID 10  OF oFld:aDialogs[ 1 ] COLOR 'N/W*'

                REDEFINE GET oCLIE VAR CLIE ID 100 OF oFld:aDialogs[ 1 ] PICTURE '######'

               // oFld:InitDialogs()

          ACTIVATE DIALOG Tela ON INIT oFld:InitDialogs()

da o seguinte erro:

Non defined Id
No: 4001
stack calls:
TCONTROL:INITIATE(0)
TFOLDER:INITIATE(0)
__OBJSENDMSG(0)
OSEND(0)
ASEND(0)
TDIALOG:INITIATE(0)
TDIALOG:HANDLEEVENT(0)
_FWPPC(0)
DIALOGBOX(0)
TDIALOG:ACTIVATE(0)
M_PEDIDO(72)
(b)BUILDMENU1(28)
TMENU:COMMAND(0)
TWINDOW:COMMAND(0)
TWINDOW:HANDLEEVENT(0)
_FWPPC(0)
WINRUN(0)
TWINDOW:ACTIVATE(0)
MAIN(16)

[Antonio Linares]

Roque,

Please copy here the RC file that you are using, thanks

[ROQUE]

antonio e como faz isso? estou usando RES. mando em seu e-mail?