ddelpero

# Example class to start a Waitress server as a windows service
# the specific use case is running Waitress as a windows server using pywin32
# The Waitress docs only show how to use waitress-serve, but since waitress-serve is blocking
# you don't get a return value, which makes it impossible to gracefully stop the Waitress server
# from a windows service
# However, looking at the waitress-serve code, it's easy to write a custom class

# example pywin32 windows service: https://gist.github.com/drmalex07/10554232

from waitress.server import create_server

ddelpero

; cl list
; name character
; ident number long
; desc character
; constantgroup character
; value number long
; errorDesc character

Do $constants.$makelist($ref.$name,$ref.$ident,$ref.$desc,$ref.$constantgroup) Returns cl
Do cl.$redefine(name,ident,desc,constantgroup,value)

ddelpero

#include "stdafx.h"
#include <boost/python.hpp>
#include <boost/python/handle.hpp>
#include <boost/python/ptr.hpp>
#include <boost/python/class.hpp>
#include <boost/python/errors.hpp>

#include <Python.h>

class CppClass {

ddelpero

; sample call to run all test case method: http://127.0.0.1:5921/ultra?OmnisLibrary=UnitTest&OmnisClass=rt&testLib=UnitTest&testObject=AssertTest

; sample call to run  specific method: http://127.0.0.1:5921/ultra?OmnisLibrary=UnitTest&OmnisClass=rt&testLib=UnitTest&testObject=AssertTest&method=$testAssertFalse_2


If len(pParams.method)
Do $libs.[pParams.testLib].$objects.[pParams.testObject].$newref(pParams.method) Returns tRef
Do tRef.$run()
Set reference testRef to tRef.$ref
Else

ddelpero

//Omnis Studio example to save persistant list data in intial value 
//$construct
//ivSaveList: list of list variables to save

Do ivSaveList.$define(listName,saveName,schemaName)
Do ivSaveList.$add('tvComponentType','tvComponentTypeEncoded','sCustomComponents')
Do ivSaveList.$add('tvOptionsList','tvOptionsListEncoded','sOptions')
Do ivSaveList.$add('tvWindowConfigList','tvWindowConfigListEncoded','sWindowConfig')

For ivSaveList.$line from 1 to ivSaveList.$linecount step 1