try this
select tblItems
* ------------
set date ansi
set century on
copy to temp
* If you want to view just 1 item then
* copy to temp for item = "ballpen"
t_date = set("DATE")
use temp in 0 alias temp
select temp
index on ITEM + DTOC(date) + STATUS to temp
total on ITEM+DTOC(DATE) + STATUS...
This may be helpful
set talk off
set echo off
clear
close all
delete file t-name.*
create table t-name free (FIELD1 c(10), RESULT c(20))
insert into t-name (FIELD1) values ("1.2.3")
insert into t-name (FIELD1) values ("1.1")
insert into t-name (FIELD1) values ("1")
insert into t-name...
you can try
index on str(len(alltrim(PARENTEELID))) + PARENTEELID tag HIERARCHY
I tried to test your code and found that I can not call 'user defined functions' with Field Name(s) for creating indexes.
This will not work: Hierarchy(PARENTEELID) or Hierarchy(FIELDNAME). There is an error...
* Add 2 numeric fields to the TemapCursor i.e. NEWPRIX and NEWTOTP
select 00000000.00 as NEWPRIX, 00000000.00 as NEWTOTP, ;
line, order.itemno, percentage, invoice, cusno, table1.descrip as Description,;
table1.sccal as Scientific_cal, str(int(Percentage/100*table1->pack),4) as pack...
* Simplify the above same code so you may be able to see the syntax error
lcCrlf = CHR(13) + CHR(10)
lcLine = ""
FOR lnI = 1 to 24
lcI = TRANSFORM(lnI)
lcLine = "CENTRY" + lcI
lcLine = EVAL(lcLine)
lcLine = lcLine + " "
lcLine = lcLine + lcCrLf
STRTOFILE(lcLine, "garble.log",1)...
Very basic info: May be stop outlook for few days for debugging purposes. 'End Task' for any outlook instance(s)
I guess rest of the application works fine except this option.
Mike -> "I disagree with Nasib. Using THISFORM in an index is not a good idea"
But same is true for filter. In IkonTechDev' situation using 'index' or 'filter' will have the same scope limitations.
There is extra cost on recreating his logic to accomodate the suggested changes. I guess...
This is simply to answer your question, such that you can do it. But follow what is said above.
* Upper case is FIELDNAME
* Limit dataset access based on DateRange
index on trans(DATEFLD >= thisform.FromDate.value and DATEFLD <= thisform.ToDate.value) + alltrim(EMPID) tag MyOrder
set key to...
If I understand correctly:
You want to print multiple complete addresses on the same page if space available. That is if space available after printing x bands.
Is the address band the last one on the report ?
You could have a counter which will tell where you are on the report at any given...
Some more ideas:
Assuming each line height is the same and you can print 50 lines per page.
Add a field call it may be LINENO N 4
and another one call it may be NEWPAGE L
Have the table ready to print with no active index.
Update LINENO from 1 to 8, for each label, assuming you have maximum 8...
Picking up ideas from above,
You could try a label and duplicate your records to print 2 copies to a same page.
Create a cursor with duplicate record such that duplicates appear together.
Then create a Label report and feed the newly created cursor to it.
If you have to print a separating...
Thank you Vilhelm-Ion, Olaf and Mike for taking the time to reply.
I was expecting in DE when Clicking on Form
Form
New Property && Exists
New Method && Exists
New Class && Does not Exist
I was thinking there may be a way to have 'New Class' as well. I am a bit lazy and...
You may try the following
Modify your cursor to include 2 Char type fields
for example CNUMBER, CSTARS
then
replace all CNUMBER with alltrim(str(INUMBER))
replace all CSTARS with left("********************",15-len(alltrim(CNUMBER)) && Modify the len as required
in your report print both...
i am not sure your question. If you are new to SQL,may be you could use the following approach
*
* ITEMNAME : name of the field where you stored 'LAPTOP', 'PRINTER', etc.
use delivery in 0 alias tmpdelivery again
sele tmpdelivery
index on ITEMNAME to tmp
total on ITEMNAME to tmp && sums all...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.