+my $change_title = $opt{'label'} || 'change';
+
+my $svcnum;
+my $change_id_input = '';
+my $pre = 'changepw';
+
+if ($opt{'svc_acct'}) {
+ my $svc_acct = $opt{'svc_acct'};
+ $change_id_input = '<INPUT TYPE="hidden" NAME="svcnum" VALUE="' . $svc_acct->svcnum . '">';
+ $pre .= $svc_acct->svcnum . '_';
+ $svcnum = $svc_acct->svcnum;
+}
+elsif ($opt{'contact_num'}) {
+ $change_id_input = '
+ <INPUT TYPE="hidden" NAME="contactnum" VALUE="' . $opt{'contact_num'} . '">
+ <INPUT TYPE="hidden" NAME="custnum" VALUE="' . $opt{'custnum'} . '">
+ ';
+ $pre .= $opt{'contact_num'} . '_';
+}
+
+if ($opt{'popup'}) {
+ $change_id_input .= '<INPUT TYPE="hidden" NAME="popup" VALUE="' . $opt{'popup'} . '">';
+}
+
+ my $error = $cgi->param($pre.'error');