//***** // // Date: 13.08.2014 13:57 // // Generated by ADOxx - Library export -- V 2.0 // //***** // // The file contains the following libraries: // // AfterEditAttributeValue Library // AfterEditAttributeValue Dynamic Library // AfterEditAttributeValue Static Library // //***** // Defined model types: // // 1. Car model // Class Car // VERSION <4.0> //================================================================================ //================================================================================ APPLICATION LIBRARY //================================================================================ //================================================================================ //================================================================================ //================================================================================ BUSINESS PROCESS LIBRARY //================================================================================ //================================================================================ ATTRIBUTE VALUE "" ATTRIBUTE VALUE "13.08.2014, 13:57" ATTRIBUTE VALUE "Admin" ATTRIBUTE VALUE "AfterEditAttributeValue Library" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "GENERAL MODELTYPE \"Car model\" plural:\"Car models\" from:all" ATTRIBUTE VALUE "LAYOUT \"Full page (without header/footer)\" PAGE w:p h:p" ATTRIBUTE VALUE "SIMOPTION undefined" ATTRIBUTE VALUE "SIMTEXT undefined" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "www.adoxx.org faq@adoxx.org" ATTRIBUTE VALUE "yes" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "numeric" ATTRIBUTE VALUE "GRAPHREP FILL color:aliceblue RECTANGLE x:-.3cm y:-.3cm w:.6cm h:.6cm " ATTRIBUTE VALUE 170 ATTRIBUTE VALUE 8 ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "ON_EVENT \"AppInitialized\" { # create the dockable window for the output stream CC \"AdoScript\" CREATE_OUTPUT_WIN winid:\"EVENTLOG\" title:\"Event Logging\" # establish a global procedure as a helper implementation for timestamped logging PROCEDURE global EVENT_LOG msgType:string message:string { CC \"Application\" GET_DATE_TIME date-format:\"dd/mm/yyyy\" time-format:\"hh:mm:ss\" SET currentDateTime: ((date) + \" \" + (time)) CC \"AdoScript\" OUT winid:\"EVENTLOG\" text: (\"[\" + (msgType) + \"@\" + currentDateTime + \"]:" " \" + (message) + \"\\n\") } # Initial event log message for the \"AppInitialized\" event EVENT_LOG msgType:\"EVENT_LOG\" message: (\"AppInitialized\") # Perform other things for the event } ON_EVENT \"AfterEditAttributeValue\" { EVENT_LOG msgType:\"EVENT_LOG\" message: (\"AfterEditAttributeValue with parameters instid: \" + S" "TR instid + \" attrid: \" + STR attrid + \" modelid: \" + STR modelid + \" attrtypeid: \" + STR attrt" "ypeid) # attrtypeid: # 0 INTEGER, 1 DOUBLE, 2 STRING, 3 DISTRIBUTION, 4 TIME, 5 ENUMERATION, 6 ENUMERATIONLIST, 7 LONGST" "RING, 8 PROGRAMCALL, 9 INTERREF, 10 EXPRESSION, 11 RECORD, 12 ATTRPROFREF, 13 DATE, 14 DATETIME, 15 C" "LOB # update change history CC \"Core\" GET_ATTR_VAL objid: (instid) attrname:\"Change history\" SET sChangeHistory: (val) # get changing user CC \"Application\" GET_USER SET sUser: (user) # get attribute name CC \"Core\" GET_ATTR_NAME attrid: (attrid) SET sAttrName: (attrname) # get change date CC \"Application\" GET_DATE_TIME date-format:\"dd/mm/yyyy\" time-format:\"hh:mm:ss\" SET sCurrentDateTime: ((date) + \" \" + (time)) # update change history # add a line break if change history is not empty SET sNewChangeHistory:\"\" IF (LEN sChangeHistory > 0) { SET sNewChangeHistory: (sChangeHistory + \"\\n\") } # the \"Name\" attribute needs different treatment, since it is the uniqueness identifier. No \"Set" "AttributeValue\" is triggered, therefore no oldval is available IF (sAttrName = \"Name\") { SET sNewChangeHistory: (sNewChangeHistory + \"The name has been changed by user:\\\"\" + sUser + " "\"\\\"\") } ELSE { SET sNewChangeHistory: (sNewChangeHistory + \"Value of attribute \\\"\"+sAttrName+\"\\\" until: \"" " + sCurrentDateTime + \": \" + sAttrOldValue + \", changed by user:\\\"\" + sUser + \"\\\"\") } CC \"Core\" SET_ATTR_VAL objid: (instid) attrname:\"Change history\" val: (sNewChangeHistory) # Perform other things for the event # .... } ON_EVENT \"SetAttributeValue\" { # check for name of attribute and only listen to attribute name changes of \"Name\" attribute EVENT_LOG msgType:\"EVENT_LOG\" message: (\"SetAttributeValue with parameters instid: \" + STR ins" "tid + \" attrid: \" + STR attrid + \" modelid: \" + STR modelid + \" attrtypeid: \" + STR attrtypeid " "+ \" oldval: \" + oldval) # attrtypeid: # 0 INTEGER, 1 DOUBLE, 2 STRING, 3 DISTRIBUTION, 4 TIME, 5 ENUMERATION, 6 ENUMERATIONLIST, 7 LONGST" "RING, 8 PROGRAMCALL, 9 INTERREF, 10 EXPRESSION, 11 RECORD, 12 ATTRPROFREF, 13 DATE, 14 DATETIME, 15 C" "LOB # remember the OLD value SETG sAttrOldValue: (oldval) # Perform other things for the event # .... }" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "off" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "GRID snap:on visible:off w:0.50cm h:0.50cm GRADIENT_PRINTING mode:avg-color" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" //================================================================================ CLASS <__LibraryMetaData__> : <__D-construct__> //================================================================================ //--- Class <__LibraryMetaData__> - Class attributes------------------------------ CLASSATTRIBUTE TYPE STRING VALUE "d:\\TOOLS\\BOC\\ADOxx13_EN_SA\\" FACET VALUE 0 FACET VALUE "" FACET VALUE "" CLASSATTRIBUTE <__ModelListChangeCounter__> TYPE INTEGER VALUE 0 FACET VALUE 0 FACET VALUE "" FACET VALUE "" FACET VALUE "" CLASSATTRIBUTE <__APListChangeCounter__> TYPE INTEGER VALUE 0 FACET VALUE 0 FACET VALUE "" FACET VALUE "" FACET VALUE "" CLASSATTRIBUTE VALUE 1 CLASSATTRIBUTE VALUE 1 CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "NOTEBOOK CHAPTER \"Description\" ATTR \"Name\" " CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" //--- Class <__LibraryMetaData__> - default values-------------------------------- ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" //================================================================================ CLASS : <__D-construct__> //================================================================================ CLASSATTRIBUTE VALUE 0 CLASSATTRIBUTE VALUE 1 CLASSATTRIBUTE VALUE "GRAPHREP SHADOW off # Tyres ELLIPSE x:-0.5cm rx:0.3cm ry:0.3cm ELLIPSE x:0.5cm rx:0.3cm ry:0.3cm # Body LINE x1:-0.2cm x2:0.2cm LINE x1:-0.8cm x2:-1cm LINE x1:0.8cm x2:1cm LINE x1:1cm x2:1cm y2:-0.5cm LINE x1:-1cm x2:-1cm y2:-0.5cm LINE x1:-1cm x2:1cm y1:-0.5cm y2:-0.5cm # Roof LINE x1:-0.5cm x2:-0.3cm y1:-0.5cm y2:-0.9cm LINE x1:0.5cm x2:0.3cm y1:-0.5cm y2:-0.9cm LINE x1:-0.3cm x2:0.3cm y1:-0.9cm y2:-0.9cm # Windows LINE y1:-0.5cm y2:-.9cm ATTR \"Name\" y:.7cm w:c h:c" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "NOTEBOOK CHAPTER \"Description\" ATTR \"Name\" ATTR \"Another attribute\" ATTR \"Another attribute 2\" ATTR \"Another attribute 3\" ATTR \"Change history\"" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" CLASSATTRIBUTE VALUE "" //--- Class - Instance attributes------------------------------------------- ATTRIBUTE TYPE STRING VALUE "" FACET VALUE 0 FACET VALUE "" FACET VALUE "" ATTRIBUTE TYPE LONGSTRING VALUE "" FACET VALUE 1 FACET VALUE "" FACET VALUE "" ATTRIBUTE TYPE INTEGER VALUE 0 FACET VALUE 0 FACET VALUE "" FACET VALUE "" FACET VALUE "" ATTRIBUTE TYPE LONGSTRING VALUE "" FACET VALUE 0 FACET VALUE "" FACET VALUE "" //--- Class - default values------------------------------------------------ ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" //================================================================================ //================================================================================ WORKING ENVIRONMENT LIBRARY //================================================================================ //================================================================================ ATTRIBUTE VALUE "" ATTRIBUTE VALUE "13.08.2014, 13:05" ATTRIBUTE VALUE "Admin" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE " " ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "yes" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "numeric" ATTRIBUTE VALUE "" ATTRIBUTE VALUE 0 ATTRIBUTE VALUE 0 ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "on" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE "" ATTRIBUTE VALUE ""