Class CM_Script_UTL

Inherits

SY_Common

Properties

LOCAL cAlphaNum$="ABCDEFGHIJKLMNOPQRSTUVWXYZ0123456789_"  
LOCAL cUIEventTypeLib$="l"  
LOCAL cUIEventTypePnl$="p"  
LOCAL cUIEventTypeCtl$="bcg"  
PROPERTY CMScriptPth$  
PROPERTY CompileList$  
PROPERTY EventsFH  
PROPERTY UIEventsFH  
PROPERTY LicenseOK  
PROPERTY EditScriptOK  
PROPERTY ScrMsg01$="The developer license for User-Defined Scripting is not installed."  
PROPERTY ScrMsg02$="The ~ script file could not be erased and redefined.\ \This may have occurred if the file is in use, or if the appropriate security permissions are not set up to process the file."  
PROPERTY ScrMsg03$="The ~ script file could not be opened and locked.\ \This may have occurred if the file is in use, or if the appropriate security permissions are not set up to process the file."  
PROPERTY ScrMsg04$="Do you want to change the script file and lose your script changes?"  
PROPERTY ScrMsg05$="This file does not have a standard script file extension of .vbs or .txt. Make sure the correct language type is selected."  
PROPERTY ScrMsg06$="The file extension does not match the language type. Is this correct?"  
PROPERTY ScrMsg07$="The script displayed does not match the script on file. Do you want to reload changes from the file?"  
PROPERTY ScrMsg08$="The script passed the syntax check."  
PROPERTY ScrMsg09$="The ~ script file does not exist. Do you want to create it?"  
PROPERTY ScrMsg10$="There are no user-defined script events defined for columns or tables."  
PROPERTY ScrMsg11$="Syntax errors have been detected. Do you want to continue saving?"  
PROPERTY ScrMsg12$="The ~ script file does not exist. You are not authorized to create new scripts."  

Methods

FUNCTION CompileList(tbl$)  
FUNCTION DeleteScriptLinks(tableName$, fieldName$, eventCode$, priority$)  

This function deletes CM_ScriptLink records

ParameterDescription
tableName$ [input, string] Tablename from CM_ScriptSettings
fieldName$ [input, string] Fieldname from CM_ScriptSettings
eventCode$ [input, string] Event Code from CM_ScriptSettings
priority$ [input, string] Priority from CM_ScriptSettings
Returns [boolean] Success
FUNCTION FormatScriptID$(id$)  
FUNCTION GetEventList$(dtl)  
FUNCTION GetScript(file$)  
FUNCTION GetScript(file$, script$)  
FUNCTION GetUIEventList$()  
FUNCTION LanguageParm$(langType$, parameter$)  
FUNCTION TidyScript$(script$)  
FUNCTION LOCAL GetBusObj(tableName$, busObj$)  

This function gets a table's business object name

ParameterDescription
tableName$ [input, string] Tablename
busObj$ [output, string] Business object name
Returns [boolean] Success if business object is found, else Failure.

Methods inherited from: SY_Common

FormatAddress(), ParseCityStateZip(), ClassValidateDirectory(), DirectoryCheck(), GetNextSequence(), GetUNCNamedDrive(), IsInstalled(), LocalizeFileIOList(), LocalizeIOList(), PackSequence$(), UnpackSequence(), UseChildKeyColl()