There is 1 other file named dtschb.cbl in the archive. Click here to see a list.
* Program DTSCHB - Schema Bind Test Program
* (formerly TSTIDB.CBL)
* Part of the UETP and verify test system for DBMS-20
* Copyright (C) 1984 by
* Digital Equipment Corporation, Maynard, Mass.
* This software is furnished under a license, and may be used
* or copied only in accordance with the terms of that license.
INVOKE DTSSSC OF SCHEMA DTSCH PRIVACY KEY COMPILE IDBALL.
USE IF ERROR-STATUS.
DISPLAY "?UNEXPECTED ERROR ",ERROR-STATUS
ENTER MACRO STATS.