the only thing I did was assign values to all those
date vars and such that he accesses, and values into
the associative array.. no actual changes to his code...
I was just saying that his code works.. but sure...
I mean.. if it helps.. whatever.. :)
$sc{1}="bob";
$sc{'eatit200'}="jane";
$sc{'testCINDY'}="cindy";
($SMONTH,$SDAY,$SYEAR,$SHOUR,$SMINUTE,$EDAY,$EYEAR,$EHOUR,$EMINUTE)=(1
+,2,3,4,5,6,7,8,9);
foreach my $sc_id (keys %sc) {
# Oracle wil not let me put in that '0' at the start; all call_id's
+will start with '7'
my $call_id = sprintf "7%02d%02d%02d%02d%02d%07d%02d%02d%02d%02d%02d
+",$SMONTH,$SDAY,$SYEAR,$SHOUR,$SMINUTE,$sc_id,$EDA
my $status = "scheduling";
my $temp_record_statement = qq!
INSERT INTO SC_APPT
(CONTACT, CALL_ID, SC_ID, CONT_PHN, AP_START, AP_END, STATUS, COMPAN
+Y,
TRANS_ID, APPT_TYPE, REP_EMAIL, ADD_ST, ADD_STATE, ADD_CITY, ADD_ZIP
+)
VALUES
('system_reserve', $call_id, $sc_id, 8003069329, '$start_time', '$en
+d_time', '$status', 'Quest Software',
$trans_id, 'Internal', 'Joanna', 'placeholder', 'NJ', 'Montclair', 9
+99999999) !;
print $temp_record_statement, "\n";
print $sc_id, "\n";
#$dbh->do("$temp_record_statement") || dienice("320 Couldn't execute
+ statement: $temp_record_statement $sc_id" . $sth-
}
I hope that helps... like I said.. I didn't really
change anything.. it just worked to start with.. I
was just pointing out that his problem was something
different that what he was describing...
--
bliz
|