Initial import
This commit is contained in:
parent
7288affa28
commit
cde7fb8e12
|
@ -0,0 +1,25 @@
|
||||||
|
Unit MUTIL_MsgPack;
|
||||||
|
|
||||||
|
{$I M_OPS.PAS}
|
||||||
|
|
||||||
|
Interface
|
||||||
|
|
||||||
|
Procedure uPackMessageBases;
|
||||||
|
|
||||||
|
Implementation
|
||||||
|
|
||||||
|
Uses
|
||||||
|
m_Strings,
|
||||||
|
mUtil_Common,
|
||||||
|
mUtil_Status;
|
||||||
|
|
||||||
|
Procedure uPackMessageBases;
|
||||||
|
Begin
|
||||||
|
ProcessName ('Packing Message Bases', True);
|
||||||
|
ProcessResult (rWORKING, False);
|
||||||
|
|
||||||
|
ProcessStatus ('Complete');
|
||||||
|
ProcessResult (rDONE, True);
|
||||||
|
End;
|
||||||
|
|
||||||
|
End.
|
Loading…
Reference in New Issue