Module cWebBusinessProcess.pkg

**************************************************************************** $File name : WebBusinessBrocess.pkg $Author : Janne Wassberg $System : VDF Internet Server Confidential Trade Secret. Copyright 1998-1999 Data Access Corporation, Miami FL, USA All Rights reserved DataFlex is a registered trademark of Data Access Corporation. $Rev History JJT 12/1/2000 Combined WA3 NT and Linux Package JJT 10/20/00 Added ddXxxxx and WML support JJT 10/20/00 Changed output to xHtml (lowecase tags, <br />) Import WriteWmlXxx messages and WmlXxxx functions for wml support. Removed old interface support JJT 10/20/00 Changes from JVH to support WebApp Integrator (no other changes!) JJT 8/1/99 changes for WebApp Studio JJT 8/1/99 merged "01" interface into class JW 1998-09-03 Zoom interface for drill down added JJT 1998-08-28 Added Write_PainText (encodes HTML) and WriteHtml All other messages now go through WriteHtml JW 1998-07-08 VDF Internet Server Version 0.8-215 JW 1998-06-27 Source Merge for Internet by Janne Wassberg 1998-06-27 Version 0.8-201 98-03-10 Version 110 98-02-18 Version 105 97-10-01 File header created. ****************************************************************************

cWebBusinessProcess.pkg (view source)
• import declarations
  • LanguageTextWebApp.pkg (view source)
  • cInternetSessionBusinessProcess.pkg (view source)
    InternetSessionBusinessProcess
  • Datadict.pkg (view source)
  • HtmlFormat_mixin.pkg (view source)
    HTML helper mixin and functions
  • HtmlWrite_Mixin.pkg (view source)
  • WmlFormat_mixin.pkg (view source)
    wml helper mixin and functions
  • WmlWrite_Mixin.pkg (view source)
• cDDValueInterface : Array
  This class stores the interface for Call messages. It is entirely private.
  • integerddValueCount()
  • RegisterDDValue(integer iParam1 string sParam1 string sParam2 string sComment)
    • IntegeriCount
  • IntegerParam1Number(Integer iItem)
  • StringParam1Str(Integer iItem)
  • StringParam2Str(Integer iItem)
  • StringddValCmnt(Integer iItem)
• cWebBusinessProcess_ddValueInterface : cDDValueInterface
  • RegisterddValues()
  • end_construct_object()
• oWebBusinessProcess_ddValueInterface : cWebBusinessProcess_ddValueInterface
  create a single global instance of this...We only need one of 'em
• cDDValTbl : Array
  • Construct_Object()
    • integerCrntValTblFile
    • integerCrntValTblField
  • WBPO_Fill_Item(integer iItem string sValue string sDescription integer iFile RowId riRec)
  • Add_Blank_Item(String Blank_Desc)
  • WBPO_Fill_Field_List(integer hMain integer iFile integer iField)
    Fills the list by loading the entire defined data-file
    • IntegeriObj
  • integerUpdateValTbl(integer hMain integer iFile integer iField)
    Fill the Val table if required. Check current iFile and iField
    • IntegeriItems
  • integerValTbl_Items(integer hMain integer iFile integer iField)
    • IntegeriItems
  • stringValTbl_ItemData(integer hMain integer iFile integer iField integer iItem)
    • IntegeriItems
  • stringValTbl_ItemDesc(integer hMain integer iFile integer iField integer iItem)
    • IntegeriItems
