11 lines
398 B
JSON
11 lines
398 B
JSON
{
|
|
"header": {
|
|
"version": 1,
|
|
"type": "record"
|
|
},
|
|
"body": {
|
|
"record1": {
|
|
"<1>": "Declare Function send_event, set_eventstatus, get_eventstatus\r\n\r\nVoid = set_eventstatus(0)\r\nVoid = send_event(@window, 'WRITE')\r\nErr = get_eventstatus()\r\nif Err else\r\n Void = send_event(@window, 'QBFNEXT')\r\nend\r\n\r\nRETURN 0"
|
|
}
|
|
}
|
|
} |