Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
DATAENVIRONMENT~
Message
From
30/12/1999 02:23:35
 
General information
Forum:
Visual FoxPro
Category:
Databases,Tables, Views, Indexing and SQL syntax
Miscellaneous
Thread ID:
00308730
Message ID:
00310260
Views:
47
i think pack it once a week is acceptable.
but will the methos " copy the non-deleted record to a new
table and replace the previous " time consuming??

also, now i found a problem on printer a report, what i want to print
out is, each report can only contain 10 item , if more than 10 , goon to the next report. but now, when i print a report, it print out many many pages that's
not the actual number of page. this is my code:

SELECT REPORT_C2
REC = RECCOUNT()
TO_PAGENO = 0
IF REC > 11
DO WHILE (REC > 11 )
REC = REC - 10
TO_PAGENO = TO_PAGENO + 1
IF REC > 0 AND REC < 11
TO_PAGENO = TO_PAGENO + 1
ENDIF

ENDDO
ELSE
TO_PAGENO = 1
ENDIF
FM_PAGENO = 1

MESSAGEBOX(STR(FM_PAGENO),0,"TEST")
MESSAGEBOX(STR(TO_PAGENO),0,"TEST")


WAIT WINDOW "Printing......." TIMEOUT 3
FOR PN = FM_PAGENO TO TO_PAGENO
MESSAGEBOX(STR(PN),0,"TEST")
IF PN = 1
NITEM = 0
TPAGENO = PN
REPORT FORM SOREPORT TO PRINTER
ELSE
NITEM = 10 * (PN - 1)
TPAGENO = PN
REPORT FORM SOREPORT TO PRINTER
ENDIF
ENDFOR
ELSE
MESSAGEBOX("report no Not Found!", 0 + 48,"System")
ENDIF

RETURN

to_pageno & fm_page no is storing the number of page that i need to print out, and use by the loop.
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform