[NEWSboard IBMi Forum]

Hybrid View

  1. 30-05-16, 06:34 #1
    BenderD
    BenderD is offline [professional_User]
    Registriert seit
    Mar 2002
    Beiträge
    5.365
    ... du dumpst doch nur das statement handle raus, da fehlt z.B. ein fetchrow-array(), google ist dein Freund, da hilft eine Suche mit Perl DBI eine Menge weiter, z. B. https://de.wikibooks.org/wiki/Perl-Programmierung:_DBI

    D*B
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/
    Mit Zitat antworten Mit Zitat antworten
  2. 30-05-16, 12:03 #2
    tommi_011
    tommi_011 is offline [User]
    Registriert seit
    May 2016
    Beiträge
    18
    Ich hab ein weiteres Script, aber auf die gleiche Tabelle mit den Regeln angepasst:

    Code:
    #!/usr/bin/perl -w
use CGI qw(param);
use DBI;
use DBD::DB2::Constants;
use DBD::DB2;

# Ein Perl-Test f}r die "Info - HTML"
# $ich = param("wer");

# Test der DB Anbindung mit Perl auf AS/400
  $dbh = DBI->connect("DBI:DB2:*LOCAL", "XXX", "XXX") or die "Ein Fehler: ".$dbh->err;
  $sql = "select * from LIBRKML.TABELLE";
  $sth = $dbh->prepare($sql) or die "Fehler: ".$sth->err;
  $sth->execute() or die "Fehler bei Ausf}hrung: ".$sth->err;

print <<ENDE_HEAD;
Content-type: text/html

<html>
<head><title>Datenbanktest</title></head>
<body>
<table border='1'>
<tr><th>Name</th> <th>Vorname</th></tr>
ENDE_HEAD


while(my ($spalte1, $spalte2, $spalte3) = $sth->fetchrow_array())
{
 print "<tr><td>".$spalte1."</td>\n";
 print "<td>".$spalte2."</td>\n";
 print "<td>".$spalte3."</td></tr>\n";
}

print "</table>\n";
print "</body>\n";
print "</html>";
    und es dennoch gleich im QSH auf der Maschine ausführen lassen, mit dem gleichbleibenden Ergebnis:

    Code:
    perl -w /web/db2.pl                                                                         
Subroutine bootstrap redefined at /usr/local/lib/perl5/5.00502/os400/DynaLoader.pm line 97. 
Content-type: text/html                                                                     
                                                                                            
