Spracherkennung für: .mco vermutete Sprache: SQL {SQL[72] Scala[89] Pl1[101]} [Methode: Schwerpunktbildung, einfache Gewichte, sechs Dimensionen]
-- SQL Test Suite, V6.0, SQL Module sdl001.mco
-- 59-byte ID
--
MODULE SDL001
LANGUAGE COBOL
AUTHORIZATION HU
PROCEDURE SUB1 SQLCODE SQLSTATE
:UIDX CHAR(18);
SELECT USER INTO :UIDX FROM HU.ECCO;
PROCEDURE SUB2 SQLCODE SQLSTATE;
INSERT INTO WHICH_SCHEMA1 VALUES
('Use of SCHEMA1.STD is required to pass this test. ')
;
PROCEDURE SUB3 SQLCODE SQLSTATE
:CH50 CHAR(50);
SELECT C1
INTO :CH50
FROM WHICH_SCHEMA1;
PROCEDURE SUB4 SQLCODE SQLSTATE;
ROLLBACK WORK;
PROCEDURE SUB5 SQLCODE SQLSTATE;
INSERT INTO HU.TESTREPORT
VALUES('0137','pass','MCO');
PROCEDURE SUB6 SQLCODE SQLSTATE;
INSERT INTO HU.TESTREPORT
VALUES('0137','fail','MCO');
PROCEDURE SUB7 SQLCODE SQLSTATE;
COMMIT WORK;
[ Dauer der Verarbeitung: 0.54 Sekunden
]