SQL :: Preproc. SQL :: preproc è un modulo perl per incorporare SQL nei tuoi perl (preprogessori ALA SQL).
Scarica ora

SQL :: Preproc. Classifica e riepilogo

SQL :: Preproc. Tag

Sql. modulo Perl incorporare Incorpora SQL. Preprocessori SQL.

SQL :: Preproc. Descrizione

SQL :: preproc è un Perl modulo da incorporare SQL nel vostro Perl (ALA preprocessori SQL). SQL :: preproc è un Perl modulo da incorporare SQL in Perl (ala SQL preprocessori) .SYNOPSIS uso di SQL :: preproc sottoclasse => 'Grafico', emettere => 1, keepsql => 1, la sintassi => , pponly => 1, rilassarsi => 1, alias => 1, debug => 1; use DBI; uso DBI qw (: sql_types); l'uso di SQL :: :: preproc ExceptContainer; uso DBIx :: Grafico; ... un certo codice ... mia ($ host, $ user, $ passwd) = @ARGV; DECLARE CONTESTO $ sqlpp_ctxt; Connettersi a "Teradata: $ host" USER $ userid identificato da $ passwd AS MyConn CON tdat_mode => ANSI; i miei $ more_rows; QUANDO NOTFOUND {$ more_rows = undef} OGNI VOLTA SQLERROR {my ($ ctxt, $ err, $ Stato, $ errmsg) = @_; die $ errmsg; } DECLARE CURSOR MyCursor AS SELECT * FROM tabella FOR UPDATE; MyCursor APERTO; la mia ($ col1, col2 $, $ col3, $ col4); while ($ more_rows) {FETCH MyCursor IN: $ col1,: $ col2,: $ col3,: $ col4; if ($ col1> $ col4) {AGGIORNAMENTO mytable SET col4 = col4 + 100 WHERE CURRENT OF MyCursor; }} MyCursor CLOSE; # # Fare un caricamento di massa tramite matrice vincolante # mia @ col1 = (); il mio @ col2 = (); il mio @ Col3 = (); # # Caricare alcuni dati nelle matrici, quindi inviarlo ai valori SomeTable DBMS # EXEC SQL INSERT INTO (: @ col1,: @ col2,: @ col3); # # Ora creare un grafico, i risultati dumping @_ # SELECT * FROM tabella LINEGRAPH Ritorno (*), IMAGEMAP DOVE WIDTH = 500 HEIGHT = 500 AND E FORMATO = 'PNG' E LOGO = 'myimage.png' E X_AXIS =' data' E Y_AXIS = 'Prezzo della' E mapname = 'stockmap' E FIRMA = 'GOWI Systems, Inc.' E SHOWPOINTS = 1 e il punto = 'opencircle'; aperta (OUTF, '> mychart.png') || Die $!; OUTF binmode; stampare OUTF, $ _ ; chiudi OUTF; aperta (OUTF, '> mychart.map') || Die $!; stampare OUTF, $ _ ; chiudi OUTF; DISCONNECT MyConn; Requisiti: · Perl 5.8+ (preferibilmente 5.8.5+) · DBI 1.42 · Filter :: Simple 0,78 · Text :: Balanced 1.95 · DBIx :: Grafico 0,01 (solo quando sottoclasse => 'Grafico') · DBI driver per Target Requisiti di sistema di database: · Perl 5.8 (preferibilmente 5.8.5) · DBI 1.42 · Filter :: Simple 0,78 · Text :: Balanced 1.95 · DBIx :: Grafico 0,01 (solo quando sottoclasse => 'Grafico') · DBI driver per il sistema di database di destinazione

SQL :: Preproc. Software correlato