mirror of https://github.com/mrkite/regs.git
39 lines
3.0 KiB
OpenEdge ABL
Executable File
39 lines
3.0 KiB
OpenEdge ABL
Executable File
UNIT CTIUtils;
|
|
|
|
INTERFACE
|
|
|
|
USES
|
|
|
|
FUNCTION Int2String
|
|
|
|
FUNCTION LongInt2String
|
|
|
|
FUNCTION Real2String
|
|
|
|
|
|
FUNCTION String2Int
|
|
|
|
FUNCTION String2LongInt
|
|
|
|
FUNCTION String2Real
|
|
|
|
|
|
procedure P2GSstring
|
|
|
|
|
|
procedure GS2Pstring
|
|
|
|
|
|
|
|
PROCEDURE StuffHex
|
|
|
|
|
|
PROCEDURE CallCode
|
|
|
|
nBytesIn: integer; BytesIn: univ ptr;
|
|
nBytesOut: integer; BytesOut: univ ptr );
|
|
|
|
IMPLEMENTATION
|
|
|
|
END.
|