While question?

[Jeff Moses]

when using the following while condition only the the left side of .AND. is working. the right side is not. all values are simple numeric variables. if i reverse them i get the same results so i know each side is a valid condition.

while vunit_count

[Tom Cone Jr]

RE: While question?

Jeff,

that sure sounds odd. I'll do some testing here to see if I can replicate the problem.

In the meantime you can use a nested loop to achieve the same effect:

[code]
while vunit_count

[Tom Cone Jr]

RE: While question?

Jeff,

As I think more about the problem you're describing I suggest you verify that your table is sorted correctly. For the compound expression you're using to work the table must be sorted using a matching compound expression:

vunit_count + vday_count

or possibly

padl(str(vunit_count),10,"0") + padl(str(vday_count),10,"0")

-- tom

[Tom Cone Jr]

RE: While question?

Jeff,

here's an easy example I've whipped up...

it illustrates that compound expressions will
be properly evaluated in While statements.

unzip the attachment to an empty folder.

Examine the id_temp index expression

Run the TstWhile script

View the trace window


Something else must be going on at your end. Either the data is not sorted correctly for the compound expression you want to use, or the script is not incrmenting or fetching the right records...

-- tom

[Tom Cone Jr]

RE: While question?

oops.

here's the file.

[Tom Cone Jr]

RE: While question?

Jeff,

One more thing, change this line:

tbl.index_primary_put("id_temps")   'this is key

to

tbl.index_primary_put("id_temp")   'this is key

cause I mistyped the name of the indextag...

sorry. -- tom

[Jeff Moses]

RE: While question?

hi tom
this is what i ended up doing but still can't figure out why the condition does not work. i read you next post about the sort order but don't think it makes a difference as the values that are loaded into the condition are vairiables. i'm going to look at you example now.
thanks loads!
jeff

[Jeff Moses]

RE: While question?

tom,
this is what i actually ended up using that seems to be getting the job done without using an embeded while.

WHILE .not. tmaster.fetch_eof()
IF vunit_count >= vnunits .AND. vday_count >= vmaster_days THEN
GOTO makeappointment
END IF

kind of an interesting problem, huh?
jeff

[Tom Cone Jr]

RE: While question?

Jeff, post the details of what you're doing (or better yet the database itself) so we can have a look. Maybe we can explain the results you're seeing.

-- tom

[Tom Cone Jr]

RE: While question?

Jeff,

Your snippet is missing an End While, and there's nothing within the loop to step through the records...

Yes, it's probably a bit perverse, but logic puzzles are intriguing to me...

-- tom

[Tom Cone Jr]

RE: While question?

Jeff,

It's often inadvisable to 'GOTO' a branch of your code by jumping out of the While loop altogether. This can result in spaghetti code sequences are the devil to debug. Many consider it better form to EXIT the loop, setting a flag on the way, then in the sequence following the loop check the flag... if it's set, then it's ok to GOTO the other branch.

-- tom

[csda1]

RE: While question?

Jeff,

Alpha's expression evaluator is not always the best at precedence of expression operators. Your expression of

[b]while vunit_count