Spracherkennung für: .mco vermutete Sprache: Scala {Scala[92] Python[93] Pl1[101]} [Methode: Schwerpunktbildung, einfache Gewichte, sechs Dimensionen]
-- SQL Test Suite, V6.0, SQL Module dml172.mco
-- 59-byte ID
--
MODULE DML172
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);
CREATE TABLE T0884 (
C1 CHAR (4) CHARACTER SET ASCII_FULL,
C2 CHAR (4) CHARACTER SET SQL_TEXT);
PROCEDURE SUB4 (SQLCODE, SQLSTATE);
COMMIT WORK;
PROCEDURE SUB5 (SQLCODE, SQLSTATE,
:HLC1 CHAR(4) CHARACTER SET ASCII_FULL);
INSERT INTO T0884 VALUES (:HLC1,
_SQL_TEXT 'This');
PROCEDURE SUB6 (SQLCODE, SQLSTATE,
:INT1 NUMERIC (9));
SELECT COUNT(*) INTO :INT1
FROM T0884
WHERE C1 = _ASCII_FULL '^#|~'
AND C2 = _SQL_TEXT 'This';
PROCEDURE SUB7 (SQLCODE, SQLSTATE);
COMMIT WORK;
PROCEDURE SUB8 (SQLCODE, SQLSTATE);
DROP TABLE T0884 CASCADE;
PROCEDURE SUB9 (SQLCODE, SQLSTATE);
COMMIT WORK;
PROCEDURE SUB10 (SQLCODE, SQLSTATE);
INSERT INTO HU.TESTREPORT
VALUES('0884','pass','MCO');
PROCEDURE SUB11 (SQLCODE, SQLSTATE);
INSERT INTO HU.TESTREPORT
VALUES('0884','fail','MCO');
PROCEDURE SUB12 (SQLCODE, SQLSTATE);
COMMIT WORK;
[ Dauer der Verarbeitung: 0.115 Sekunden
]