MV.net:

inicio / home | documentos / documents | software / software | personal / personal | blog / blog

Unit modules

Description

uses

Classes, Interfaces, Objects and Records

Functions and Procedures

Types

Constants

Variables

Description

uses

Classes
menus
IdTCPClient

Overview

Classes, Interfaces, Objects and Records

Name	Description
record `opmR_Module`
record `opmR_ExchangeData`
Class `opmT_MenuMethod`

Functions and Procedures

FUNCTION opm_FNLoad_ModuleData (ModIniFile : STRING) : opmR_Module;

PROCEDURE opm_PRLoad_ModuleList;

FUNCTION opm_FNSave_ModuleData (CurModule : opmR_Module) : BOOLEAN;

PROCEDURE opm_PRDelete_ModuleData (ModIniFile : STRING);

FUNCTION opm_FNGetListIndexByString (ListString : STRING; VAR FieldList : TStringList) : LONGINT;

PROCEDURE opm_PRAddModules_ToMenu (ParentMenu : TMenuItem);

PROCEDURE opm_PRSetValidModules (ParentMenu : TMenuItem; SelCount : LONGINT);

PROCEDURE opm_PRExecModule (ModCommandFile, ModCommandParam : STRING);

FUNCTION opm_FNConnectMod (ModHost : STRING; ModPort : LONGINT) : BOOLEAN;

FUNCTION opm_FNQueryMod (Query : STRING; VAR Answer : STRING) : LONGINT;

FUNCTION opm_PRAskStatsMod : STRING;

PROCEDURE opm_PRDisconnectMod;

Types

opmT_ModuleList = ARRAY [0..opmC_Max_Modules_PerList] OF opmR_Module;

opmT_ExchangeList = ARRAY [0..opmC_Max_Exchanges_PerList] OF opmR_ExchangeData;

Constants

opmC_Max_Modules_PerList = 50;

opmC_Def_ModPort = 27572;

opmC_Min_ModPort = 1;

opmC_Max_ModPort = 65535;

opmC_DirModules = 'modules';

opmC_Def_ModulesExt = 'ini';

opmC_RKModule = 'module';

opmC_ModQuitCommand = 'QUIT OSCPM1';

opmC_ModStatCommand = 'STATS OSCPM1';

opmC_TCPTimeout = 10000;

opmC_Localhost = '127.0.0.1';

opmC_ModOKCode = 'OK';

opmC_ModStatCode = 'STAT';

opmC_ModStatCodeEnd = 'STAT END';

opmC_ModNACode = 'NOT FOUND';

opmC_ModErrorCode = 'ERROR ERROR';

opmC_Max_ModNameWidth = 100;

opmC_Max_ModCMDWidth = 500;

opmC_ModStartupWait = 1000;

opmC_Max_Exchanges_PerList = 8192;

opmC_Def_LoadModExt = 'exe';

opmC_Def_LoadModFilename = '';

opmC_Def_LoadModFilter = '*.exe';

opmC_ModRet_Null = 0;

opmC_ModRet_Data = 1;

opmC_ModRet_Stat = 2;

opmC_SyncField_ProductID = 'products_id';

opmC_SyncField_ProductModel = 'products_model';

opmC_SyncField_ProductQuantity = 'products_quantity';

opmC_SyncField_ProductPrice = 'products_price';

opmC_SyncField_ProductImage = 'products_image';

opmC_SyncField_ProductWeight = 'products_weight';

opmC_SyncField_ProductStatus = 'products_status';

opmC_SyncField_ProductOrdered = 'products_ordered';

opmC_SyncResult_Any = 0;

opmC_SyncResult_Equal = 1;

opmC_SyncResult_Diff = 2;

opmC_SyncResult_Unknown = 3;

opmC_SyncResult_Error = 4;

opmC_SyncResult_Restricted = 5;

Variables

opm_TotalModules : LONGINT;

opm_CurrentModuleRecord : opmR_Module;

opmG_ModuleList : opmT_ModuleList;

opm_ModuleDirectory : STRING;

opmG_ModIndexData_BoxList : TStringList;

opmG_ModResultData_BoxList : TStringList;

opm_MenuClick : opmT_MenuMethod;

