Frage : Eine Satzgliederungsstörung

Für den angebrachten Code möchte ich analysieren angebracht übertreffe Akte, nehme ein Wert src_id von der übertreffenakte und lösche aus einem database.

is dieses Anweisung allright?
my $worksheet1 = $workbook->Worksheet („WF“) ;
Somehow, das ich glaube, dass es not.

getting diese Störung ist--
Can Hintereinanderschaltung nicht ändern (.) oder Schnur in der Skalaranweisung an DeletePrevPosting.pl, nahe "" $src_id“) „
delete Argument ist nicht ein DURCHEINANDER oder EIN Feldelement oder eine Scheibe an DeletePrevPosting.pl.
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:
6:
37:
38:
39:
40:
41:
42:
43:
#! /usr/bin/perl5.10 - w

Warnungen verwenden;
strenges verwenden;
Gebrauch Verteilungsbogen:: ParseExcel;
Gebrauch IO:: Skalar;
Gebrauch Daten:: Kipper;
DBI verwenden;
Gebrauch DBD:: MSDB2;

mein „wf_OTC_Taxlots_Open“ $curr_etl =;

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



für $worksheet1 ($workbook->worksheets ()) {
mein ($row_min, $row_max) = $worksheet1->row_range ();
mein ($col_min, $col_max) = $worksheet1->col_range ();

 für mein $row ($row_min. $row_max) {##First for##
 für mein $col ($col_min. $col_max) {##Second for##
   mein $cell = $worksheet1->get_cell ($row, $col);
   wenn ($col==0 && $row! && =0 ($worksheet1->get_cell ($row, 0) - >value eq „$curr_etl“))  {
       $col++;
       mein $src_id = $worksheet1->get_cell ($row, $col) - >value;
       Druck $src_id;


mein $dbh = DBI->connect („dbi: MSDB2: NQ200001“, '', '', {„RaiseError“ => 1}) oder
          sterben „kann nicht an Datenbank anschließen: $DBI:: errstr“;

$dbh->do (Löschung von pfnd.funding_journal_vw FJ, wo fj.SRC_ID = „$src_id“));
$dbh->disconnect;
$workbook->close ();
     }
   }
 }
}
Attachments:

Antwort : Eine Satzgliederungsstörung

Das verursacht durch $src_id, das innen ausdrücklich ohne Interpolation überschritten, weil der sql in den einzelnen Anführungsstrichen eingeschlossen.  Wenn Sie bis ein von below ändern, sollte es arbeiten (oder eine andere Störung mindestens geben).

$dbh->do („Löschung von pfnd.funding_journal_vw FJ wo fj.SRC_ID = \ „$src_id \ "");
$dbh->do („Löschung von pfnd.funding_journal_vw FJ wo fj.SRC_ID = „$src_id“ ");
Weitere Lösungen  
 
programming4us programming4us