Vraag : Een het ontleden fout

Voor de code in bijlage, wil ik in bijlage ontleden uitblink dossier, neem een waarde src_id van uitblink dossier en schrap van een database.

is deze taak allright?
my $worksheet1 = $workbook->Worksheet („WF“) ;
Somehow die ik het is not.

getting deze fout heb gevonden--
Can om aaneenschakeling (.) niet te wijzigen of het koord in scalaire taak bij DeletePrevPosting.pl, dichtbij argument "" $src_id“) „
delete bedraagt een een KNOEIBOEL of element of de geen plak van de SERIE DeletePrevPosting.pl.
" codeBody " 
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
28:
29:
30:
31:
32:
33:
34:
35:
36:
37:
38:
39:
40:
41:
42:
43:

#! /usr/bin/perl5.10 - w

gebruiks waarschuwingen;
strikt gebruik;
gebruiks Spreadsheet:: ParseExcel;
gebruik IO:: Scalair;
gebruiks Gegevens:: Kipwagen;
gebruik DBI;
gebruik DBD:: MSDB2;

mijn $curr_etl = „wf_OTC_Taxlots_Open“;

mijn $parser = Spreadsheet:: ParseExcel->new ();
mijn $workbook = $parser->parse („/ms/user/s/sayantag/Source.xls“);
mijn $worksheet1 = $workbook->Worksheet („WF“);
#my $worksheet2 = $workbook->Worksheet („Calc“);
druk $worksheet1;



voor $worksheet1 ($workbook->worksheets ()) {
mijn ($row_min, $row_max) = $worksheet1->row_range ();
mijn ($col_min, $col_max) = $worksheet1->col_range ();

 voor mijn $row ($row_min. $row_max) {##First for##
 voor mijn $col ($col_min. $col_max) {##Second for##
   mijn $cell = $worksheet1->get_cell ($row, $col);
   als ($col==0 && $row! =0 && ($worksheet1->get_cell ($row, 0) - >value eq „$curr_etl“))  {
       $col++;
       mijn $src_id = $worksheet1->get_cell ($row, $col) - >value;
       druk $src_id;


mijn $dbh = DBI->connect („dbi: MSDB2: NQ200001“, '', '', {„RaiseError“ => 1}) of
          de matrijs „kan niet met gegevensbestand verbinden: $DBI:: errstr“;

$dbh->do (schrapping van pfnd.funding_journal_vw FJ waar fj.SRC_ID = „$src_id“));
$dbh->disconnect;
$workbook->close ();
     }
   }
 }
}
Attachments:
van
Source.xls (13 KB) Attached uitblinkt file

Antwoord : Een het ontleden fout

Dat wordt veroorzaakt door $src_id die binnen uitdrukkelijk zonder interpolatie worden overgegaan omdat sql in enige citaten ingesloten is.  Als u in één van onderstaand verandert, zou het moeten werken (of minstens een verschillende fout geven).

$dbh->do („schrapping van pfnd.funding_journal_vw FJ waar fj.SRC_ID = \ „$src_id \ "");
$dbh->do („schrapping van pfnd.funding_journal_vw FJ waar fj.SRC_ID = „$src_id““);
Andere oplossingen  
 
programming4us programming4us