[NEWSboard IBMi Forum]
  1. #1
    Registriert seit
    Jun 2001
    Beiträge
    1.975

    Meldung von strqmqry übergehen

    Hi *all

    Ich habe eine SQL-beschriebene Datei, die ich als Kopie, ohne ein bestimmtes Feld benötige.
    daher mache ich ein CRTDUPOBJ ohne Daten und anschl. ein
    PHP-Code:
     CHGVAR     VAR(&S01VALUE('ALTER TABLE qtemp/MyFile + 
                  DROP COLUMN MyField CASCADE'
    )                 
     
    STRQMQRY   QMQRY(S01SETVAR((S01 &S01)) 
    Das fliegt mir nun mit der Meldung: "Änderung des Feldes MyField kann zum Datenverlust führen" um die Ohren

    Die Autoantwort darf ich nicht ändern.
    Gibt's noch ne Möglichkeit das Feld zu entfernen bzw diese Meldung zu ignorieren?

    Danke
    Robi
    Das Notwendige steht über dem technisch machbaren.
    (klingt komisch, funktioniert aber!)

  2. #2
    Registriert seit
    Feb 2001
    Beiträge
    20.236
    Ggf. hilft an dieser Stelle ein CHGJOB mit Änderungen der INQMSG auf *DFT.
    Hinterher aber wieder zurück ändern.

    Besser ist hier aber ein eigenes QMQRY zu erstellen, dass einen
    create table qtemp/mytable as
    (select f1, f2, .... from myorigtable)
    halt ohne dein Feld macht.

    CRTDUPOBJ kann auch schon mal an Berechtigungen scheitern.
    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

  3. #3
    Registriert seit
    Jun 2001
    Beiträge
    1.975
    chgjob versuch ich

    crtdupobj ist hier 'der Standard' da gibt es kein Berechtigungsproblem.
    Für ein eigenes 'create table' bin ich zu faul!
    (und, was viel schlimmer ist, wenn sich die Datei ändert MUß sich auch meine Datei ändern)
    Das klappt hier eher selten, ... !!
    Robi
    Das Notwendige steht über dem technisch machbaren.
    (klingt komisch, funktioniert aber!)

  4. #4
    Registriert seit
    Mar 2002
    Beiträge
    5.287
    ... bei RUNSQLSTM kann man den Error level einstellen
    AS400 Freeware
    http://www.bender-dv.de
    Mit embedded SQL in RPG auf Datenbanken von ADABAS bis XBASE zugreifen
    http://sourceforge.net/projects/appserver4rpg/

  5. #5
    Registriert seit
    Jun 2001
    Beiträge
    1.975
    Ja, das passt,
    danke Dieter!

    Gruß
    Robi

  6. #6
    Registriert seit
    Nov 2003
    Beiträge
    2.306
    Warum muß das Feld überhaupt raus? Vielleicht genügt es ja, den Inhalt des Feldes zu löschen?

  7. #7
    Registriert seit
    Jun 2001
    Beiträge
    1.975
    Warum muß das Feld überhaupt raus? Vielleicht genügt es ja, den Inhalt des Feldes zu löschen?
    nö, reicht nicht!
    War vom QMQRY 'besessen', da im gesammtablauf einiges damit gemacht wird.
    Das ist so praktisch mit den Variablen. Aber für den drop geht ein runsqlstm auch
    Robi

  8. #8
    Registriert seit
    Feb 2001
    Beiträge
    20.236
    Wenn du schon RUNSQLSTM bemühst, kannst du auch gleich beide Befehle da reinschreiben und du brauchst den QMQRY gar nicht:

    create table qtemp/mytable as (select * from mysourcetable);
    alter table ...
    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

  9. #9
    Registriert seit
    Jun 2001
    Beiträge
    1.975
    ... und du brauchst den QMQRY gar nicht:

    ...da im gesammtablauf einiges damit gemacht wird.
    Das ist so praktisch mit den Variablen.
    Ok, den crtduobj könnt ich ersetzen aber wie schon gesagt ... das ist hier Standard!
    Robi

Berechtigungen

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