Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Development environment vs EXE
Message
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows 2003 Server
Miscellaneous
Thread ID:
01417563
Message ID:
01417569
Views:
75
Hi Sergey:

Let me put the code that work as expected in the VFP Developement enviroment , I add requery to verify that the data is reissue but did not cause any different when i compile the project into an exe. There a report in this application that work fine that make me think the data is there why this local view does not get populated when I compile.


===========================================================================
mdate1 = STRTRAN(DTOC(ThisForm.Cem_date_ctrl1.Text_Date.value),"/","-")
mdate2 = STRTRAN(DTOC(ThisForm.Cem_date_ctrl2.Text_Date.value),"/","-")

USE Heat_Support!uansuporttop10 IN 0 ALIAS UANSuportTop25
SELECT UANSuportTop25
REQUERY("UANSuportTop25")
GO top
REPLACE ALL STARTDATE WITH mDATE1
REPLACE ALL ENDDATE WITH MDATE2
GO TOP

COPY TO UANSupportTop10 NEXT 10
GO top
I =1
DO WHILE NOT EOF()
SCATTER memvar
USE Heat_support!UANSupportCallType IN 0 ALIAS UANSuportCallType
SELECT UANSuportCallType
NewName = "UANSupportCallType"+alltrim(STR(I))
COPY TO (NEWNAME)
I = I + 1
use
SELECT UANSuportTop10
SKIP
IF i = 11
EXIT
ENDIF

ENDDO

mdate1 = THISFORM.Cem_date_ctrl1.Text_Date.VALUE
mdate2 = THISFORM.Cem_date_ctrl2.Text_Date.VALUE

SET DATE TO AMERICAN
USE heat_support!gregorio ALIAS callog_support_report
SELECT callog_support_report
REPORT FORM &mreport_name PREVIEW
SET DATE TO YMD

USE
CLOSE DATABASES ALL

OPEN DATABASE heat_support

============================================================
Gregorio J. Placeres
IT Analyst
Uniform Accounting Network
Auditor of State of Ohio
88 East Broad Street
P.O. Box 1140
Columbus, Ohio 43216-1140

Tel. 614-728-4694

Gregorio_J@MSN.COM

http://www.gjpproductions.com
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform