script copying to clipboard problems

[barry685]

Have a set, parent is Inv_hedr than there are multiple 1 to many links back to the Clients table. The link that I can't get the script to work has the alias Bill_to.
Getting the following error message:inv_error.png[ATTACH=CONFIG[30576[/ATTACH]


Using this code, originally from Alpha sports. I have modified it and do have it working in other forms. Some how I am not addressing the right object or field names.

'Date Created: 20-Jan-2012 11:33:44 AM
'Last Updated: 20-Jan-2012 11:48:12 AM
'Created By  : Barry
'Updated By  : Barry
t=table.current()
dim address as c
crlf = chr(13)+chr(10)
address = trim(t.firstname)+ " "+trim(t.lastname)+crlf
address = address + t.address1+crlf
IF .not. t.address2.is_blank()
	address = address+t.address2+crlf
END IF
address = address + trim(t.city) +", "+trim(t.state)+ " " +t.zipcode
:clipboard.set_data(address)

[Stan Mathews]

Re: script copying to clipboard problems

table.current() refers to the parent table of a set when used in a set context.

See this thread for a discussion of referring to child tables.

[barry685]

Re: script copying to clipboard problems

Stan,

I am also using the same code with the same form with the ship_to alias (see the ship to image in the above post) without any problems.

t=table.current()
dim address as c
crlf = chr(13)+chr(10)
address = trim(t.ship_first)+ " "+trim(t.ship_last)+crlf
address = address + t.ship_line1+crlf
IF .not. t.ship_line2.is_blank()
	address = address+t.ship_line2+crlf
END IF
address = address + trim(t.ship_city) +", "+trim(t.ship_state)+ " " +t.ship_zip
:clipboard.set_data(address)

If I change the slot number to 2 or 3 (not sure how to determine the slot number) I get an error message on the First and last name fields also which I previously did not get.
inv_set.png

[Stan Mathews]

Re: script copying to clipboard problems

Not sure what is unclear in the documentation about slot positions.

[barry685]

Re: script copying to clipboard problems

That fixed it.
Still don't understand why the ship_to, clipboard code works without a slot number.

[Stan Mathews]

Re: script copying to clipboard problems

For edification, yours and mine, try the ship to code with the proper slot number and let us know what happens.

[barry685]

Re: script copying to clipboard problems

No good, it stoped woking when I placed #5 into the tablecurrent expression.
inv_error_slot.png

[barry685]

Re: script copying to clipboard problems

I am now trying to use this code on another form With the data that is in slot 3 and it works. However I have 1 field "Ses_id" that is at the parent level. Since the script starts with table t=table.current(3) how do I code the field from the parent?

[Stan Mathews]

Re: script copying to clipboard problems

Use another pointer.

t1=table.current(1)

[Tom Cone Jr]

Re: script copying to clipboard problems

in your script "t" is simply a pointer to one of the tables supporting your form.

Your script is not limited to a single pointer. So, you could get a pointer to the parent table like this:

t_parent = table.current()

and then reference the desired field like this

t_parent.ses_id


-- tom

[Mike Wilson]

Re: script copying to clipboard problems

Wouldn't table.get() completely solve this problem?

[barry685]

Re: script copying to clipboard problems

Got it.
Thanks

[Tom Cone Jr]

Re: script copying to clipboard problems

Barry, for the benefit of others who visit this thread in the future please take a few minutes and tell us what "it" means. While its nice to know your problem has been solved, being able to see the solution helps the message board become a knowledge base for others.

[barry685]

Re: script copying to clipboard problems

Followed the above recommendations, and added another table current pointer.

t1=table.current()
t=table.current(3)
dim address as c
crlf = chr(13)+chr(10)
address = alltrim(str(t1.ses_id,7,0))+crlf
address = address + trim(t.firstname)+ " "+alltrim(t.lastname)+crlf
address = address + t.address1+crlf
IF .not. t.address2.is_blank()
	address = address+t.address2+crlf
END IF
address = address + trim(t.city) +", "+trim(t.state)+ " " +t.zipcode
:clipboard.set_data(address)

[Mike Wilson]

Re: script copying to clipboard problems

Barry,
Why is there a chr(13) in your crlf variable? Why not just use crlf()?

It has been recommended on this board that table.get() is a better method and a separate pointer for each table that makes sense to you be used. When you are dealing with 2-3 tables in a script, using a convention that makes it easier for you to remember what the pointer-table assignments are makes it easier with fewer mistakes. It has been suggested recently on this board that a three letter pointer convention should be a minimum within complex scripts. I don't know why everyone uses tbl. as a table pointer. I've been using a convention of using table.get() and for the pointer "t" and the first two letters of the table name if the script has more than one table pointer. Yes, tables can have similar names and this breaks down, so then it is another letter in the name that generates identification, but that's rare. It makes it alot easier than trying to remember "Is this table I'm dealing with in this line of code table 1 vs table 2" .... how did I assign those?... etc.