>Boris thanks for you reply, i run this prg "do new"
>where i will be put these codes.
>when i put in prg. i get message this can use with a method...
O, If you invoke this PRG from within a Form pass the form name as parameter:
Do New WITH thisform.New
Do New WITH thisform.New
LPARAMETERS lcFormName
IF VARTPE(lcFormName) == [C]
DEFINE WINDOW ....... IN WINDOW (lcFormName)
ELSE
DEFINE WINDOW .......
ENDIF
.....
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.