my $mnuTerms = $root->BrowseEntry (
		-textvariable => \$cust->{'terms'},
		-state => 'readonly',
		-choices => \@items,
	);