From 4dc9e97ad999bb6ea4fe5171be988ee8e6c156dc Mon Sep 17 00:00:00 2001
From: einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Fri, 12 Sep 2008 23:36:59 +0000
Subject: Adding drop down box to set primary entity class for companies.

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@2323 4979c152-3d1c-0410-bac9-87ea11338e46
---
 UI/Contact/contact.html | 13 ++++++++++++-
 1 file changed, 12 insertions(+), 1 deletion(-)

(limited to 'UI')

diff --git a/UI/Contact/contact.html b/UI/Contact/contact.html
index 2ccd5491..3b69c902 100644
--- a/UI/Contact/contact.html
+++ b/UI/Contact/contact.html
@@ -166,7 +166,18 @@ problems with multi-word single-quoted constructs in PI tags. -CT  -->
 		name = "control_code"
 		value = control_code
 		size = "20"
-	} ?><?lsmb PROCESS button element_data = {
+	} ?>
+	<?lsmb IF !created_as_class;
+		created_as_class = entity_class;
+	END; # IF !created_as_class ?> 
+	<?lsmb PROCESS select element_data = {
+		name = "created_as_class"
+		options = entity_classes
+		default_values = [created_as_class]
+		text_attr = 'class'
+		value_attr = 'id'	
+	} ?>
+	<?lsmb PROCESS button element_data = {
 		text = text('Generate')
 		type = "submit"
 		name = "action"
-- 
cgit v1.2.3