• cWebBusinessProcess : cInternetSessionBusinessProcess
  • Construct_object()
    Inherited from cInternetSessionBusinessProcess
    • oDDValTbl : cDDValTbl
    • StringpsAutoEntryLabelStart
    • StringpsAutoEntryLabelEnd
    • StringpsAutoEntryDataStart
    • StringpsAutoEntryDataEnd
    • integerhDDValueInterface
    • integerphAutoWebReport
    • integerphLastFindDD
    • integerpiLastFindIndex
  • WriteHtml(string sHtml)
    If you use characters that could be understod as a html tag it will be written as a tag.
  • WriteData(address pData)
  • WriteHtmlPlainText(string sTxt)
    Will output everything in the string without destroying the HTML page.
  • integerValTbl_Items(integer hMain integer iFile integer iField)
    • IntegeriItems
  • stringValTbl_ItemData(integer hMain integer iFile integer iField integer iItem)
    • StringsValue
  • stringValTbl_ItemDesc(integer hMain integer iFile integer iField integer iItem)
    • StringsValue
  • stringDDComboOptions(integer hMain integer iFile integer iField)
    • Integeri
    • IntegeriItems
    • StringsValue
    • StringsDat
    • StringsDesc
    • StringsItem
    • StringsCrntVal
    • StringsSelected
    • StringsCRLF
  • stringDDRecsOptions(integer hMain integer iFile integer iField)
    • IntegeriIndex
    • IntegerhDD
    • IntegeriCrec
    • IntegeriRec
    • StringsValue
    • StringsDat
    • StringsItem
    • StringsSelected
    • StringsCRLF
  • stringDDRowIdsOptions(integer hMain integer iFile integer iField)
    • IntegeriIndex
    • IntegerhDD
    • RowIdriCrec
    • RowIdriRec
    • StringsValue
    • StringsDat
    • StringsItem
    • StringsSelected
    • StringsCRLF
  • stringHtml_Ctrl_Name(integer iFile integer iField)
    • StringsName
    • StringsField
  • stringHtml_Ctrl_RowId_Name(integer iFile)
    • StringsName
    • StringsField
  • StringDDReadOnlyHTML(integer hMain integer iFile integer iField)
    • StringsRO
    • IntegeriOpts
  • StringDDTitleHTML(integer hMain integer iFile integer iField)
    • StringsTitle
    • StringsErr
    • IntegeriItem
  • stringDDFormControl(integer hMain integer iFile integer iField string sParams)
    • StringsValue
    • StringsDat
    • StringsReadOnly
    • StringsTitle
    • IntegeriSize
    • IntegeriType
  • stringDDEditControl(integer hMain integer iFile integer iField string sParams)
    • StringsValue
    • StringsDat
    • StringsReadOnly
    • StringsTitle
    • IntegeriSize
    • IntegeriRows
    • IntegeriPos
  • stringDDComboControl(integer hMain integer iFile integer iField string sParams)
    • StringsValue
    • StringsReadOnly
    • StringsTitle
  • stringDDParentComboControl(integer hMain integer iFile integer iField string sParams)
    changed to use row ids instead of recnums. Should work the same
    • StringsValue
    • StringsReadOnly
    • StringsTitle
  • stringDDRadioControl(integer hMain integer iFile integer iField string sParams)
    in WA/3 we now pass optional decriptions on sParams delmited by "|". e.g. "Yes|No|Maybe". If passed those are used for the radio item descriptions. If not passed, we use the database values which is consistent with WA/2.
    • StringsValue
    • StringsDat
    • StringSReadOnly
    • StringsChecked
    • StringsItem
    • StringsCrntVal
    • StringsDesc
    • StringsTitle
    • Integeri
    • IntegeriItems
    • IntegerbChecked
    • IntegeriPos
  • stringDDAutoControl(integer hMain integer iFile integer iField string sParams)
    • StringsValue
    • StringsReadOnly
    • IntegeriType
    • IntegeriVType
    • IntegerhDD
  • stringDDWMLInputControl(integer hMain integer iFile integer iField string sParams)
    create input for WML
    • StringsValue
    • StringsDat
    • StringsReadOnly
    • StringsFormat
    • IntegeriSize
  • stringDDFieldErr(integer hMain integer iFile integer iField integer bShort)
    • IntegeriItem
    • StringsErr
  • stringDDHndValue(integer hMain integer iFile integer iField integer iOption string sParams)
    Inherited from cInternetSessionBusinessProcess
    This replaces the standard ddValue
    • StringsValue
    • StringsErr
    • IntegeriMsg
    • IntegeriItem
    • IntegeriType
  • integerAutoEntry(string sFileName)
    This creates an entire HTML output entry form automatically for all fields that are not binary or overlap
    • IntegerhDD
    • IntegeriFile
    • IntegeriFlds
    • Integeri
    • IntegeriType
    • StringsValue
    • StringsLblStart
    • StringsLblEnd
    • StringsDatStart
    • StringsDatEnd
  • integerDoAutoReport(integer iIndex string sHref integer iMax integer iStart)
    not used. keeps the compiler happy
  • integerAutoReport(string sFileName string iIndex string sHRef integer iMax integer iStart)
    Auto report. pass: FileName, Index, ASP-href name
    • IntegerhDD
    • IntegerhWBPO
    • IntegerbStat
    • IntegeriFile
    • IntegeriField
    • IntegerhAutoReport
  • integerDoRequestFindbyRecId(string sfileName String sRec)
    Find by recnum. Pass FileName and record ID
    • IntegerhDD
    • IntegeriFile
    • IntegeriRec
  • integerDoRequestFindbyRowId(string sfileName String sRec)
    Find by rowed. Pass FileName and serialized row id
    • IntegerhDD
    • IntegeriFile
    • RowIdriRec
  • stringCreateFindIndexCombo(string sComboName string sfileName integer iDfltIndex)
    Create a Combo with all Indexes for passed File and current selected fldname returns control named FindIndex
    • IntegerhDD
    • IntegeriFile
    • Integeri
    • IntegeriNumFlds
    • IntegeriType
    • IntegeriNdx
    • StringsFldTag
    • StringsFldName
    • StringsOption
    • StringsSel
    • StringsIndx
  • stringWmlCreateFindIndexSelect(string sComboName string sfileName integer iDfltIndex)
    create index selector for WML
    • IntegerhDD
    • IntegeriFile
    • Integeri
    • IntegeriNumFlds
    • IntegeriType
    • IntegeriNdx
    • StringsFldTag
    • StringsFldName
    • StringsOption
    • StringsIndx
  • stringIndexMainField(string sfileName integer iIndex)
    return field name of first segment in index
    • IntegerhDD
    • IntegeriFile
    • IntegeriFld
    • StringsFldName
  • integerddFind(string sFileName string sFieldName Integer iFindMode)
    ddFind Find Record from primed DD buffer Note: 2nd param (sFieldName) can be a field (if name passed) or an index (if number passed)
    • IntegerhDD
    • IntegeriFile
    • IntegeriField
    • IntegeriIndex
    • IntegerbErr
    • IntegerbIsIndex
  • integerddFindFirst(string sFile string sField)
    ddFindFirst Find First record. Note: 2nd param can be a field (if name passed) or an index (if number passed)
    • IntegerbFound
  • integerddFindLast(string sFile string sField)
    ddFindLast Find last record. Note: 2nd param can be a field (if name passed) or an index (if number passed)
    • IntegerbFound
  • integerddFindNext()
    ddFindNext Find next record. Must be primed with a ddFind, ddFindFirst or ddFindLast This takes no params, it uses last "primed" find data.
    • IntegerhDD
    • IntegeriFile
    • IntegeriIndx
  • integerddFindPrev()
    ddFindPrev Find previous record. Must be primed with a ddFind, ddFindFirst or ddFindLast This takes no params, it uses last "primed" find data.
    • IntegerhDD
    • IntegeriFile
    • IntegeriIndx
  • integerddFindbyRecId(string sfileName String sRec)
    ddFindbyrecId Find by record Id. Pass FileName and record ID
    • IntegerhDD
    • IntegeriRec
  • integerddFindbyRowId(string sfileName string sSerializedRowId)
    • IntegerhDD
  • integerddClear(string sFile)
    ddClear
    • IntegerhDD
  • integerddDelete(string sFile)
    ddDelete Delete current record in DD
    • IntegerhDD
    • IntegerbErr
  • integerddSave(string sFile)
    ddSave This does a validate and a save.
    • IntegerhDD
    • IntegerbErr
  • integerddValidate(string sFile)
    ddValidate validate all fields (even if error is encountered all fields are validated)
    • IntegerhDD
    • IntegerbErr
  • Enumerate_DDOs(integer hDD integer hMsg integer hObj string sP1 string sP2)
    ************************************************************************* *** Interface reporting: ************************************************************************* Ideally these two messages belong in the DD class. traverse All DDOs starting at the parent most and working down.
  • PrivateEnumerate_DDOs(integer hDD integer hMsg integer hObj string sP1 string sP2)
    • IntegerhDDNext
    • IntegeriCount
    • IntegeriMax
  • StringYesNo(integer bState)
  • StringTrueFalse(integer bState)
  • ShowddValue(integer hoObj integer hmMsg)
    • Stringsparam1
    • StringsParam2
    • StringsComment
    • StringsStr1
    • StringsStr
    • Integerhddv
    • IntegeriParam1
    • IntegeriCount
    • Integeri
  • ShowDDData(integer hDD integer hoObj integer hmMsg)
    • StringsTable
    • StringsColumn
    • IntegeriTable
    • IntegeriColumns
    • IntegeriType
    • Integeri
    • BooleanbRecnumTable
  • ShowWBOData(integer hoObj integer hmMsg integer iMode)
    • StringsName
    • StringsParams
    • StringsComment
    • IntegeriCount
    • IntegeriItem
    • IntegerhMainDD
  • StringFormatXmlObjName(String sObject)
    FormatXmlObjName ---------------- This is a cheap way to improve the way that object names appear in WebApp.xml At least it is better than ALLCAPS.
    • StringsTemp
  • StringGetParamType(String sParamName)
    GetParamType ------------ determine the parameter type by analysing the parameter name. The analysis is case-sensitive, so the name must be case-exact...
  • ShowXMLddValue(integer hObj)
    ShowXMLddValue --------------
    • Stringsparam1
    • StringsParam2
    • StringsComment
    • Integerhddv
    • IntegeriParamNumber
    • IntegeriCount
    • Integeri
  • ShowXMLDDdata(integer hDD integer hObj)
    ShowXMLDDdata -------------
    • StringsTable
    • StringsColumn
    • StringsMainDD
    • IntegeriTable
    • IntegeriColumn
    • IntegericColumn
    • IntegeriType
    • BooleanbRecnumTable
  • ShowXmlMethodParameters(Integer hObj String sParams integer bExtendedParams)
    ShowXmlMethodParameters ----------------------- This method parses the sParams and outputs the <Params> collection of WebApp.xml. The sParams string is derived from the InterfaceMessageParams property of a given interface method.
    • StringsParamType
    • StringsParamName
    • StringsUCParamName
    • StringsOriginal
    • IntegeriPos
    • IntegericLoop
  • ShowXml(integer hObj)
    ShowXml ------- XML Output. Both of these messages expect that hOBj understands the messages Add_xml_tag, begin_xml_tag and end_xml_tag
    • StringsMethodName
    • StringsParams
    • StringsComment
    • StringsMethodType
    • IntegeriCount
    • IntegeriItem
    • IntegerhMainDD
    • IntegerbExtended
  • RegisterDebugInterface()
  • RegisterBasicErrorInterface()
  • RegisterFullErrorInterface()
  • RegisterAutoEntryInterface()
    includes interface to create an auto-entry screen
  • RegisterStandardInterface()
    Inherited from cCallInterfaceHelper_mixin
    includes the standard call Interface
  • RegisterDDInterface()

References (11):

Field References (0):