<html>                                                                                      
<head><title>Datenbanktest</title></head>                                                   
<body>                                                                                      
<table border='1'>                                                                          
<tr><th>Name</th> <th>Vorname</th></tr>                                                     
<tr><td>1</td>                                                                              
Use of uninitialized value at /web/db2.pl line 30.                                          
<td></td>                                                                                   
Use of uninitialized value at /web/db2.pl line 31.                                          
<td></td></tr>                                                                              
</table>                                                                                    
</body>                                                                                     
</html>$
    Und so sieht die Tabelle aus (ja, ich hab auch CCSID 65535 und 500 schon probiert):

    Code:
                Daten        Feld  Puffer    Puffer        Feld     Spalte           
 Feld       Art         Länge   Länge  Position        Verwend. Überschrift      
 LFDN       GEPACK       3  0       2         1        Beide    LFDN             
   Nullwert zugelassen                                                           
 NAME       ZCHN           20      20         3        Beide    NAME             
   Nullwert zugelassen                                                           
   ID des codierten Zeichensatzes  . . . . . :     37                            
 VNAME      ZCHN           20      22        23        Beide    VNAME            
   Feld variabler Länge  -- Zugeordnete Länge:  Keine                            
   Nullwert zugelassen                                                           
   ID des codierten Zeichensatzes  . . . . . :     37
    Mit Zitat antworten Mit Zitat antworten
  3. 30-05-16, 12:33 #3
    Fuerchau's Avatar
    Fuerchau
    Fuerchau is offline [Content_Admin]
    Registriert seit
    Feb 2001
    Beiträge
    20.696
    Ich denke mal "use of uninitialized value at ..." ist der Fehler.
    Ggf. ist deine DBI-Version zu neu für deine V4R5-Version und verlangt Sachen, die noch nicht unterstützt werden. Hier musst du eine "Uraltversion" installieren, so aus den Jahren 1999/2000, die zum V4R5 kompatibel ist.
    Alles andere macht hier keinen Sinn, da DBI schon vom Grundsatz her scheitert.
    Das Problem ist hier, dass du ja DBI debuggen müsstest um den Fehler zu finden.
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de
    Mit Zitat antworten Mit Zitat antworten
  4. 30-05-16, 12:54 #4
    tommi_011
    tommi_011 is offline [User]
    Registriert seit
    May 2016
    Beiträge
    18
    Dann scheint es langsam traurige Gewissheit zu sein.
    Ich hab schon von CPAN die Altversion von 1999 herunter geladen und bereit gestellt.
    Es gibt da zwar noch unter Source einige Quellen, da schau ich mal ob ein anders oder älteres DBI dabei ist. Ansonsten muss ich nochmal den Googel zu befragen.
    Habt erst mall alle hier im Forum vielen Dank, für die Geduld und Hilfe! :-)
    Mit Zitat antworten Mit Zitat antworten
  5. 30-05-16, 12:58 #5
    Fuerchau's Avatar
    Fuerchau
    Fuerchau is offline [Content_Admin]
    Registriert seit
    Feb 2001
    Beiträge
    20.696
    Zum lernen empfehle ich da eher das hier:
    http://learn.perl.org/installing/windows.html
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de
    Mit Zitat antworten Mit Zitat antworten
  6. 31-05-16, 12:32 #6
    tommi_011
    tommi_011 is offline [User]
    Registriert seit
    May 2016
    Beiträge
    18
    Nachdem wir nun fleißig gesucht und versucht haben bin ich am Ende im Netz "fündig" geworden, was den Misserfolg bestätigt. Zimindest ist das V4R5 eher zu "neu" für die bis dahin angebotenen Perl Versionen.
    Aber gut, zumindest ist es Gewissheit, dass ich nicht "allein" bin/war und dieser Effekt auch auf amerikanischen Maschinen zu finden war:

    http://computer-programming-forum.co...24050a5656.htm
    Mit Zitat antworten Mit Zitat antworten
  7. 31-05-16, 13:35 #7
    KingofKning
    KingofKning is offline [professional_User]
    Registriert seit
    Aug 2006
    Beiträge
    2.114
    Was hindert dich auf V4R4 zu gehen?

    GG
    Mit Zitat antworten Mit Zitat antworten
  8. 31-05-16, 15:19 #8
    Fuerchau's Avatar
    Fuerchau
    Fuerchau is offline [Content_Admin]
    Registriert seit
    Feb 2001
    Beiträge
    20.696
    Also bisher war die AS immer abwärtskompatibel. Warum also nicht auch da?
    Dienstleistungen? Die gibt es hier: http://www.fuerchau.de
    Das Excel-AddIn: https://www.ftsolutions.de/index.php/downloads
    BI? Da war doch noch was: http://www.ftsolutions.de
    Mit Zitat antworten Mit Zitat antworten
  9. 31-05-16, 19:43 #9
    tommi_011
    tommi_011 is offline [User]
    Registriert seit
    May 2016
    Beiträge
    18
    Sollte man eigentlich meinen. Aber kann es nicht doch sein, dass im V4R5 andere Sicherheitsregeln o.Ä. vorhanden sind?
    Prozess- /Jobsteuerungen, die restriktiver prüfen als im R4?
    Mit Zitat antworten Mit Zitat antworten
« Vorheriger Thema | Nächster Thema »

Similar Threads

  1. Lizenzen OS/400 V4R5M0 Prozessorgruppe P05
    By Frank Hildebrandt in forum NEWSboard Server & Hardware Markt
    Antworten: 2
    Letzter Beitrag: 02-05-03, 16:32
  2. MSAccess und V4R5M0 (CA Express)
    By Matthias.Hayn in forum IBM i Hauptforum
    Antworten: 3
    Letzter Beitrag: 07-03-02, 14:17
  3. MSAccess und V4R5M0 (CA Express)
    By Matthias.Hayn in forum NEWSboard Windows
    Antworten: 1
    Letzter Beitrag: 07-03-02, 13:13
  4. releasewechsel von v3r6m0 auf v4r5m0
    By delphix in forum IBM i Hauptforum
    Antworten: 3
    Letzter Beitrag: 18-02-02, 13:48
  5. Trigger 5.1, TGTRLS(V4R5M0)
    By Robi in forum IBM i Hauptforum
    Antworten: 2
    Letzter Beitrag: 28-01-02, 09:35

Tags for this Thread

Bookmarks

Berechtigungen

  • Neue Themen erstellen: Nein
  • Themen beantworten: Nein
  • You may not post attachments
  • You may not edit your posts
  •  

Foren-Regeln