Ziele Untersuchung
mit Columbo Integrität von
Datenbanken Interaktion und
Portierbarkeit Ergonomie der
Schnittstellen

Angebot Produkte Projekt Beratung

Mittel Analytik Modellierung Sprachen Algebra Logik Hardware Denken Kreativität

Zusammenhänge Gesellschaft Wirtschaft Branche Firma


products/sources/formale Sprachen/Cobol/Test-Suite/SQL M/ Datei vom 4.1.2008 mit Größe 754 B

Quelle flg011.mco Sprache: unbekannt

-- SQL Test Suite, V6.0, SQL Module flg011.mco
-- 59-byte ID
--
MODULE FLG011
LANGUAGE COBOL
AUTHORIZATION FLATER

PROCEDURE SUB1 SQLCODE SQLSTATE
    :UIDX CHAR(18);
      SELECT USER INTO :UIDX FROM HU.ECCO;

PROCEDURE SUB2 SQLCODE SQLSTATE;
      ROLLBACK WORK;

PROCEDURE SUB3 SQLCODE SQLSTATE;
      ALTER TABLE USIG
                    ADD(COL3 INTEGER, COL4 SMALLINT);

PROCEDURE SUB4 SQLCODE SQLSTATE;
      ROLLBACK WORK;

PROCEDURE SUB5 SQLCODE SQLSTATE;
      INSERT INTO HU.TESTREPORT
                      VALUES('0831','nogo','MCO');

PROCEDURE SUB6 SQLCODE SQLSTATE;
      INSERT INTO HU.TESTREPORT
                      VALUES('0831','pass','MCO');

PROCEDURE SUB7 SQLCODE SQLSTATE;
      COMMIT WORK;