opm_TCPClientModule : TIdTCPClient;

opmG_ExchangeList : opmT_ExchangeList;

opmG_TotalExchangeItems : LONGINT;

Description

Functions and Procedures

FUNCTION opm_FNLoad_ModuleData (ModIniFile : STRING) : opmR_Module;

PROCEDURE opm_PRLoad_ModuleList;

FUNCTION opm_FNSave_ModuleData (CurModule : opmR_Module) : BOOLEAN;

PROCEDURE opm_PRDelete_ModuleData (ModIniFile : STRING);

FUNCTION opm_FNGetListIndexByString (ListString : STRING; VAR FieldList : TStringList) : LONGINT;

PROCEDURE opm_PRAddModules_ToMenu (ParentMenu : TMenuItem);

PROCEDURE opm_PRSetValidModules (ParentMenu : TMenuItem; SelCount : LONGINT);

PROCEDURE opm_PRExecModule (ModCommandFile, ModCommandParam : STRING);

FUNCTION opm_FNConnectMod (ModHost : STRING; ModPort : LONGINT) : BOOLEAN;

FUNCTION opm_FNQueryMod (Query : STRING; VAR Answer : STRING) : LONGINT;

FUNCTION opm_PRAskStatsMod : STRING;

PROCEDURE opm_PRDisconnectMod;

Types

opmT_ModuleList = ARRAY [0..opmC_Max_Modules_PerList] OF opmR_Module;

opmT_ExchangeList = ARRAY [0..opmC_Max_Exchanges_PerList] OF opmR_ExchangeData;

Constants

opmC_Max_Modules_PerList = 50;

opmC_Def_ModPort = 27572;

opmC_Min_ModPort = 1;

opmC_Max_ModPort = 65535;

opmC_DirModules = 'modules';

opmC_Def_ModulesExt = 'ini';

opmC_RKModule = 'module';

opmC_ModQuitCommand = 'QUIT OSCPM1';

opmC_ModStatCommand = 'STATS OSCPM1';

opmC_TCPTimeout = 10000;

opmC_Localhost = '127.0.0.1';

opmC_ModOKCode = 'OK';

opmC_ModStatCode = 'STAT';

opmC_ModStatCodeEnd = 'STAT END';

opmC_ModNACode = 'NOT FOUND';

opmC_ModErrorCode = 'ERROR ERROR';

opmC_Max_ModNameWidth = 100;

opmC_Max_ModCMDWidth = 500;

opmC_ModStartupWait = 1000;

opmC_Max_Exchanges_PerList = 8192;

opmC_Def_LoadModExt = 'exe';

opmC_Def_LoadModFilename = '';

opmC_Def_LoadModFilter = '*.exe';

opmC_ModRet_Null = 0;

opmC_ModRet_Data = 1;

opmC_ModRet_Stat = 2;

opmC_SyncField_ProductID = 'products_id';

opmC_SyncField_ProductModel = 'products_model';

opmC_SyncField_ProductQuantity = 'products_quantity';

opmC_SyncField_ProductPrice = 'products_price';

opmC_SyncField_ProductImage = 'products_image';

opmC_SyncField_ProductWeight = 'products_weight';

opmC_SyncField_ProductStatus = 'products_status';

opmC_SyncField_ProductOrdered = 'products_ordered';

opmC_SyncResult_Any = 0;

opmC_SyncResult_Equal = 1;

opmC_SyncResult_Diff = 2;

opmC_SyncResult_Unknown = 3;

opmC_SyncResult_Error = 4;

opmC_SyncResult_Restricted = 5;

Variables

opm_TotalModules : LONGINT;

opm_CurrentModuleRecord : opmR_Module;

opmG_ModuleList : opmT_ModuleList;

opm_ModuleDirectory : STRING;

opmG_ModIndexData_BoxList : TStringList;

opmG_ModResultData_BoxList : TStringList;

opm_MenuClick : opmT_MenuMethod;

opm_TCPClientModule : TIdTCPClient;

opmG_ExchangeList : opmT_ExchangeList;

opmG_TotalExchangeItems : LONGINT;

Generated by PasDoc 0.9.0 on 2007-07-25 05:51:50