SQL :: PREPROC

SQL :: PREPROC is een PERL-module om SQL in uw PERL (ALA SQL PreProcessors) in te sluiten.
Download nu

SQL :: PREPROC Rangschikking & Samenvatting

Advertentie

  • Rating:
  • Vergunning:
  • Perl Artistic License
  • Prijs:
  • FREE
  • Naam uitgever:
  • Dean Arnold
  • Uitgever website:
  • http://search.cpan.org/~darnold/

SQL :: PREPROC Tags


SQL :: PREPROC Beschrijving

SQL :: PREPROC is een PERL-module om SQL in uw PERL (ALA SQL PreProcessors) in te sluiten. SQL :: PREPROC is een PERL-module om SQL in uw PERL (ALA SQL PreProcessors) te insluiten. Synopsis Gebruik SQL :: PREPROC SUBCLASS => 'Diagram', EMIT => 1, Keepsql => 1, Syntaxis => , Pponly => 1, Relax => 1, alias => 1, debug => 1; gebruik dbi; Gebruik DBI QW (: SQL_TYPES); Gebruik SQL :: PREPROC :: Axceptcontainer; Gebruik DBIX :: Grafiek; ... enige code ... mijn ($ host, $ gebruiker, $ passwd) = @argv; Verklaren context $ sqlpp_ctxt; Maak verbinding met "Teradata: $ Host" User $ Userid geïdentificeerd door $ PASSWD als MyConn met TDAT_MODE => ANSI; mijn $ more_rows; Wanneer NotFound {$ more_rows = undef} wanneer SQLError {My ($ CTXT, $ ERF, $ State, $ ERMMSG) = @_; DIE $ ERMMSG; } Verklaar curseur Mycursor als Select * van MyTable voor update; Open mycursor; mijn ($ col1, $ col2, $ col3, $ col4); Terwijl ($ more_rows) {halen MyCursor in: $ COL1 ,: $ COL2,: $ COL3 ,: $ COL4; if ($ col1> $ col4) {update mytable set col4 = col4 + 100 waar stroom van mycursor; }} Sluit MyCursor; # # Doe een bulkload via array binding # mijn @ col1 = (); mijn @ col2 = (); mijn @ col3 = (); # # Laad enkele gegevens in de arrays en verzend het vervolgens naar de DBMS # EXEC SQL-inzetstuk in in de som van de waarden (: @ col1,: @ col2,: @ col3); # # Maak nu een diagram, dumpingresultaten naar @_ # selecteren * van mytable returning linegraph (*), imagemap waarbij breedte = 500 en hoogte = 500 en indeling = 'png' en logo = 'myimage.png' en x_axis = ' Datum 'en y_axis =' Voorraad prijs 'en mapname =' stockmap 'en signature =' Gowi Systems, Inc. ' En showpoints = 1 en punt = 'opencircle'; open (Outf, '> mychart.png') || Die $!; Binmode Outf; Print Outf, $ _ ; sluit uit; open (Outf, '> mychnart.map') || Die $!; Print Outf, $ _ ; sluit uit; Ontkoppel MyConn; Vereisten: · PERL 5.8+ (bij voorkeur 5.8.5+) · DBI 1.42 · Filter :: Eenvoudig 0.78 · Tekst :: Balanced 1,95 · DBIX :: Grafiek 0.01 (alleen wanneer subklasse => 'grafiek') · DBI-stuurprogramma Voor doeldatabase-systeemvereisten: · PERL 5.8 (bij voorkeur 5.8.5) · DBI 1.42 · Filter :: Simple 0.78 · Tekst: Balanced 1,95 · DBIX :: CHART 0.01 (alleen wanneer subklasse => 'grafiek') · DBI-stuurprogramma voor doeldatabasesysteem


SQL :: PREPROC Gerelateerde software