Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Compile error vfp6 to vfp9
Message
From
12/04/2007 14:15:43
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
01214993
Message ID:
01215138
Views:
11
I found a program by the same name too; I.PRG .

Yes, I removed the external command, worked fine without it. Thanks.

No, this isn't my code, I took my first look at it last week.

I've worked through about 15 compile errors thus far. Still got a few more that have me stumped;

Program c:\mxm\progs\genmenux.prg has the following errors:
Unknown INSERT - Undefined
Unknown OBJDATA - Undefined

Program c:\mxm\progs\procbc.prg has the following errors:
Unknown CARR - Undefined

Program c:\mxm\progs\procmrp.prg has the following errors:
Unknown PATABLESUSED - Undefined
------------------------------------------------------
insert(SUBSTR(m.eval_str, 2))
I suspect is the offending code. There is no FUNCTION INSERT
Similar situation with objdata
m.eval_str = objdata(LEFT(m.eval_str, m.at_pos4-1), SUBSTR(m.eval_str, m.at_pos4+2))
CARR is a keyword because of SET CARRY.

CARR is a parameter passed to a function.
FUNCTION nxtab
 PARAMETER carr, c, retnum
 PRIVATE i, cont
 i = c
 cont = .T.
 retnum = 0
 DO WHILE cont
    DO CASE
       CASE ASC(carr(i))>=96 .AND. ASC(carr(i))<=127
          retnum = 2
          RETURN
       CASE ASC(carr(i))>=0 .AND. ASC(carr(i))<=31
          retnum = 1
          RETURN 1
    ENDCASE
    i = i+1
    IF i>ALEN(carr)
       retnum = 0
       RETURN
    ENDIF
 ENDDO
 retnum = 0
 RETURN
ENDFUNC
Patables is also a parameter of a function.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform