RTE-CALLS
rtecalls can be used almost anywhere in sc where an expression can be entered. In links, in formatctrl etc
The RTS-calls have finally found its way to the official Peregrine documentation
An example
Open file test, read first record, fill current date/time in a file, write the record to the file and close the file
$x=rtecall("rinit", $L.rc, $oli, "test");$x=rtecall("select", $L.rc, $oli, "true");test in $oli=str(tod());$x=rtecall("rupdate", $L.rc, $oli)
All RTE-CALLS:
filldate
fileinit
recdupl
sqlmap
trigger
counter
datemake
rfind
passchange
sehset
notypecheck
exportddl
importddl
rinit
next
previous
radd
rupdate
rdelete
select (Return-code: 1=one record, 2=more records, 3=no records, 4=TimeOut)
msg
filecopy
rfirst
rgoto
rid
policycheck
log
sort
statusupdate
alpha
alnum
alalnum
random
qbeform
mbindex
transtart
transtop
List of RTE-CALLS as found in the RAD-Applications:
rtecall("rinit", $L.rc, $L.file, "format")
rtecall("select", $L.rc, $L.file, $L.qry)
rtecall("rupdate", $L.rc, $L.file))
$L.void=rtecall("statusupdate", $L.err, "field1", $L.msg)
$L.void=rtecall("notypecheck", $L.void)
$return=rtecall("msg", $return, $focus.message)
$L.void=rtecall("rid", $L.rc, $2, $L.record.number);$L.void=rtecall("rfirst", $L.rc, $2))
$L.void=rtecall("rid", $L.rc, $L.file, $L.recordnumber)
$L.void=rtecall("rgoto", $L.rc, $2, $L.record.number)
$L.void=rtecall("trigger", $L.err, 1)
rtecall("datemake", $L.errcode, $L.cal.date, $L.cal.check.year, $L.cal.check.month, 1, 0, 0, 0)
$L.success.flg=rtecall("sqlmap", $L.rc, $L.dbdict, $L.sql.db.type, $L.suffix, $L.pad.lng, $L.array.code, $L.options, $L.replace.flg, $L.alter)
$L.flg=rtecall("rupdate", $L.rc, $dbdict)
$L.return=rtecall("msg", $L.reason, "VIEWATTR;enable combo;ReadOnly;"+3 in $SysRadEvent)
$L.flg=rtecall("next", $L.rcn, $L.file))
($L.flg=rtecall("previous", $L.rc, $L.dbdict))
$L.void=rtecall("passchange", $L.errcode, $L.old.pass, $L.new.pass, $L.confirm.pass)
$L.flg=rtecall("filecopy", $L.rc, $L.dbdict.name, $L.target.name, $L.move.count, $L.bad.recs)
$L.flg=rtecall("exportddl", $L.rc, $L.dbdict, $L.ddl.name, true)
$L.flag=rtecall("log", $L.rc, $L.skip.msg)
$L.void=rtecall("counter", $L.errode, 0)
$L.flg=rtecall("importddl", $L.rc, $L.ddl.name)
$L.flg=rtecall("rdelete", $L.rc, $L.file)
$L.void=rtecall("alpha", $L.rc, "wallly.wally")
$L.date=rtecall("FILLDATE", $L.errcode, $L.file, $L.field)
$L.void=rtecall("sort", $L.errcode, $L.grid, $L.index, 0))
This search was done this way:
[F1] (Command)
=application [Enter]
option/advanced search
index("rtecall",str(statements))<>0 [Enter]


Reply With Quote
Bookmarks