Code: Select all
on openstack
lock screen
put filename of this stack into f
set itemdel to "/"
put "aperiodata.rev" into last item of f
open stack f
hide stack f -- keeps the stack open but hidden
put fld "ProductSpecs" of card "productSpecs" of stack "Aperiodata" into fld "productSpecs" of card "Product Specification" of stack "FFF - Aperio Version3"
put fld "blends" of card "blends" of stack "Aperiodata" into fld "specdata" of card "Compound Specification" of stack "FFF - Aperio Version3"
unlock screen
end openstack
on closestack
put fld "productSpecs" of card "Product Specification" into fld "ProductSpecs" of card "productSpecs" of stack "Aperiodata"
put fld "specdata" of card "Compound Specification" into fld "blends" of card "blends" of stack "Aperiodata"
save stack "Aperiodata"
close stack "Aperiodata"
end closestack