Finding Last Data

[lkatz1]

Is There anyway to find the last field that is not blank & copy that info to current record or evaluate it
Ex:
Row 10 field 4, shall check if Row 9 field 4 has data or is blank,if is blank go to Row 8 field 4,if is blank go to Row 7 field 4,if is blank go to Row 6 field 4,and copy data to current record?
Thank You

[Stan Mathews]

Re: Finding Last Data

Yes.

[lkatz1]

Re: Finding Last Data

How?
Please explain
Thank You

[Stan Mathews]

Re: Finding Last Data

I need to know the table name, the field name and the type (character, numeric, date, ?). Also, when do you want to do this? When the record is saved with the field blank? When you push a button? Something else?

[lkatz1]

Re: Finding Last Data

table name brooklyall
field name field_2
type character
run a update

[Stan Mathews]

Re: Finding Last Data

When you run an update there is no currrent record. This script will find the last non blank field_2, get the contents, and put that value in all the remaining records' field_2. It assumes field_2 is populated in at least the first record.

tbl = table.open("brooklyall")
tbl.order("recno()")
tbl.fetch_last()
if alltrim(tbl.field_2) = ""
while alltrim(tbl.field_2) = "" .and. (.not. tbl.bof())
	tbl.fetch_prev()
end while
vfield_2 = tbl.field_2
tbl.fetch_next()
while .not. tbl.fetch_eof()
	tbl.change_begin()
	tbl.tbl.field_2 = field_2
	tbl.change_end(.T.)
	tbl.fetch_next()
end while
end if
tbl.close()

If you only want the value copied to the last record in record number order, we can do that instead with a slight modification.

[Stan Mathews]

Re: Finding Last Data

Inquiring minds want to know. Were you able to use this to do what you wanted?

[lkatz1]

Re: Finding Last Data

We are plain running the code editor comes up as field not found

[Tom Cone Jr]

Re: Finding Last Data

David, did you adapt Stan's example to fit your table and fieldname? Your code not shown.

[Stan Mathews]

Re: Finding Last Data

My bad. I was copying and pasting the table and field name he provided and goofed it up. I think it should be

tbl = table.open("brooklyall")
tbl.order("recno()")
tbl.fetch_last()
if alltrim(tbl.field_2) = ""
while alltrim(tbl.field_2) = "" .and. (.not. tbl.bof())
	tbl.fetch_prev()
end while
vfield_2 = tbl.field_2
tbl.fetch_next()
while .not. tbl.fetch_eof()
	tbl.change_begin()
	[COLOR="#FF0000"]tbl.field_2 = vfield_2[/COLOR]
	tbl.change_end(.T.)
	tbl.fetch_next()
end while
end if
tbl.close()

[lkatz1]

Re: Finding Last Data

Don't see it doing anything

[MikeC]

Re: Finding Last Data

coincidentally neither do we!

[Stan Mathews]

Re: Finding Last Data

David,

My script is designed to be run from a button or from the code tab. It opens the brooklyall table, puts it in record number order. The last record in the table is found and the value for field_2 is checked for being blank. If that field is blank in the last record the script backs up to the first record found where the field_2 is not blank. The non blank value in field_2 is copied to a variable.

The script moves to the next record which by definition must have a blank field_2. The vfield_2 variable value is put into field_2 in that record, and so on to the end of the table.

If that is not what you asked to have done you'll have to be more specific. When posting to this message board you are not charged by the letter or word. This is not the same as placing a classified ad in a newspaper. Spend a little time and say what you mean.

[lkatz1]

Re: Finding Last Data

It only works on the last records it doesn't return up till 1st record in database
Thank You

David,

My script is designed to be run from a button or from the code tab. It opens the brooklyall table, puts it in record number order. The last record in the table is found and the value for field_2 is checked for being blank. If that field is blank in the last record the script backs up to the first record found where the field_2 is not blank. The non blank value in field_2 is copied to a variable.

The script moves to the next record which by definition must have a blank field_2. The vfield_2 variable value is put into field_2 in that record, and so on to the end of the table.

If that is not what you asked to have done you'll have to be more specific. When posting to this message board you are not charged by the letter or word. This is not the same as placing a classified ad in a newspaper. Spend a little time and say what you mean.

[Tom Cone Jr]

Re: Finding Last Data

David, if writing is difficult for you, why not create a JING screencast and paste the link here, so we can see what you're seeing?

Tip: Don't use the word "it" in your posts. Too vague. Ambiguous. Cannot meaning decipher.

(This is actually good advice for everyone posting here).