/* <Scol Technologies License> */
/* Copyright (c) 2003, organization : Scol Technologies Association, owner : Sylvain Huet */
/* For conditions of distribution and use, see copyright notice in dms/l/license.txt */
/* or on 'www.scol-technologies.org' */

/* sDHDMS - mar 00 - by Sylvain HUET */
/* server preDMI part */

typeof this=DMI;;
fun reg(i)= set this=DMSdmi.i;;
fun _checkpack(s)=DMIcheckpack this s;;
fun _storepack(val,s)=DMIstorepack this val s;;