[freeside-commits] freeside/FS/FS/part_export domreg_opensrs.pm, 1.13.2.1, 1.13.2.2

[Erik Levinson]

Update of /home/cvs/cvsroot/freeside/FS/FS/part_export
In directory wavetail.420.am:/tmp/cvs-serv6936/FS/FS/part_export

Modified Files:
      Tag: FREESIDE_2_1_BRANCH
	domreg_opensrs.pm 
Log Message:
Add experimental OpenSRS export changes, and svc_domain UI changes for .au registrations

Index: domreg_opensrs.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/FS/FS/part_export/domreg_opensrs.pm,v
retrieving revision 1.13.2.1
retrieving revision 1.13.2.2
diff -u -w -d -r1.13.2.1 -r1.13.2.2
--- domreg_opensrs.pm	16 Jan 2011 06:45:50 -0000	1.13.2.1
+++ domreg_opensrs.pm	19 Jan 2011 21:50:05 -0000	1.13.2.2
@@ -73,6 +73,9 @@
                       size => scalar(@tldlist),
                       options => [ @tldlist ],
 		      default => 'com net org' },
+  'auoptions'    => { label => 'Enable AU-specific registration fields', 
+		      type => 'checkbox'
+		    },
 ;
 
 %info = (
@@ -396,6 +399,11 @@
 
   my $c = gen_contact_info($cust_main);
 
+  if ( $svc_domain->domain =~ /\.au$/ ) {
+	$c->{'registrant_name'} = $svc_domain->au_registrant_name;
+	$c->{'eligibility_type'} = $svc_domain->au_eligibility_type;
+  }
+
   $err = validate_contact_info($c);
   return $err if $err;