one of the documented procedures in this installation of the ACS
What it does:
sets sample press coverage variables (sample_publication_name, etc.) in the stack frame of the caller
Defined in: /web/philip/tcl/press-defs.tcl

Source code:

    uplevel 1 { 
	set sample_publication_name      "Time" 
	set sample_publication_link      "" 
	set sample_publication_date      "January 1, 2100" 
	set sample_publication_date_desc "January issue" 
	set sample_article_title         "Time's Person of the Year" 
	set sample_article_link          "" 
	set sample_article_pages         "pp 50-52"
	set sample_abstract               "Welcome, Jeff Bezos, to TIME's Person of the Year
 	   club. As befits a new-era entrepreneur, at 35 you are
	   the fourth youngest individual ever, preceded by
	   25-year-old Charles Lindbergh in 1927; Queen
	   Elizabeth II, who made the list in 1952 at age 26; and
	   Martin Luther King Jr., who was 34 when he was
	   selected in 1963. A pioneer, royalty and a
	   revolutionary--noble company for the man who is,
	   unquestionably, king of cybercommerce."