![Layout User Interface
self renderPartList: (
OrderedCollection new
add: self loginIdPart;
add: self firstNamePart;
add: self surnamePart;
add: self emailAddressPart;
add: self defaultCompanyPart;
RepPartNestedTable
newForParent: self
webObject: self webObject
get: [:layout | layout filteredSubJobs] do: [:each | self subJobNestedRowPartFor: each ]
get: #sections do: [:each | self sectionNestedRowPartFor: each]
get: #items do: [:each | self sectionItemNestedRowPartFor: each ]
Seaside code
has access to
domain](https://image.slidesharecdn.com/traxesug2017-170906071335/85/TRAX-technical-highlights-9-320.jpg)
TRAX technical highlights
- 1. TRAX technical highlights Bob Nemec
- 2. TRAX TRAX is a web based ERP application used by HTS • Port of VW / GS fat client system started in 2012 • Deployed in 2015 • Used by 450+ people (out of the 650+ people in HTS) • Includes sales, project management and accounting • Multi-year plan for future features and growth • Based in Toronto
- 3. Seaside views from VW window spec #(#{UI.LabelSpec} #layout: #(#{Core.Point} 20 25) #name: #uiDescription_L #label: #uiDescription) RepWebLabel new name: #uiDescription_L; label: #uiDescription; left: 20; top: 25; width: -1; height: -1; finishWidgetSetup; yourself
- 4. Web server interface to GS using XML GemStone Browser VW Seaside Remote perform XML String Result Canvas XML Parser Data RESTful call Multiple VW web servers using Polycephaly
- 5. Web server interface to GS using strings GemStone Browser VW Seaside Request String Result String Result Canvas Evaluate String Data Evaluate String
- 6. GS Seaside GemStone Seaside Browser Commit on each interaction No need to ‘package’ result
- 7. Pending updates with data wrappers GemStone Browser Updates held in data wrapper Seaside session handler engages a ‘context’ of data wrappers Context
- 8. PDF reports Report display allows for edit
- 9. Layout User Interface self renderPartList: ( OrderedCollection new add: self loginIdPart; add: self firstNamePart; add: self surnamePart; add: self emailAddressPart; add: self defaultCompanyPart; RepPartNestedTable newForParent: self webObject: self webObject get: [:layout | layout filteredSubJobs] do: [:each | self subJobNestedRowPartFor: each ] get: #sections do: [:each | self sectionNestedRowPartFor: each] get: #items do: [:each | self sectionItemNestedRowPartFor: each ] Seaside code has access to domain
- 10. Develop in VW / Deploy in GS Small ‘in-memory’ model for development and testing
- 11. Supervisor for batch & control
- 13. Next • Parts and Inventory System • Mobile Interface • Disconnected Application • Outlook / CRM Integration