Filename
|
Line #
|
Column #
|
Match Text
|
./abl/checkout.p |
00100 |
00004 |
if [KW_IF] @100:4
expression [EXPRESSION] @0:0
not [KW_NOT] @100:7
avail [FUNC_LOGICAL] @100:11
checkout-room [TABLE] @100:17
then [KW_THEN] @100:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @100:36
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00120 |
00010 |
if [KW_IF] @120:10
expression [EXPRESSION] @0:0
and [KW_AND] @120:44
<> [NOT_EQ] @120:39
b-out-room.guest-ids [FIELD_INT] @120:13
[ [LBRACKET] @120:33
tid [VAR_INT] @120:34
? [UNKNOWN_VAL] @120:42
<> [NOT_EQ] @120:74
b-out-room.guest-ids [FIELD_INT] @120:48
[ [LBRACKET] @120:68
tid [VAR_INT] @120:69
0 [NUM_LITERAL] @120:77
then [KW_THEN] @121:13
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00137 |
00004 |
if [KW_IF] @137:4
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @137:7
checkout-room [TABLE] @137:13
then [KW_THEN] @137:27
inner block [INNER_BLOCK] @0:0
do [KW_DO] @137:32
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00150 |
00010 |
if [KW_IF] @150:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @150:13
guest [TABLE] @150:19
then [KW_THEN] @150:25
inner block [INNER_BLOCK] @0:0
do [KW_DO] @150:30
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00181 |
00004 |
if [KW_IF] @181:4
expression [EXPRESSION] @0:0
or [KW_OR] @181:18
= [EQUALS] @181:14
u-name [VAR_CHAR] @181:7
? [UNKNOWN_VAL] @181:16
= [EQUALS] @181:28
u-name [VAR_CHAR] @181:21
"" [STRING] @181:30
then [KW_THEN] @181:33
inner block [INNER_BLOCK] @0:0
do [KW_DO] @181:38
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00203 |
00010 |
if [KW_IF] @203:10
expression [EXPRESSION] @0:0
not [KW_NOT] @203:13
avail [FUNC_LOGICAL] @203:17
checkout [TABLE] @203:23
then [KW_THEN] @203:32
inner block [INNER_BLOCK] @0:0
do [KW_DO] @203:37
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00212 |
00010 |
if [KW_IF] @212:10
expression [EXPRESSION] @0:0
not [KW_NOT] @212:13
avail [FUNC_LOGICAL] @212:17
checkout [TABLE] @212:23
then [KW_THEN] @212:32
inner block [INNER_BLOCK] @0:0
do [KW_DO] @212:37
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00266 |
00013 |
if [KW_IF] @266:13
expression [EXPRESSION] @0:0
and [KW_AND] @266:42
and [KW_AND] @266:27
= [EQUALS] @266:22
g-f-n [VAR_CHAR] @266:16
"" [STRING] @266:24
= [EQUALS] @266:37
g-l-n [VAR_CHAR] @266:31
"" [STRING] @266:39
( [LPARENS] @266:46
or [KW_OR] @266:58
= [EQUALS] @266:54
g-room [VAR_INT] @266:47
0 [NUM_LITERAL] @266:56
= [EQUALS] @266:68
g-room [VAR_INT] @266:61
? [UNKNOWN_VAL] @266:70
then [KW_THEN] @267:13
inner block [INNER_BLOCK] @0:0
do [KW_DO] @267:18
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00272 |
00013 |
if [KW_IF] @272:13
expression [EXPRESSION] @0:0
> [GT] @272:23
g-room [VAR_INT] @272:16
0 [NUM_LITERAL] @272:25
then [KW_THEN] @272:27
inner block [INNER_BLOCK] @0:0
do [KW_DO] @272:32
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00274 |
00016 |
if [KW_IF] @274:16
expression [EXPRESSION] @0:0
not [KW_NOT] @274:19
avail [FUNC_LOGICAL] @274:23
b-out-room [BUFFER] @274:29
then [KW_THEN] @274:40
inner block [INNER_BLOCK] @0:0
do [KW_DO] @274:45
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00303 |
00010 |
if [KW_IF] @303:10
expression [EXPRESSION] @0:0
<> [NOT_EQ] @303:18
r-id [VAR_INT] @303:13
? [UNKNOWN_VAL] @303:21
then [KW_THEN] @303:23
inner block [INNER_BLOCK] @0:0
do [KW_DO] @303:28
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00317 |
00010 |
if [KW_IF] @317:10
expression [EXPRESSION] @0:0
not [KW_NOT] @317:13
avail [FUNC_LOGICAL] @317:17
reservation [TABLE] @317:23
then [KW_THEN] @317:35
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00349 |
00010 |
if [KW_IF] @349:10
expression [EXPRESSION] @0:0
not [KW_NOT] @349:13
avail [FUNC_LOGICAL] @349:17
checkout-room [TABLE] @349:23
then [KW_THEN] @349:37
inner block [INNER_BLOCK] @0:0
do [KW_DO] @349:42
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00357 |
00010 |
if [KW_IF] @357:10
expression [EXPRESSION] @0:0
not [KW_NOT] @357:13
avail [FUNC_LOGICAL] @357:17
checkout-room [TABLE] @357:23
then [KW_THEN] @357:37
inner block [INNER_BLOCK] @0:0
do [KW_DO] @357:42
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00369 |
00010 |
if [KW_IF] @369:10
expression [EXPRESSION] @0:0
<> [NOT_EQ] @369:23
selection [VAR_CHAR] @369:13
? [UNKNOWN_VAL] @369:26
then [KW_THEN] @369:28
inner block [INNER_BLOCK] @0:0
do [KW_DO] @369:33
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00378 |
00004 |
if [KW_IF] @378:4
expression [EXPRESSION] @0:0
<> [NOT_EQ] @378:13
sprog [VAR_CHAR] @378:7
? [UNKNOWN_VAL] @378:16
then [KW_THEN] @378:18
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/checkout.p |
00394 |
00001 |
if [KW_IF] @394:1
expression [EXPRESSION] @0:0
<> [NOT_EQ] @394:10
sprog [VAR_CHAR] @394:4
? [UNKNOWN_VAL] @394:13
then [KW_THEN] @394:15
inner block [INNER_BLOCK] @0:0
do [KW_DO] @394:20
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/exit.p |
00034 |
00004 |
if [KW_IF] @34:4
expression [EXPRESSION] @0:0
ne [NOT_EQ] @34:15
lastkey [VAR_INT] @34:7
-1 [NUM_LITERAL] @34:18
then [KW_THEN] @34:21
inner block [INNER_BLOCK] @0:0
do [KW_DO] @34:26
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/exit.p |
00035 |
00008 |
if [KW_IF] @35:8
expression [EXPRESSION] @0:0
= [EQUALS] @35:38
caps [FUNC_CHAR] @35:11
keyfunction [FUNC_CHAR] @35:16
lastkey [VAR_INT] @35:28
"Y" [STRING] @35:40
then [KW_THEN] @36:8
inner block [INNER_BLOCK] @0:0
do [KW_DO] @36:13
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @40:8
inner block [INNER_BLOCK] @0:0
do [KW_DO] @40:13
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00060 |
00004 |
if [KW_IF] @60:4
expression [EXPRESSION] @0:0
not [KW_NOT] @60:7
avail [FUNC_LOGICAL] @60:11
guest [TABLE] @60:17
then [KW_THEN] @60:24
inner block [INNER_BLOCK] @0:0
do [KW_DO] @60:29
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00092 |
00004 |
if [KW_IF] @92:4
expression [EXPRESSION] @0:0
or [KW_OR] @92:18
= [EQUALS] @92:14
u-name [VAR_CHAR] @92:7
? [UNKNOWN_VAL] @92:16
= [EQUALS] @92:28
u-name [VAR_CHAR] @92:21
"" [STRING] @92:30
then [KW_THEN] @92:33
inner block [INNER_BLOCK] @0:0
do [KW_DO] @92:38
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00113 |
00010 |
if [KW_IF] @113:10
expression [EXPRESSION] @0:0
not [KW_NOT] @113:13
avail [FUNC_LOGICAL] @113:17
guest [TABLE] @113:23
then [KW_THEN] @113:29
inner block [INNER_BLOCK] @0:0
do [KW_DO] @113:34
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00121 |
00010 |
if [KW_IF] @121:10
expression [EXPRESSION] @0:0
not [KW_NOT] @121:13
avail [FUNC_LOGICAL] @121:17
guest [TABLE] @121:23
then [KW_THEN] @121:29
inner block [INNER_BLOCK] @0:0
do [KW_DO] @121:34
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00165 |
00013 |
if [KW_IF] @165:13
expression [EXPRESSION] @0:0
and [KW_AND] @165:42
and [KW_AND] @165:27
= [EQUALS] @165:22
g-f-n [VAR_CHAR] @165:16
"" [STRING] @165:24
= [EQUALS] @165:37
g-l-n [VAR_CHAR] @165:31
"" [STRING] @165:39
= [EQUALS] @165:52
g-dob [VAR_DATE] @165:46
? [UNKNOWN_VAL] @165:54
then [KW_THEN] @166:13
inner block [INNER_BLOCK] @0:0
do [KW_DO] @166:18
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00176 |
00013 |
if [KW_IF] @176:13
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @176:16
b-guest [BUFFER] @176:22
then [KW_THEN] @176:30
inner block [INNER_BLOCK] @0:0
do [KW_DO] @176:35
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @181:13
inner block [INNER_BLOCK] @0:0
do [KW_DO] @181:18
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00192 |
00010 |
if [KW_IF] @192:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @192:13
guest [TABLE] @192:19
then [KW_THEN] @192:25
inner block [INNER_BLOCK] @0:0
do [KW_DO] @192:30
transaction [KW_TRANS] @192:33
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00279 |
00010 |
if [KW_IF] @279:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @279:13
guest [TABLE] @279:19
then [KW_THEN] @279:25
inner block [INNER_BLOCK] @0:0
U-GUEST [LABEL_DEF] @280:10
repeat [KW_REPEAT] @281:10
transaction [KW_TRANS] @281:17
on [KW_ON] @281:29
error [KW_ERROR] @281:32
undo [KW_UNDO] @281:38
leave [KW_LEAVE] @281:44
on [KW_ON] @282:29
endkey [KW_ENDKEY] @282:32
undo [KW_UNDO] @282:39
leave [KW_LEAVE] @282:45
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00286 |
00013 |
if [KW_IF] @286:13
expression [EXPRESSION] @0:0
= [EQUALS] @286:26
g-id-type [VAR_INT] @286:16
? [UNKNOWN_VAL] @286:28
then [KW_THEN] @286:30
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/guests.p |
00328 |
00010 |
if [KW_IF] @328:10
expression [EXPRESSION] @0:0
<> [NOT_EQ] @328:23
selection [VAR_CHAR] @328:13
? [UNKNOWN_VAL] @328:26
then [KW_THEN] @328:28
inner block [INNER_BLOCK] @0:0
do [KW_DO] @328:33
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/login.p |
00044 |
00004 |
if [KW_IF] @44:4
expression [EXPRESSION] @0:0
= [EQUALS] @44:13
uname [VAR_CHAR] @44:7
"quit" [STRING] @44:15
then [KW_THEN] @44:22
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/login.p |
00046 |
00004 |
if [KW_IF] @46:4
expression [EXPRESSION] @0:0
setuserid [FUNC_LOGICAL] @46:7
uname [VAR_CHAR] @46:17
upass [VAR_CHAR] @46:24
then [KW_THEN] @46:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @46:36
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @50:4
inner block [INNER_BLOCK] @0:0
do [KW_DO] @50:9
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/main.p |
00102 |
00004 |
if [KW_IF] @102:4
expression [EXPRESSION] @0:0
v-stop [VAR_LOGICAL] @102:7
then [KW_THEN] @102:14
inner block [INNER_BLOCK] @0:0
do [KW_DO] @102:19
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/main.p |
00104 |
00007 |
if [KW_IF] @104:7
expression [EXPRESSION] @0:0
prog-started [VAR_LOGICAL] @104:10
then [KW_THEN] @104:23
inner block [INNER_BLOCK] @0:0
do [KW_DO] @104:28
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @112:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @112:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/menu.p |
00028 |
00001 |
if [KW_IF] @28:1
expression [EXPRESSION] @0:0
or [KW_OR] @28:15
= [EQUALS] @28:11
u-name [VAR_CHAR] @28:4
? [UNKNOWN_VAL] @28:13
= [EQUALS] @28:25
u-name [VAR_CHAR] @28:18
"" [STRING] @28:27
then [KW_THEN] @28:30
inner block [INNER_BLOCK] @0:0
do [KW_DO] @28:35
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/menu.p |
00110 |
00004 |
if [KW_IF] @110:4
expression [EXPRESSION] @0:0
= [EQUALS] @110:19
frame-index [VAR_INT] @110:7
? [UNKNOWN_VAL] @110:21
then [KW_THEN] @110:23
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @111:4
inner block [INNER_BLOCK] @0:0
do [KW_DO] @111:9
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00061 |
00004 |
if [KW_IF] @61:4
expression [EXPRESSION] @0:0
or [KW_OR] @61:18
= [EQUALS] @61:14
u-name [VAR_CHAR] @61:7
? [UNKNOWN_VAL] @61:16
= [EQUALS] @61:28
u-name [VAR_CHAR] @61:21
"" [STRING] @61:30
then [KW_THEN] @61:33
inner block [INNER_BLOCK] @0:0
do [KW_DO] @61:38
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00090 |
00004 |
if [KW_IF] @90:4
expression [EXPRESSION] @0:0
output-to [VAR_LOGICAL] @90:7
then [KW_THEN] @91:4
inner block [INNER_BLOCK] @0:0
do [KW_DO] @91:9
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @182:4
inner block [INNER_BLOCK] @0:0
do [KW_DO] @182:9
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00093 |
00007 |
if [KW_IF] @93:7
expression [EXPRESSION] @0:0
by-floor [VAR_LOGICAL] @93:10
then [KW_THEN] @93:19
inner block [INNER_BLOCK] @0:0
do [KW_DO] @93:24
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @137:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @137:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00116 |
00016 |
if [KW_IF] @116:16
expression [EXPRESSION] @0:0
first-of [FUNC_LOGICAL] @116:19
t-room-type.type [FIELD_INT] @116:28
then [KW_THEN] @116:46
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00118 |
00016 |
if [KW_IF] @118:16
expression [EXPRESSION] @0:0
and [KW_AND] @118:30
= [EQUALS] @118:26
c-rate [VAR_DEC] @118:19
? [UNKNOWN_VAL] @118:28
>= [GTE] @118:48
rate.end-date [FIELD_DATE] @118:34
today [FUNC_DATE] @118:51
then [KW_THEN] @118:57
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00128 |
00016 |
if [KW_IF] @128:16
expression [EXPRESSION] @0:0
last-of [FUNC_LOGICAL] @128:19
t-room-type.type [FIELD_INT] @128:27
then [KW_THEN] @128:45
inner block [INNER_BLOCK] @0:0
do [KW_DO] @128:50
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00159 |
00016 |
if [KW_IF] @159:16
expression [EXPRESSION] @0:0
first-of [FUNC_LOGICAL] @159:19
t-floor.floor [FIELD_INT] @159:28
then [KW_THEN] @159:43
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00161 |
00016 |
if [KW_IF] @161:16
expression [EXPRESSION] @0:0
and [KW_AND] @161:30
= [EQUALS] @161:26
c-rate [VAR_DEC] @161:19
? [UNKNOWN_VAL] @161:28
>= [GTE] @161:48
rate.end-date [FIELD_DATE] @161:34
today [FUNC_DATE] @161:51
then [KW_THEN] @161:57
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00171 |
00016 |
if [KW_IF] @171:16
expression [EXPRESSION] @0:0
last-of [FUNC_LOGICAL] @171:19
t-floor.floor [FIELD_INT] @171:27
then [KW_THEN] @171:42
inner block [INNER_BLOCK] @0:0
do [KW_DO] @171:47
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00234 |
00007 |
if [KW_IF] @234:7
expression [EXPRESSION] @0:0
by-floor [VAR_LOGICAL] @234:10
then [KW_THEN] @234:19
inner block [INNER_BLOCK] @0:0
do [KW_DO] @234:24
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @237:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @237:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00241 |
00007 |
if [KW_IF] @241:7
expression [EXPRESSION] @0:0
by-floor [VAR_LOGICAL] @241:10
then [KW_THEN] @241:19
inner block [INNER_BLOCK] @0:0
do [KW_DO] @241:24
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @285:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @285:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00264 |
00016 |
if [KW_IF] @264:16
expression [EXPRESSION] @0:0
first-of [FUNC_LOGICAL] @264:19
t-room-type.type [FIELD_INT] @264:28
then [KW_THEN] @264:46
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00266 |
00016 |
if [KW_IF] @266:16
expression [EXPRESSION] @0:0
and [KW_AND] @266:30
= [EQUALS] @266:26
c-rate [VAR_DEC] @266:19
? [UNKNOWN_VAL] @266:28
>= [GTE] @266:48
rate.end-date [FIELD_DATE] @266:34
today [FUNC_DATE] @266:51
then [KW_THEN] @266:57
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00276 |
00016 |
if [KW_IF] @276:16
expression [EXPRESSION] @0:0
last-of [FUNC_LOGICAL] @276:19
t-room-type.type [FIELD_INT] @276:27
then [KW_THEN] @276:45
inner block [INNER_BLOCK] @0:0
do [KW_DO] @276:50
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00306 |
00016 |
if [KW_IF] @306:16
expression [EXPRESSION] @0:0
first-of [FUNC_LOGICAL] @306:19
t-floor.floor [FIELD_INT] @306:28
then [KW_THEN] @306:43
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00308 |
00016 |
if [KW_IF] @308:16
expression [EXPRESSION] @0:0
and [KW_AND] @308:30
= [EQUALS] @308:26
c-rate [VAR_DEC] @308:19
? [UNKNOWN_VAL] @308:28
>= [GTE] @308:48
rate.end-date [FIELD_DATE] @308:34
today [FUNC_DATE] @308:51
then [KW_THEN] @308:57
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates-report.p |
00318 |
00016 |
if [KW_IF] @318:16
expression [EXPRESSION] @0:0
last-of [FUNC_LOGICAL] @318:19
t-floor.floor [FIELD_INT] @318:27
then [KW_THEN] @318:42
inner block [INNER_BLOCK] @0:0
do [KW_DO] @318:47
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00079 |
00004 |
if [KW_IF] @79:4
expression [EXPRESSION] @0:0
or [KW_OR] @79:18
= [EQUALS] @79:14
u-name [VAR_CHAR] @79:7
? [UNKNOWN_VAL] @79:16
= [EQUALS] @79:28
u-name [VAR_CHAR] @79:21
"" [STRING] @79:30
then [KW_THEN] @79:33
inner block [INNER_BLOCK] @0:0
do [KW_DO] @79:38
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00135 |
00007 |
if [KW_IF] @135:7
expression [EXPRESSION] @0:0
or [KW_OR] @137:56
or [KW_OR] @136:19
or [KW_OR] @135:21
= [EQUALS] @135:17
f-from [VAR_INT] @135:10
? [UNKNOWN_VAL] @135:19
= [EQUALS] @136:15
f-to [VAR_INT] @136:10
? [UNKNOWN_VAL] @136:17
not [KW_NOT] @137:10
( [LPARENS] @137:13
and [KW_AND] @137:26
>= [GTE] @137:21
f-from [VAR_INT] @137:14
1 [NUM_LITERAL] @137:24
<= [LTE] @137:37
f-from [VAR_INT] @137:30
total-floor-no [VAR_INT] @137:40
not [KW_NOT] @138:10
( [LPARENS] @138:13
and [KW_AND] @138:24
>= [GTE] @138:19
f-to [VAR_INT] @138:14
1 [NUM_LITERAL] @138:22
<= [LTE] @138:33
f-to [VAR_INT] @138:28
total-floor-no [VAR_INT] @138:36
then [KW_THEN] @139:10
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00169 |
00007 |
if [KW_IF] @169:7
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @169:10
b-rate [BUFFER] @169:16
then [KW_THEN] @169:23
inner block [INNER_BLOCK] @0:0
do [KW_DO] @169:28
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @178:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @178:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00200 |
00004 |
if [KW_IF] @200:4
expression [EXPRESSION] @0:0
not [KW_NOT] @200:7
avail [FUNC_LOGICAL] @200:11
rate [TABLE] @200:17
then [KW_THEN] @200:23
inner block [INNER_BLOCK] @0:0
do [KW_DO] @200:28
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00206 |
00004 |
if [KW_IF] @206:4
expression [EXPRESSION] @0:0
< [LT] @206:21
rate.end-date [FIELD_DATE] @206:7
today [FUNC_DATE] @206:23
then [KW_THEN] @207:4
inner block [INNER_BLOCK] @0:0
do [KW_DO] @207:9
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00223 |
00007 |
if [KW_IF] @223:7
expression [EXPRESSION] @0:0
= [EQUALS] @223:17
r-rate [VAR_DEC] @223:10
rate.rate [FIELD_DEC] @223:19
then [KW_THEN] @223:29
inner block [INNER_BLOCK] @0:0
do [KW_DO] @223:34
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00227 |
00007 |
if [KW_IF] @227:7
expression [EXPRESSION] @0:0
>= [GTE] @227:26
rate.start-date [FIELD_DATE] @227:10
today [FUNC_DATE] @227:29
then [KW_THEN] @227:35
inner block [INNER_BLOCK] @0:0
do [KW_DO] @227:40
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @230:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @230:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rates.p |
00291 |
00001 |
if [KW_IF] @291:1
expression [EXPRESSION] @0:0
pop-prog [VAR_LOGICAL] @291:4
then [KW_THEN] @291:13
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00101 |
00004 |
if [KW_IF] @101:4
expression [EXPRESSION] @0:0
not [KW_NOT] @101:7
avail [FUNC_LOGICAL] @101:11
reservation [TABLE] @101:17
then [KW_THEN] @101:30
inner block [INNER_BLOCK] @0:0
do [KW_DO] @101:35
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00116 |
00004 |
if [KW_IF] @116:4
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @116:7
b-guest [BUFFER] @116:13
then [KW_THEN] @116:22
inner block [INNER_BLOCK] @0:0
do [KW_DO] @116:27
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @122:4
inner block [INNER_BLOCK] @0:0
do [KW_DO] @122:9
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00178 |
00007 |
if [KW_IF] @178:7
expression [EXPRESSION] @0:0
and [KW_AND] @178:36
and [KW_AND] @178:21
= [EQUALS] @178:16
g-f-n [VAR_CHAR] @178:10
"" [STRING] @178:18
= [EQUALS] @178:31
g-l-n [VAR_CHAR] @178:25
"" [STRING] @178:33
= [EQUALS] @178:46
g-dob [VAR_DATE] @178:40
? [UNKNOWN_VAL] @178:48
then [KW_THEN] @179:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @179:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00195 |
00010 |
if [KW_IF] @195:10
expression [EXPRESSION] @0:0
= [EQUALS] @195:24
t-f-guests [VAR_INT] @195:13
1 [NUM_LITERAL] @195:26
then [KW_THEN] @196:13
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @197:13
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00197 |
00018 |
if [KW_IF] @197:18
expression [EXPRESSION] @0:0
>= [GTE] @197:32
t-f-guests [VAR_INT] @197:21
2 [NUM_LITERAL] @197:35
then [KW_THEN] @197:37
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00200 |
00007 |
if [KW_IF] @200:7
expression [EXPRESSION] @0:0
> [GT] @200:21
t-f-guests [VAR_INT] @200:10
0 [NUM_LITERAL] @200:23
then [KW_THEN] @200:25
inner block [INNER_BLOCK] @0:0
do [KW_DO] @200:30
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @218:7
inner block [INNER_BLOCK] @0:0
do [KW_DO] @218:12
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00202 |
00010 |
if [KW_IF] @202:10
expression [EXPRESSION] @0:0
= [EQUALS] @202:24
t-f-guests [VAR_INT] @202:13
1 [NUM_LITERAL] @202:26
then [KW_THEN] @202:28
inner block [INNER_BLOCK] @0:0
do [KW_DO] @202:33
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00221 |
00010 |
if [KW_IF] @221:10
expression [EXPRESSION] @0:0
g-add [VAR_LOGICAL] @221:13
then [KW_THEN] @221:19
inner block [INNER_BLOCK] @0:0
do [KW_DO] @221:24
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00263 |
00004 |
if [KW_IF] @263:4
expression [EXPRESSION] @0:0
= [EQUALS] @263:26
: [COLON] @263:12
focus [SYS_HANDLE] @263:7
screen-value [ATTR_CHAR] @263:13
"?" [STRING] @263:28
then [KW_THEN] @263:32
inner block [INNER_BLOCK] @0:0
do [KW_DO] @263:37
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @270:4
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00266 |
00007 |
if [KW_IF] @266:7
expression [EXPRESSION] @0:0
= [EQUALS] @266:15
g-id [VAR_INT] @266:10
? [UNKNOWN_VAL] @266:17
then [KW_THEN] @266:19
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00272 |
00004 |
if [KW_IF] @272:4
expression [EXPRESSION] @0:0
<> [NOT_EQ] @272:12
g-id [VAR_INT] @272:7
0 [NUM_LITERAL] @272:15
then [KW_THEN] @272:17
inner block [INNER_BLOCK] @0:0
do [KW_DO] @272:22
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00279 |
00004 |
if [KW_IF] @279:4
expression [EXPRESSION] @0:0
= [EQUALS] @279:25
: [COLON] @279:11
g-id [WID_FILL_IN] @279:7
screen-value [ATTR_CHAR] @279:12
"?" [STRING] @279:27
then [KW_THEN] @279:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @279:36
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00294 |
00001 |
if [KW_IF] @294:1
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @294:4
reservation [TABLE] @294:10
then [KW_THEN] @294:22
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00299 |
00004 |
if [KW_IF] @299:4
expression [EXPRESSION] @0:0
or [KW_OR] @299:18
= [EQUALS] @299:14
u-name [VAR_CHAR] @299:7
? [UNKNOWN_VAL] @299:16
= [EQUALS] @299:28
u-name [VAR_CHAR] @299:21
"" [STRING] @299:30
then [KW_THEN] @299:33
inner block [INNER_BLOCK] @0:0
do [KW_DO] @299:38
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00321 |
00010 |
if [KW_IF] @321:10
expression [EXPRESSION] @0:0
not [KW_NOT] @321:13
avail [FUNC_LOGICAL] @321:17
reservation [TABLE] @321:23
then [KW_THEN] @321:35
inner block [INNER_BLOCK] @0:0
do [KW_DO] @321:40
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00325 |
00010 |
if [KW_IF] @325:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @325:13
reservation [TABLE] @325:19
then [KW_THEN] @325:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @325:36
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00332 |
00010 |
if [KW_IF] @332:10
expression [EXPRESSION] @0:0
not [KW_NOT] @332:13
avail [FUNC_LOGICAL] @332:17
reservation [TABLE] @332:23
then [KW_THEN] @332:35
inner block [INNER_BLOCK] @0:0
do [KW_DO] @332:40
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00336 |
00010 |
if [KW_IF] @336:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @336:13
reservation [TABLE] @336:19
then [KW_THEN] @336:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @336:36
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00344 |
00010 |
if [KW_IF] @344:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @344:13
reservation [TABLE] @344:19
then [KW_THEN] @344:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @344:36
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00352 |
00010 |
if [KW_IF] @352:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @352:13
reservation [TABLE] @352:19
then [KW_THEN] @352:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @352:36
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00385 |
00013 |
if [KW_IF] @385:13
expression [EXPRESSION] @0:0
and [KW_AND] @385:42
and [KW_AND] @385:27
= [EQUALS] @385:22
g-f-n [VAR_CHAR] @385:16
"" [STRING] @385:24
= [EQUALS] @385:37
g-l-n [VAR_CHAR] @385:31
"" [STRING] @385:39
= [EQUALS] @385:52
g-dob [VAR_DATE] @385:46
? [UNKNOWN_VAL] @385:54
then [KW_THEN] @386:13
inner block [INNER_BLOCK] @0:0
do [KW_DO] @386:18
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00406 |
00010 |
if [KW_IF] @406:10
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @406:13
reservation [TABLE] @406:19
then [KW_THEN] @406:31
inner block [INNER_BLOCK] @0:0
do [KW_DO] @406:36
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00483 |
00019 |
if [KW_IF] @483:19
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @483:22
b-guest [BUFFER] @483:28
then [KW_THEN] @483:36
inner block [INNER_BLOCK] @0:0
do [KW_DO] @483:41
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @495:19
inner block [INNER_BLOCK] @0:0
do [KW_DO] @495:24
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00529 |
00019 |
if [KW_IF] @529:19
expression [EXPRESSION] @0:0
<= [LTE] @529:46
- [MINUS] @529:34
total-rooms [VAR_INT] @529:22
res-rooms [VAR_INT] @529:36
0 [NUM_LITERAL] @529:49
then [KW_THEN] @529:51
inner block [INNER_BLOCK] @0:0
do [KW_DO] @529:56
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00543 |
00019 |
if [KW_IF] @543:19
expression [EXPRESSION] @0:0
not [KW_NOT] @543:22
l-r-add [VAR_LOGICAL] @543:26
then [KW_THEN] @543:34
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00550 |
00013 |
if [KW_IF] @550:13
expression [EXPRESSION] @0:0
r-del [VAR_LOGICAL] @550:16
then [KW_THEN] @550:22
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @551:16
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00568 |
00010 |
if [KW_IF] @568:10
expression [EXPRESSION] @0:0
<> [NOT_EQ] @568:31
reservation.state [FIELD_CHAR] @568:13
"P" [STRING] @568:34
then [KW_THEN] @568:38
inner block [INNER_BLOCK] @0:0
do [KW_DO] @568:43
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @571:10
inner block [INNER_BLOCK] @0:0
R-CHECKIN [LABEL_DEF] @572:10
do [KW_DO] @573:10
transaction [KW_TRANS] @573:13
on [KW_ON] @573:25
error [KW_ERROR] @573:28
undo [KW_UNDO] @573:34
leave [KW_LEAVE] @573:40
on [KW_ON] @574:25
endkey [KW_ENDKEY] @574:28
undo [KW_UNDO] @574:35
leave [KW_LEAVE] @574:41
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00624 |
00022 |
if [KW_IF] @624:22
expression [EXPRESSION] @0:0
r-ok [VAR_LOGICAL] @624:25
then [KW_THEN] @624:30
inner block [INNER_BLOCK] @0:0
do [KW_DO] @624:35
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @627:22
inner block [INNER_BLOCK] @0:0
do [KW_DO] @627:27
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00632 |
00019 |
if [KW_IF] @632:19
expression [EXPRESSION] @0:0
not [KW_NOT] @632:22
avail [FUNC_LOGICAL] @632:26
b-room [BUFFER] @632:32
then [KW_THEN] @632:39
inner block [INNER_BLOCK] @0:0
do [KW_DO] @632:44
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00645 |
00022 |
if [KW_IF] @645:22
expression [EXPRESSION] @0:0
not [KW_NOT] @645:25
avail [FUNC_LOGICAL] @645:29
b-rate [BUFFER] @645:35
then [KW_THEN] @645:42
inner block [INNER_BLOCK] @0:0
do [KW_DO] @645:47
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00652 |
00022 |
if [KW_IF] @652:22
expression [EXPRESSION] @0:0
not [KW_NOT] @652:25
avail [FUNC_LOGICAL] @652:29
b-rate [BUFFER] @652:35
then [KW_THEN] @652:42
inner block [INNER_BLOCK] @0:0
do [KW_DO] @652:47
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @656:22
inner block [INNER_BLOCK] @0:0
do [KW_DO] @656:27
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00679 |
00010 |
if [KW_IF] @679:10
expression [EXPRESSION] @0:0
= [EQUALS] @679:31
reservation.state [FIELD_CHAR] @679:13
"P" [STRING] @679:33
then [KW_THEN] @680:10
inner block [INNER_BLOCK] @0:0
do [KW_DO] @680:15
transaction [KW_TRANS] @680:18
on [KW_ON] @680:30
error [KW_ERROR] @680:33
undo [KW_UNDO] @680:39
leave [KW_LEAVE] @680:45
on [KW_ON] @681:28
endkey [KW_ENDKEY] @681:31
undo [KW_UNDO] @681:38
leave [KW_LEAVE] @681:44
block CONTENTS REMOVED... [BLOCK] @0:0
else [KW_ELSE] @690:10
inner block [INNER_BLOCK] @0:0
do [KW_DO] @690:15
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00683 |
00013 |
if [KW_IF] @683:13
expression [EXPRESSION] @0:0
l-res-cancel [VAR_LOGICAL] @683:16
then [KW_THEN] @683:29
inner block [INNER_BLOCK] @0:0
do [KW_DO] @683:34
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00698 |
00010 |
if [KW_IF] @698:10
expression [EXPRESSION] @0:0
l-res-del [VAR_LOGICAL] @698:13
then [KW_THEN] @698:23
inner block [INNER_BLOCK] @0:0
do [KW_DO] @698:28
transaction [KW_TRANS] @698:31
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00716 |
00010 |
if [KW_IF] @716:10
expression [EXPRESSION] @0:0
<> [NOT_EQ] @716:23
selection [VAR_CHAR] @716:13
? [UNKNOWN_VAL] @716:26
then [KW_THEN] @716:28
inner block [INNER_BLOCK] @0:0
do [KW_DO] @716:33
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00725 |
00004 |
if [KW_IF] @725:4
expression [EXPRESSION] @0:0
<> [NOT_EQ] @725:13
sprog [VAR_CHAR] @725:7
? [UNKNOWN_VAL] @725:16
then [KW_THEN] @725:18
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/reservations.p |
00741 |
00001 |
if [KW_IF] @741:1
expression [EXPRESSION] @0:0
<> [NOT_EQ] @741:10
sprog [VAR_CHAR] @741:4
? [UNKNOWN_VAL] @741:13
then [KW_THEN] @741:15
inner block [INNER_BLOCK] @0:0
do [KW_DO] @741:20
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rooms-add.p |
00047 |
00004 |
if [KW_IF] @47:4
expression [EXPRESSION] @0:0
> [GT] @47:16
start-no [VAR_INT] @47:7
end-no [VAR_INT] @47:18
then [KW_THEN] @47:25
inner block [INNER_BLOCK] @0:0
do [KW_DO] @47:30
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rooms-add.p |
00064 |
00007 |
if [KW_IF] @64:7
expression [EXPRESSION] @0:0
avail [FUNC_LOGICAL] @64:10
room [TABLE] @64:16
then [KW_THEN] @64:21
inner block [INNER_BLOCK] @0:0
do [KW_DO] @64:26
block CONTENTS REMOVED... [BLOCK] @0:0
|
./abl/rooms-overview.p |
00028 |
00001 |
if [KW_IF] @28:1
expression [EXPRESSION] @0:0
or [KW_OR] @28:15
= [EQUALS] @28:11
u-name [VAR_CHAR] @28:4
? [UNKNOWN_VAL] @28:13
= [EQUALS] @28:25
u-name [VAR_CHAR] @28:18
"" [STRING] @28:27
then [KW_THEN] @28:30
inner block [INNER_BLOCK] @0:0
do [KW_DO] @28:35
block CONTENTS REMOVED... [BLOCK] @0:0
|