Spracherkennung für: .mco vermutete Sprache: Lex {Lex[81] Fortran[92] CS[110]} [Methode: Schwerpunktbildung, einfache Gewichte, sechs Dimensionen]
-- SQL Test Suite, V6.0, SQL Module dml039.mco
-- 59-byte ID
MODULE DML039
LANGUAGE COBOL
AUTHORIZATION HU
PROCEDURE AUTHCK SQLCODE
:UIDX CHAR(18);
SELECT USER INTO :UIDX FROM HU.ECCO;
PROCEDURE SUB1 SQLCODE;
INSERT INTO STAFF
VALUES('E7', 'yanping',26,'China');
PROCEDURE SUB2 SQLCODE;
INSERT INTO STAFF
VALUES('E8','YANPING',30,'NIST');
PROCEDURE SUB3 SQLCODE
:CITY1 CHAR(15);
SELECT CITY
INTO :CITY1
FROM STAFF
WHERE EMPNAME LIKE 'yan____%';
PROCEDURE SUB4 SQLCODE
:CITY2 CHAR(15);
SELECT CITY
INTO :CITY2
FROM STAFF
WHERE EMPNAME LIKE 'YAN____%';
PROCEDURE SUB5 SQLCODE;
ROLLBACK WORK;
PROCEDURE SUB6 SQLCODE;
INSERT INTO TESTREPORT
VALUES('0208','pass','MCO');
PROCEDURE SUB7 SQLCODE;
INSERT INTO TESTREPORT
VALUES('0208','fail','MCO');
PROCEDURE SUB8 SQLCODE;
COMMIT WORK;
[ Dauer der Verarbeitung: 0.163 Sekunden
]
