#implicitCopy
inlineCodeExpander ::=
#ignore(C++)
[
#readCString
|
'<'
=> local iStartPosition = $getOutputLocation() - 1$;
#explicitCopy
#readIdentifier:"SQL"
=> setOutputLocation(iStartPosition);
expandSQLMarkup
|
#readChar
]*;
expandSQLMarkup ::=
=> {
@DBHandle* db_handle = db_connect();
DBQueryData* db_data = db_query(db_handle, "@
}
#implicitCopy
[^'>']*
#explicitCopy
'>'
=> {
@");
for (int record = 0; record < db_data->length; record++) {
// fetch and process data
}@
}
;
Generated by CodeWorker v3.10.4 from CWscript2HTML.cwp.