Terminals unused in grammar LOW_PREC ZERONUM COMMENTING END_OF_PAGE ONLY PADDING PROCEED TOKDUMMY State 136 conflicts: 7 shift/reduce State 151 conflicts: 2 shift/reduce State 165 conflicts: 7 shift/reduce State 172 conflicts: 1 shift/reduce State 242 conflicts: 2 shift/reduce State 288 conflicts: 2 shift/reduce State 305 conflicts: 1 shift/reduce State 391 conflicts: 1 shift/reduce State 397 conflicts: 1 shift/reduce State 408 conflicts: 1 shift/reduce State 410 conflicts: 1 shift/reduce State 414 conflicts: 1 shift/reduce State 436 conflicts: 1 shift/reduce State 456 conflicts: 1 shift/reduce State 461 conflicts: 1 shift/reduce State 471 conflicts: 2 reduce/reduce State 474 conflicts: 2 shift/reduce State 485 conflicts: 1 shift/reduce State 495 conflicts: 1 shift/reduce State 544 conflicts: 2 shift/reduce State 567 conflicts: 1 shift/reduce State 574 conflicts: 1 shift/reduce State 609 conflicts: 1 shift/reduce State 640 conflicts: 45 shift/reduce State 649 conflicts: 1 shift/reduce State 669 conflicts: 2 shift/reduce State 695 conflicts: 1 shift/reduce State 702 conflicts: 1 shift/reduce State 717 conflicts: 1 shift/reduce State 719 conflicts: 1 shift/reduce State 720 conflicts: 1 shift/reduce State 721 conflicts: 1 shift/reduce State 736 conflicts: 1 shift/reduce State 753 conflicts: 1 shift/reduce State 756 conflicts: 2 shift/reduce State 765 conflicts: 1 shift/reduce State 784 conflicts: 1 shift/reduce State 817 conflicts: 1 shift/reduce State 832 conflicts: 1 shift/reduce State 833 conflicts: 2 shift/reduce State 848 conflicts: 1 shift/reduce State 857 conflicts: 1 shift/reduce State 859 conflicts: 1 shift/reduce State 948 conflicts: 2 shift/reduce State 952 conflicts: 1 shift/reduce State 956 conflicts: 1 shift/reduce State 988 conflicts: 1 shift/reduce State 999 conflicts: 1 shift/reduce State 1018 conflicts: 1 shift/reduce State 1019 conflicts: 2 shift/reduce State 1052 conflicts: 1 shift/reduce State 1053 conflicts: 1 shift/reduce State 1098 conflicts: 1 shift/reduce State 1144 conflicts: 1 shift/reduce State 1166 conflicts: 1 shift/reduce State 1187 conflicts: 1 shift/reduce State 1200 conflicts: 1 shift/reduce State 1202 conflicts: 1 shift/reduce State 1225 conflicts: 1 shift/reduce State 1232 conflicts: 1 shift/reduce State 1253 conflicts: 1 shift/reduce State 1254 conflicts: 1 shift/reduce State 1255 conflicts: 1 shift/reduce State 1269 conflicts: 1 shift/reduce State 1300 conflicts: 1 shift/reduce State 1326 conflicts: 1 shift/reduce State 1335 conflicts: 1 shift/reduce State 1338 conflicts: 1 shift/reduce State 1351 conflicts: 1 shift/reduce State 1392 conflicts: 1 shift/reduce State 1401 conflicts: 1 shift/reduce State 1474 conflicts: 1 shift/reduce State 1485 conflicts: 1 shift/reduce State 1514 conflicts: 1 shift/reduce State 1523 conflicts: 2 shift/reduce State 1536 conflicts: 2 shift/reduce State 1603 conflicts: 1 shift/reduce State 1604 conflicts: 1 shift/reduce State 1644 conflicts: 1 shift/reduce State 1667 conflicts: 2 shift/reduce State 1668 conflicts: 1 shift/reduce State 1669 conflicts: 2 shift/reduce State 1688 conflicts: 1 shift/reduce State 1690 conflicts: 1 shift/reduce State 1735 conflicts: 18 shift/reduce State 1805 conflicts: 19 shift/reduce State 1827 conflicts: 1 shift/reduce State 1877 conflicts: 1 shift/reduce Grammar 0 $accept: root_ $end 1 root_: program_sequences 2 program_sequences: program 3 | program_sequence 4 | program_sequence program 5 program_sequence: program end_program 6 $@1: /* empty */ 7 program_sequence: program $@1 program_sequence end_program 8 | program_sequence program end_program 9 $@2: /* empty */ 10 end_program: END PROGRAM $@2 IDSTRING 11 program: identification_division environment_division_opt data_division_opt procedure_division_opt 12 $@3: /* empty */ 13 $@4: /* empty */ 14 $@5: /* empty */ 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt 16 programid_opts_opt: /* empty */ 17 | is_opt INITIAL_TOK programid_program_opt 18 | is_opt COMMON programid_program_opt 19 programid_program_opt: /* empty */ 20 | PROGRAM 21 identification_division_options_opt: /* empty */ 22 | identification_division_options_opt identification_division_option 23 identification_division_option: AUTHOR PERIOD_TOK 24 | DATE_WRITTEN PERIOD_TOK 25 | DATE_COMPILED PERIOD_TOK 26 | INSTALLATION PERIOD_TOK 27 | SECURITY PERIOD_TOK 28 $@6: /* empty */ 29 environment_division_opt: ENVIRONMENT DIVISION PERIOD_TOK $@6 configuration_opt input_output_opt 30 | /* empty */ 31 configuration_opt: CONFIGURATION SECTION PERIOD_TOK configuration_section 32 | /* empty */ 33 configuration_section: configuration_section configuration_option 34 | /* empty */ 35 $@7: /* empty */ 36 configuration_option: SOURCE_COMPUTER PERIOD_TOK $@7 STRING debug_mode_opt PERIOD_TOK 37 $@8: /* empty */ 38 configuration_option: OBJECT_COMPUTER PERIOD_TOK $@8 STRING program_collating_opt PERIOD_TOK 39 | SPECIAL_NAMES PERIOD_TOK special_names_opt 40 | error 41 program_collating_opt: PROGRAM collating_sequence 42 | /* empty */ 43 collating_sequence: collating_opt SEQUENCE is_opt STRING 44 collating_opt: COLLATING 45 | /* empty */ 46 debug_mode_opt: with_opt DEBUGGING MODE 47 | /* empty */ 48 special_names_opt: /* empty */ 49 | special_names PERIOD_TOK 50 | error 51 special_names: special_name 52 | special_names special_name 53 special_name: switches_details_list 54 | alphabet_details 55 | currency_details 56 | decimal_point_details 57 | screen_status_details 58 | cursor_details 59 | special_name_class 60 currency_details: CURRENCY sign_opt is_opt CLITERAL 61 sign_opt: SIGN 62 | /* empty */ 63 special_name_class: CLASS STRING is_opt special_name_class_item_list 64 special_name_class_item_list: special_name_class_item 65 | special_name_class_item_list special_name_class_item 66 special_name_class_item: CLITERAL 67 | CLITERAL THRU CLITERAL 68 decimal_point_details: DECIMAL_POINT is_opt COMMA 69 screen_status_details: DISPLAY_SCREEN STATUS is_opt STRING 70 cursor_details: CURSOR is_opt STRING 71 switches_details_list: /* empty */ 72 | switches_details_list switches_details 73 $@9: /* empty */ 74 switches_details: STRING is_opt STRING $@9 switch_on_opt switch_off_opt 75 switch_on_opt: ON status_opt is_opt STRING 76 | /* empty */ 77 switch_off_opt: OFF status_opt is_opt STRING 78 | /* empty */ 79 status_opt: STATUS 80 | /* empty */ 81 alphabet_details: ALPHABET STRING is_opt alphabet_type 82 alphabet_type: NATIVE 83 | STANDARD_1 84 | STANDARD_2 85 | alphabet_literal_list 86 alphabet_literal_list: alphabet_literal_item 87 | alphabet_literal_list alphabet_literal_item 88 alphabet_literal_item: without_all_literal 89 | without_all_literal THRU without_all_literal 90 | without_all_literal alphabet_also_list 91 alphabet_also_list: ALSO without_all_literal 92 | alphabet_also_list ALSO without_all_literal 93 input_output_opt: INPUT_OUTPUT SECTION PERIOD_TOK input_output_section 94 | /* empty */ 95 input_output_section: file_control_paragraph i_o_control_paragraph 96 | error 97 file_control_paragraph: FILE_CONTROL PERIOD_TOK file_control 98 i_o_control_paragraph: /* empty */ 99 | I_O_CONTROL PERIOD_TOK i_o_control_opt 100 file_control: file_select 101 | file_control file_select 102 $@10: /* empty */ 103 file_select: SELECT optional_opt def_name $@10 select_clauses PERIOD_TOK 104 select_clauses: select_clauses select_clause 105 | /* empty */ 106 select_clause: organization_opt is_opt organization_options 107 | ASSIGN to_opt assign_clause 108 | ACCESS mode_opt is_opt access_options 109 | file_opt STATUS is_opt STRING 110 | RECORD key_opt is_opt STRING 111 | RELATIVE key_opt is_opt STRING 112 | ALTERNATE RECORD key_opt is_opt STRING with_duplicates 113 | RESERVE NLITERAL areas_opt 114 | error 115 file_opt: FILE_TOK 116 | /* empty */ 117 organization_opt: ORGANIZATION 118 | /* empty */ 119 assign_clause: PORTNUM 120 | filename 121 | PORTNUM filename 122 | EXTERNAL filename 123 | error 124 with_duplicates: with_opt DUPLICATES 125 | /* empty */ 126 optional_opt: OPTIONAL 127 | /* empty */ 128 areas_opt: AREA 129 | AREAS 130 | /* empty */ 131 is_opt: IS 132 | /* empty */ 133 are_opt: ARE 134 | /* empty */ 135 mode_opt: MODE 136 | /* empty */ 137 organization_options: INDEXED 138 | SEQUENTIAL 139 | RELATIVE 140 | LINE SEQUENTIAL 141 | anystring 142 access_options: SEQUENTIAL 143 | DYNAMIC 144 | RANDOM 145 | anystring 146 i_o_control_opt: /* empty */ 147 | i_o_control_list PERIOD_TOK 148 i_o_control_list: i_o_control_clause 149 | i_o_control_list i_o_control_clause 150 i_o_control_clause: i_o_control_same_clause 151 | i_o_control_multiple_file_tape_clause 152 i_o_control_same_clause: SAME same_clause_options are_opta for_opt string_list 153 same_clause_options: /* empty */ 154 | RECORD 155 | SORT 156 | SORT_MERGE 157 i_o_control_multiple_file_tape_clause: MULTIPLE FILE_TOK tape_opt contains_opt i_o_control_multiple_file_list 158 i_o_control_multiple_file_list: i_o_control_multiple_file 159 | i_o_control_multiple_file_list i_o_control_multiple_file 160 i_o_control_multiple_file: STRING i_o_control_multiple_file_position_opt 161 i_o_control_multiple_file_position_opt: /* empty */ 162 | POSITION integer 163 tape_opt: TAPE 164 | /* empty */ 165 are_opta: AREA 166 | /* empty */ 167 for_opt: FOR 168 | /* empty */ 169 string_list: STRING 170 | string_list STRING 171 | error 172 name_list: variable 173 | name_list variable 174 | error 175 $@11: /* empty */ 176 data_division_opt: DATA DIVISION PERIOD_TOK $@11 file_section_opt working_storage_opt linkage_section_opt report_section_opt screen_section_opt 177 | /* empty */ 178 $@12: /* empty */ 179 file_section_opt: FILE_TOK SECTION PERIOD_TOK $@12 file_section 180 | /* empty */ 181 $@13: /* empty */ 182 working_storage_opt: WORKING_STORAGE SECTION PERIOD_TOK $@13 working_storage_section 183 | /* empty */ 184 $@14: /* empty */ 185 linkage_section_opt: LINKAGE SECTION PERIOD_TOK $@14 linkage_section 186 | /* empty */ 187 report_section_opt: REPORT SECTION PERIOD_TOK report_sections 188 | /* empty */ 189 report_sections: report_sections report_section 190 | /* empty */ 191 $@15: /* empty */ 192 $@16: /* empty */ 193 $@17: /* empty */ 194 report_section: RD $@15 STRING $@16 report_controls PERIOD_TOK $@17 report_description 195 report_controls: /* empty */ 196 | report_controls report_control 197 report_control: is_opt GLOBAL 198 | CODE gliteral 199 | report_controls_control 200 | report_controls_page 201 report_controls_control: control_is_are final_opt report_break_list 202 report_controls_page: PAGE limit_is_are_opt integer line_lines_opt heading_opt first_detail_opt last_detail_opt footing_opt 203 heading_opt: /* empty */ 204 | HEADING is_opt integer 205 line_lines_opt: lines_opt 206 | LINE 207 lines_opt: /* empty */ 208 | LINES 209 control_is_are: CONTROL is_opt 210 | CONTROLS are_opt 211 limit_is_are_opt: /* empty */ 212 | LIMIT IS 213 | LIMITS ARE 214 footing_opt: /* empty */ 215 | FOOTING is_opt integer 216 last_detail_opt: /* empty */ 217 | LAST DETAIL is_opt integer 218 first_detail_opt: /* empty */ 219 | FIRST DETAIL is_opt integer 220 final_opt: /* empty */ 221 | FINAL 222 report_break_list: /* empty */ 223 | report_break_list name 224 report_description: report_item 225 | report_description report_item 226 $@18: /* empty */ 227 report_item: integer def_name_opt $@18 report_clauses PERIOD_TOK 228 report_clauses: report_clause 229 | report_clauses report_clause 230 report_clause: report_clause_line 231 | report_clause_next_group 232 | report_clause_type 233 | report_clause_usage_display 234 | report_clause_picture 235 | report_clause_sign_is 236 | report_clause_justified 237 | report_clause_blank_zero 238 | report_clause_column 239 | report_clause_svs 240 | report_clause_group_indicate 241 report_clause_type: TYPE is_opt report_clause_type2 242 report_clause_type2: REPORT HEADING 243 | PAGE HEADING 244 $@19: /* empty */ 245 report_clause_type2: CONTROL HEADING $@19 name_final_opt 246 | DETAIL 247 $@20: /* empty */ 248 report_clause_type2: CONTROL FOOTING $@20 name_final_opt 249 | PAGE FOOTING 250 | REPORT FOOTING 251 | RH 252 | PH 253 $@21: /* empty */ 254 report_clause_type2: CH $@21 name_final_opt 255 | DE 256 $@22: /* empty */ 257 report_clause_type2: CF $@22 name_final_opt 258 | PF 259 | RF 260 report_clause_sign_is: SIGN is_opt leading_trailing SEPARATE character_opt 261 | leading_trailing SEPARATE character_opt 262 $@23: /* empty */ 263 report_clause_picture: PICTURE $@23 is_opt picture 264 report_clause_usage_display: USAGE is_opt DISPLAY 265 | DISPLAY 266 report_clause_justified: JUSTIFIED right_opt 267 report_clause_next_group: NEXT GROUP is_opt integer_on_next_page 268 report_clause_line: report_clause_line_is integer ON NEXT PAGE 269 | report_clause_line_is integer NEXT PAGE 270 | report_clause_line_is integer 271 | report_clause_line_is PLUS integer 272 report_clause_line_is: LINE is_are_opt 273 | LINE NUMBER is_opt 274 | LINE NUMBERS are_opt 275 | LINES are_opt 276 report_clause_column: report_clause_column_is integer 277 report_clause_column_is: COLUMN report_clause_column_orientation is_are_opt 278 | COLUMN NUMBER report_clause_column_orientation is_opt 279 | COLUMN NUMBERS report_clause_column_orientation are_opt 280 | COLUMNS report_clause_column_orientation are_opt 281 report_clause_column_orientation: /* empty */ 282 | LEFT 283 | CENTER 284 | RIGHT 285 is_are_opt: /* empty */ 286 | IS 287 | ARE 288 $@24: /* empty */ 289 report_clause_svs: SOURCE $@24 is_opt gname_page_counter 290 | VALUE is_opt literal 291 $@25: /* empty */ 292 $@26: /* empty */ 293 report_clause_svs: SUM $@25 gname_list $@26 upon_opt reset_opt 294 gname_page_counter: gname 295 | PAGE_COUNTER 296 report_clause_group_indicate: /* empty */ 297 | GROUP indicate_opt 298 report_clause_blank_zero: BLANK when_opt ZERO 299 indicate_opt: /* empty */ 300 | INDICATE 301 upon_opt: /* empty */ 302 | UPON gname_list 303 reset_opt: /* empty */ 304 | RESET gname 305 | RESET FINAL 306 number_opt: /* empty */ 307 | NUMBER 308 leading_trailing: LEADING 309 | TRAILING 310 right_opt: /* empty */ 311 | RIGHT 312 name_final_opt: gname 313 | FINAL 314 integer_on_next_page: integer 315 | PLUS integer 316 | NEXT PAGE 317 of_opt: OF 318 | /* empty */ 319 $@27: /* empty */ 320 screen_section_opt: SCREEN SECTION PERIOD_TOK $@27 screen_section 321 | /* empty */ 322 screen_section: screen_section screen_item 323 | /* empty */ 324 $@28: /* empty */ 325 screen_item: integer def_name_opt $@28 screen_clauses PERIOD_TOK 326 $@29: /* empty */ 327 screen_clauses: screen_clauses LINE $@29 number_is_opt plus_minus_opt name_or_lit 328 $@30: /* empty */ 329 screen_clauses: screen_clauses COLUMN $@30 number_is_opt plus_minus_opt name_or_lit 330 | screen_clauses with_opt screen_attrib 331 $@31: /* empty */ 332 screen_clauses: screen_clauses with_opt FOREGROUNDCOLOR $@31 name_or_lit 333 $@32: /* empty */ 334 screen_clauses: screen_clauses with_opt BACKGROUNDCOLOR $@32 name_or_lit 335 $@33: /* empty */ 336 screen_clauses: screen_clauses with_opt COLOR $@33 name_or_lit 337 | screen_clauses screen_source_destination 338 | screen_clauses value_is_are gliteral 339 | screen_clauses pictures 340 $@34: /* empty */ 341 screen_clauses: screen_clauses SIZE $@34 name_or_lit 342 | /* empty */ 343 $@35: /* empty */ 344 screen_source_destination: USING $@35 name_or_lit 345 $@36: /* empty */ 346 screen_source_destination: FROM $@36 name_or_lit screen_to_name 347 $@37: /* empty */ 348 screen_source_destination: TO $@37 name 349 screen_to_name: /* empty */ 350 | TO name 351 screen_attrib: BLANK SCREEN 352 | BLANK LINE 353 | ERASE EOL 354 | ERASE EOS 355 | ERASE 356 | with_opt BELL 357 | sign_clause 358 | FULL 359 | REQUIRED 360 | SECURE 361 | AUTO 362 | JUSTIFIED RIGHT 363 | JUSTIFIED LEFT 364 | BLINK 365 | REVERSEVIDEO 366 | UNDERLINE 367 | LOWLIGHT 368 | HIGHLIGHT 369 | BLANK when_opt ZERO 370 | with_opt NOECHO 371 | with_opt UPDATE 372 | with_opt NO ADVANCING 373 | UPPER 374 | LOWER 375 screen_attribx: BLANK SCREEN 376 | BLANK LINE 377 | ERASE EOL 378 | ERASE EOS 379 | ERASE 380 | with_opt BELL 381 | sign_clause 382 | FULL 383 | REQUIRED 384 | SECURE 385 | AUTO 386 | JUSTIFIED RIGHT 387 | JUSTIFIED LEFT 388 | BLINK 389 | REVERSEVIDEO 390 | UNDERLINE 391 | LOWLIGHT 392 | HIGHLIGHT 393 | BLANK when_opt ZERO 394 | with_opt NOECHO 395 | with_opt UPDATE 396 | with_opt NO ADVANCING 397 | UPPER 398 | LOWER 399 | FOREGROUNDCOLOR integer 400 | BACKGROUNDCOLOR integer 401 sign_clause: sign_is_opt LEADING separate_opt 402 | sign_is_opt TRAILING separate_opt 403 separate_opt: SEPARATE character_opt 404 | /* empty */ 405 character_opt: CHARACTER 406 | /* empty */ 407 sign_is_opt: SIGN is_opt 408 | is_opt 409 plus_minus_opt: PLUS 410 | '+' 411 | MINUS 412 | '-' 413 | /* empty */ 414 number_is_opt: NUMBER is_opt 415 | /* empty */ 416 $@38: /* empty */ 417 $@39: /* empty */ 418 $@40: /* empty */ 419 file_section: file_section FD $@38 STRING $@39 file_description_fd_clauses PERIOD_TOK $@40 file_description 420 $@41: /* empty */ 421 $@42: /* empty */ 422 $@43: /* empty */ 423 file_section: file_section SD $@41 STRING $@42 file_description_sd_clauses PERIOD_TOK $@43 file_description 424 | error 425 | /* empty */ 426 file_description: field_description 427 | file_description field_description 428 $@44: /* empty */ 429 field_description: integer def_name_opt $@44 data_clauses PERIOD_TOK 430 data_clauses: /* empty */ 431 | data_clauses data_clause 432 | data_clauses redefines_clause 433 $@45: /* empty */ 434 redefines_clause: REDEFINES $@45 redefines_var 435 redefines_var: VARIABLE 436 | SUBSCVAR 437 data_clause: array_options 438 | pictures 439 | usage_option 440 | sign_clause 441 | value_option 442 | SYNCHRONIZED sync_options 443 | JUSTIFIED sync_options 444 | is_opt EXTERNAL 445 | is_opt GLOBAL 446 | BLANK when_opt ZERO 447 $@46: /* empty */ 448 data_clause: RENAMES $@46 variable thru_gname_opt 449 sync_options: /* empty */ 450 | LEFT 451 | RIGHT 452 thru_gname_opt: /* empty */ 453 | THRU variable 454 $@47: /* empty */ 455 array_options: OCCURS integer times_opt $@47 indexed_by_opt 456 $@48: /* empty */ 457 $@49: /* empty */ 458 array_options: OCCURS integer TO integer times_opt DEPENDING $@48 on_opt gname $@49 indexed_by_opt 459 key_is_opt: DIRECTION key_opt is_opt STRING 460 | /* empty */ 461 indexed_by_opt: key_is_opt INDEXED by_opt index_name_list 462 | /* empty */ 463 index_name_list: def_name 464 | index_name_list def_name 465 usage_option: usage_opt is_opt usage 466 usage: USAGENUM 467 | DISPLAY 468 | POINTER 469 value_option: value_is_are value_list 470 value_is_are: VALUE is_opt 471 | VALUES are_opt 472 value_list: value 473 | value_list comma_opt value 474 value: gliteral 475 | gliteral THRU gliteral 476 $@50: /* empty */ 477 pictures: PICTURE $@50 is_opt picture 478 picture: /* empty */ 479 | picture pic_elem 480 pic_elem: CHAR multiplier_opt 481 multiplier_opt: /* empty */ 482 | MULTIPLIER 483 file_description_fd_clauses: /* empty */ 484 | file_description_fd_clauses file_description_fd_clause 485 file_description_sd_clauses: /* empty */ 486 | file_description_sd_clauses file_description_sd_clause 487 file_description_fd_clause: is_opt EXTERNAL 488 | is_opt GLOBAL 489 | file_description_clause_block 490 | file_description_clause_record 491 | file_description_clause_label 492 | file_description_clause_value 493 | file_description_clause_data 494 | file_description_clause_report 495 | file_description_clause_linage 496 | file_description_clause_code_set 497 file_description_sd_clause: file_description_clause_record 498 | file_description_clause_data 499 file_description_clause_block: BLOCK contains_opt integer to_integer_opt chars_or_recs_opt 500 file_description_clause_record: RECORD contains_opt integer to_rec_varying character_opts 501 | RECORD is_opt VARYING in_opt size_opt from_rec_varying to_rec_varying character_opts depend_rec_varying 502 file_description_clause_label: LABEL record_is_are std_or_omitt 503 file_description_clause_value: VALUE OF FILE_ID is_opt filename 504 file_description_clause_data: DATA record_is_are var_strings 505 file_description_clause_report: report_is_are STRING 506 file_description_clause_code_set: CODE_SET is_opt STRING 507 file_description_clause_linage: LINAGE is_opt data_name lines_opt file_description_clause_linage_footing file_description_clause_linage_top file_description_clause_linage_bottom 508 file_description_clause_linage_footing: /* empty */ 509 | with_opt FOOTING at_opt data_name 510 file_description_clause_linage_top: /* empty */ 511 | lines_at_opt TOP data_name 512 file_description_clause_linage_bottom: /* empty */ 513 | lines_at_opt BOTTOM data_name 514 lines_at_opt: /* empty */ 515 | LINES 516 | LINES AT 517 | AT 518 report_is_are: REPORT is_opt 519 | REPORTS are_opt 520 var_strings: STRING 521 | var_strings STRING 522 chars_or_recs_opt: /* empty */ 523 | CHARACTERS 524 | RECORDS 525 to_integer_opt: /* empty */ 526 | TO integer 527 depend_rec_varying: /* empty */ 528 | DEPENDING on_opt STRING 529 from_rec_varying: /* empty */ 530 | from_opt nliteral 531 from_opt: FROM 532 | /* empty */ 533 to_rec_varying: /* empty */ 534 | TO nliteral 535 record_is_are: RECORD is_opt 536 | RECORDS are_opt 537 std_or_omitt: STANDARD 538 | OMITTED 539 usage_opt: /* empty */ 540 | USAGE 541 times_opt: /* empty */ 542 | TIMES 543 when_opt: /* empty */ 544 | WHEN 545 contains_opt: /* empty */ 546 | CONTAINS 547 character_opts: /* empty */ 548 | CHARACTERS 549 order_opt: /* empty */ 550 | ORDER 551 data_opt: /* empty */ 552 | DATA 553 working_storage_section: working_storage_section field_description 554 | /* empty */ 555 linkage_section: /* empty */ 556 | linkage_section field_description 557 $@51: /* empty */ 558 $@52: /* empty */ 559 procedure_division_opt: PROCEDURE DIVISION $@51 using_parameters PERIOD_TOK $@52 declaratives_opt procedure_division 560 | /* empty */ 561 procedure_division: /* empty */ 562 | procedure_division procedure_decl 563 procedure_decl: procedure_section 564 | paragraph 565 $@53: /* empty */ 566 procedure_decl: $@53 statements PERIOD_TOK 567 $@54: /* empty */ 568 procedure_decl: error $@54 PERIOD_TOK 569 | PERIOD_TOK 570 $@55: /* empty */ 571 declaratives_opt: DECLARATIVES PERIOD_TOK $@55 declaratives_procedure declaratives_division END DECLARATIVES PERIOD_TOK 572 | /* empty */ 573 declaratives_division: /* empty */ 574 | declaratives_division declaratives_decl 575 declaratives_decl: declaratives_procedure 576 | paragraph 577 $@56: /* empty */ 578 declaratives_decl: $@56 statements PERIOD_TOK 579 $@57: /* empty */ 580 declaratives_decl: error $@57 PERIOD_TOK 581 $@58: /* empty */ 582 declaratives_procedure: procedure_section $@58 use_phrase 583 | error 584 use_phrase: USE AFTER use_phrase_exception_error PROCEDURE on_opt use_phrase_option PERIOD_TOK 585 | error 586 use_phrase_exception_error: EXCEPTION 587 | ERROR_TOK 588 | STANDARD EXCEPTION 589 | STANDARD ERROR_TOK 590 use_phrase_option: gname_list 591 | open_mode 592 procedure_section: LABELSTR SECTION PERIOD_TOK 593 paragraph: LABELSTR dot_or_eos 594 dot_or_eos: '.' 595 | PERIOD_TOK 596 statement_list: statements 597 statements: statement 598 | statements statement 599 statement: move_statement 600 | initialize_statement 601 | compute_statement 602 | add_statement 603 | subtract_statement 604 | multiply_statement 605 | divide_statement 606 | accept_statement 607 | display_statement 608 | open_statement 609 | close_statement 610 | read_statement 611 | return_statement 612 | release_statement 613 | write_statement 614 | rewrite_statement 615 | delete_statement 616 | start_statement 617 | perform_statement 618 | goto_statement 619 | exit_statement 620 | stop_statement 621 | call_statement 622 | call_loadlib_statement 623 | chain_statement 624 | set_statement 625 | sort_statement 626 | merge_statement 627 | inspect_statement 628 | string_statement 629 | unstring_statement 630 | initiate_statement 631 | generate_statement 632 | terminate_statement 633 | proto_statement 634 | trace_statement 635 | goback_statement 636 | cancel_statement 637 | unlock_statement 638 | if_statement 639 | evaluate_statement 640 | search_statement 641 | CONTINUE 642 perform_statement: PERFORM perform_options 643 $@59: /* empty */ 644 if_statement: if_part $@59 end_if_opt 645 @60: /* empty */ 646 $@61: /* empty */ 647 if_statement: if_part ELSE @60 conditional_statement $@61 end_if_opt 648 search_statement: SEARCH search end_search_opt 649 | SEARCH ALL search_all end_search_opt 650 @62: /* empty */ 651 $@63: /* empty */ 652 evaluate_statement: EVALUATE @62 selection_subject_set $@63 when_case_list end_evaluate_or_eos 653 end_evaluate_or_eos: END_EVALUATE 654 | PERIOD_TOK 655 @64: /* empty */ 656 selection_subject_set: @64 selection_subject 657 @65: /* empty */ 658 selection_subject_set: selection_subject_set ALSO @65 selection_subject 659 selection_subject: expr 660 | condition 661 | TRUE_TOK 662 | FALSE_TOK 663 @66: /* empty */ 664 @67: /* empty */ 665 when_case_list: WHEN @66 @67 when_case sentence_or_nothing 666 @68: /* empty */ 667 @69: /* empty */ 668 $@70: /* empty */ 669 when_case_list: when_case_list WHEN @68 @69 when_case $@70 sentence_or_nothing 670 @71: /* empty */ 671 when_case: @71 selection_object 672 @72: /* empty */ 673 when_case: when_case ALSO @72 selection_object 674 | OTHER 675 selection_object: ANY 676 | TRUE_TOK 677 | FALSE_TOK 678 | not_opt expr 679 | not_opt expr THRU expr 680 | not_opt cond_name 681 sentence_or_nothing: /* empty */ 682 | conditional_statement 683 @73: /* empty */ 684 if_part: IF condition @73 end_then_opt conditional_statement 685 $@74: /* empty */ 686 conditional_statement: $@74 statement_list 687 $@75: /* empty */ 688 conditional_statement: $@75 NEXT SENTENCE 689 not_opt: /* empty */ 690 | NOT 691 end_if_opt: /* empty */ 692 | END_IF 693 end_then_opt: /* empty */ 694 | THEN 695 @76: /* empty */ 696 @77: /* empty */ 697 @78: /* empty */ 698 search: variable_indexed @76 search_varying_opt @77 search_at_end @78 search_when_list 699 @79: /* empty */ 700 $@80: /* empty */ 701 search_all: variable_indexed @79 search_at_end $@80 search_all_when_list 702 search_varying_opt: VARYING variable 703 | /* empty */ 704 @81: /* empty */ 705 search_at_end: at_opt END @81 statement_list 706 | /* empty */ 707 search_when_list: search_when 708 | search_when_list search_when 709 @82: /* empty */ 710 search_when: WHEN search_when_conditional @82 search_when_statement 711 search_when_statement: statement_list 712 | NEXT SENTENCE 713 search_when_conditional: name_or_lit extended_cond_op name_or_lit 714 search_all_when_list: search_all_when 715 | search_all_when_list search_all_when 716 $@83: /* empty */ 717 @84: /* empty */ 718 search_all_when: WHEN $@83 search_all_when_conditional @84 search_all_when_statement 719 search_all_when_statement: statement_list 720 | NEXT SENTENCE 721 search_all_when_conditional: variable is_opt CONDITIONAL to_opt variable 722 | variable is_opt CONDITIONAL to_opt literal 723 @85: /* empty */ 724 search_all_when_conditional: search_all_when_conditional AND @85 search_all_when_conditional 725 end_search_opt: /* empty */ 726 | END_SEARCH 727 unlock_statement: UNLOCK name 728 proto_statement: TCOBPROTO1 gname 729 | TCOBPROTO2 gname gname 730 trace_statement: READY TRACE 731 | RESET TRACE 732 initiate_statement: INITIATE name 733 generate_statement: GENERATE name 734 terminate_statement: TERMINATE name 735 cancel_statement: CANCEL gname 736 | CANCEL ALL 737 $@86: /* empty */ 738 $@87: /* empty */ 739 $@88: /* empty */ 740 merge_statement: MERGE name sort_keys $@86 sort_collating_opt $@87 merge_using $@88 sort_output 741 merge_using: USING sort_file_list 742 sort_statement: sort_file 743 | sort_variable_indexed 744 $@89: /* empty */ 745 $@90: /* empty */ 746 $@91: /* empty */ 747 sort_file: SORT name sort_keys $@89 sort_duplicates_opt sort_collating_opt $@90 sort_input $@91 sort_output 748 $@92: /* empty */ 749 sort_variable_indexed: SORT variable_indexed sort_keys_idx $@92 sort_duplicates_opt sort_collating_opt 750 sort_keys: sort_key 751 | sort_keys sort_key 752 sort_keys_idx: sort_key_idx 753 | sort_keys_idx sort_key_idx 754 sort_key: on_opt DIRECTION key_opt sort_keys_names 755 sort_key_idx: on_opt DIRECTION key_opt sort_keys_names_idx 756 sort_keys_names: name 757 | sort_keys_names name 758 sort_keys_names_idx: variable_indexed 759 | sort_keys_names_idx variable_indexed 760 sort_duplicates_opt: /* empty */ 761 | with_opt DUPLICATES in_opt order_opt 762 sort_collating_opt: /* empty */ 763 | collating_sequence 764 sort_input: INPUT PROCEDURE is_opt perform_range 765 | USING sort_file_list 766 sort_output: OUTPUT PROCEDURE is_opt perform_range 767 | GIVING sort_file_list 768 sort_file_list: name 769 | sort_file_list name 770 move_statement: MOVE gname TO name_var_list 771 | MOVE CORRESPONDING name_var TO name_var 772 | MOVE LENGTH OF gname TO name_var 773 | MOVE gname TO 774 initialize_statement: INITIALIZE gname_list initialize_replacing_opt 775 | INITIALIZE 776 initialize_replacing_opt: /* empty */ 777 | REPLACING initialize_replacing_lists 778 initialize_replacing_lists: initialize_replacing_list 779 | initialize_replacing_lists initialize_replacing_list 780 initialize_replacing_list: initialize_type_list data_opt BY gname 781 initialize_type_list: ALPHABETIC 782 | ALPHANUMERIC 783 | NUMERIC 784 | ALPHANUMERIC_EDITED 785 | NUMERIC_EDITED 786 compute_statement: COMPUTE compute_body end_compute_opt 787 | COMPUTE 788 compute_body: var_list_name CONDITIONAL expr on_size_error_opt 789 end_compute_opt: /* empty */ 790 | END_COMPUTE 791 add_statement: ADD add_body end_add_opt 792 | ADD 793 add_body: var_list_gname TO var_list_name on_size_error_opt 794 | var_list_gname add_to_opt GIVING var_list_name on_size_error_opt 795 | CORRESPONDING var_list_gname TO var_list_name rounded_opt on_size_error_opt 796 add_to_opt: /* empty */ 797 | TO gname 798 end_add_opt: /* empty */ 799 | END_ADD 800 subtract_statement: SUBTRACT subtract_body end_subtract_opt 801 | SUBTRACT 802 subtract_body: var_list_gname FROM var_list_name on_size_error_opt 803 | var_list_gname FROM gname GIVING var_list_name on_size_error_opt 804 | CORRESPONDING var_list_gname FROM var_list_name rounded_opt on_size_error_opt 805 end_subtract_opt: /* empty */ 806 | END_SUBTRACT 807 multiply_statement: MULTIPLY multiply_body end_multiply_opt 808 | MULTIPLY 809 multiply_body: gname BY gname GIVING var_list_name on_size_error_opt 810 | gname BY var_list_name on_size_error_opt 811 end_multiply_opt: /* empty */ 812 | END_MULTIPLY 813 divide_statement: DIVIDE divide_body end_divide_opt 814 | DIVIDE 815 divide_body: gname BY gname GIVING var_list_name on_size_error_opt 816 | gname BY gname GIVING name rounded_opt REMAINDER name on_size_error_opt 817 | gname INTO gname GIVING name rounded_opt REMAINDER name on_size_error_opt 818 | gname INTO gname GIVING var_list_name on_size_error_opt 819 | gname INTO var_list_name on_size_error_opt 820 end_divide_opt: /* empty */ 821 | END_DIVIDE 822 accept_statement: accept_hardware 823 | accept_chronological 824 | accept_screen 825 | ACCEPT 826 accept_hardware: ACCEPT name FROM INKEY end_accept_opt 827 | ACCEPT name FROM INPUT STATUS end_accept_opt 828 | ACCEPT name FROM CMD_LINE end_accept_opt 829 | ACCEPT name FROM ESCKEY end_accept_opt 830 | ACCEPT name FROM ENVIRONMENT_VARIABLE CLITERAL end_accept_opt 831 accept_chronological: ACCEPT name FROM DATE_TIME end_accept_opt 832 accept_screen: ACCEPT name accept_display_options end_accept_opt 833 $@93: /* empty */ 834 @94: /* empty */ 835 $@95: /* empty */ 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION $@93 variable @94 statement_list $@95 end_accept_opt 837 end_accept_opt: /* empty */ 838 | END_ACCEPT 839 display_statement: display_line 840 | display_screen 841 | DISPLAY 842 display_line: DISPLAY display_varlist display_upon display_line_options end_display_opt 843 display_screen: DISPLAY display_varlist accept_display_options end_display_opt 844 display_varlist: gname 845 | display_varlist sep_opt gname 846 display_upon: UPON CONSOLE 847 | UPON STD_OUTPUT 848 | UPON STD_ERROR 849 display_line_options: /* empty */ 850 | display_line_options with_opt NO ADVANCING 851 | display_line_options with_opt ERASE 852 | display_line_options with_opt ERASE EOS 853 | display_line_options with_opt ERASE EOL 854 | display_line_options with_opt ERASE SCREEN 855 end_display_opt: /* empty */ 856 | END_DISPLAY 857 scr_line: LINE number_opt expr 858 scr_position: COLUMN number_opt expr 859 | POSITION expr 860 scr_line_position: AT NLITERAL 861 | AT variable 862 accept_display_options: /* empty */ 863 | accept_display_options accept_display_option 864 accept_display_option: with_opt screen_attribx 865 | scr_line 866 | scr_position 867 | scr_line_position 868 open_statement: OPEN open_options 869 | OPEN 870 open_options: open_mode open_varlist 871 | open_options open_mode open_varlist 872 open_mode: INPUT 873 | I_O 874 | OUTPUT 875 | EXTEND 876 | error 877 open_varlist: name 878 | open_varlist sep_opt name 879 close_statement: CLOSE close_files 880 | CLOSE 881 close_files: close_file 882 | close_files sep_opt close_file 883 close_file: name close_options_opt 884 close_options_opt: close_options 885 | with_lock_opt 886 close_options: with_opt NO REWIND 887 | REEL 888 | UNIT 889 | REEL for_opt REMOVAL 890 | UNIT for_opt REMOVAL 891 with_lock_opt: with_opt LOCK 892 | with_opt IGNORE LOCK 893 | /* empty */ 894 return_statement: RETURN return_body end_return_opt 895 | RETURN 896 return_body: name record_opt read_into_opt 897 | name record_opt read_into_opt read_at_end_opt 898 read_statement: READ read_body end_read_opt 899 | READ 900 read_body: name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt 901 | name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt read_at_end_opt 902 | name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt read_invalid_key_opt 903 read_next_opt: /* empty */ 904 | NEXT 905 | PREVIOUS 906 read_into_opt: /* empty */ 907 | INTO name 908 read_key_opt: /* empty */ 909 | KEY is_opt name 910 read_at_end_opt: NOT at_opt on_end 911 | AT on_end 912 | on_end 913 $@96: /* empty */ 914 read_at_end_opt: AT on_end NOT at_opt $@96 on_end 915 $@97: /* empty */ 916 read_at_end_opt: on_end NOT at_opt $@97 on_end 917 @98: /* empty */ 918 on_end: END @98 statement_list 919 read_invalid_key_opt: read_invalid_key 920 | read_not_invalid_key 921 | read_invalid_key read_not_invalid_key 922 @99: /* empty */ 923 read_invalid_key: INVALID key_opt @99 statement_list 924 @100: /* empty */ 925 read_not_invalid_key: NOT INVALID key_opt @100 statement_list 926 end_read_opt: /* empty */ 927 | END_READ 928 end_return_opt: /* empty */ 929 | END_RETURN 930 release_statement: RELEASE name release_from_opt 931 release_from_opt: /* empty */ 932 | FROM gname 933 $@101: /* empty */ 934 write_statement: WRITE name write_from_opt write_options $@101 invalid_key_opt end_write_opt 935 write_from_opt: /* empty */ 936 | FROM gname 937 write_options: /* empty */ 938 | before_after advancing_opt gname line_lines_opt 939 | before_after advancing_opt PAGE 940 end_write_opt: /* empty */ 941 | END_WRITE 942 $@102: /* empty */ 943 rewrite_statement: REWRITE name write_from_opt $@102 invalid_key_opt end_rewrite_opt 944 end_rewrite_opt: /* empty */ 945 | END_REWRITE 946 $@103: /* empty */ 947 delete_statement: DELETE name record_opt $@103 invalid_key_opt end_delete_opt 948 end_delete_opt: /* empty */ 949 | END_DELETE 950 $@104: /* empty */ 951 start_statement: START start_body invalid_key_opt $@104 end_start_opt 952 start_body: name 953 | name KEY is_opt cond_op name 954 end_start_opt: /* empty */ 955 | END_START 956 goto_statement: GO to_opt goto_label 957 | GO to_opt goto_label_list DEPENDING on_opt variable 958 goto_label: label 959 goto_label_list: label 960 | goto_label_list label 961 | goto_label_list LISTSEP label 962 $@105: /* empty */ 963 @106: /* empty */ 964 @107: /* empty */ 965 @108: /* empty */ 966 $@109: /* empty */ 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt 968 | CALL 969 call_convention_opt: /* empty */ 970 | CALL_CONV_C 971 | CALL_CONV_STDCALL 972 $@110: /* empty */ 973 call_loadlib_statement: CALL_LOADLIB gname $@110 end_call_loadlib_opt 974 | CALL_LOADLIB 975 end_call_loadlib_opt: END_CALL_LOADLIB 976 | /* empty */ 977 $@111: /* empty */ 978 @112: /* empty */ 979 @113: /* empty */ 980 $@114: /* empty */ 981 chain_statement: CHAIN $@111 gname using_options @112 @113 on_exception_or_overflow $@114 end_chain_opt 982 | CHAIN 983 exit_statement: EXIT 984 | EXIT PARAGRAPH 985 | EXIT PROGRAM 986 stop_statement: STOP RUN 987 | STOP stop_literal 988 stop_literal: CLITERAL 989 | NLITERAL 990 goback_statement: GOBACK 991 var_list_name: name rounded_opt sep_opt 992 | var_list_name name rounded_opt sep_opt 993 var_list_gname: gname sep_opt 994 | var_list_gname gname sep_opt 995 rounded_opt: /* empty */ 996 | ROUNDED 997 on_size_error_opt: /* empty */ 998 | NOT on_opt SIZE on_size_error 999 | on_opt SIZE on_size_error 1000 $@115: /* empty */ 1001 on_size_error_opt: on_opt SIZE on_size_error NOT on_opt SIZE $@115 on_size_error 1002 @116: /* empty */ 1003 on_size_error: ERROR_TOK @116 statement_list 1004 size_opt: /* empty */ 1005 | SIZE 1006 end_call_opt: /* empty */ 1007 | END_CALL 1008 end_chain_opt: /* empty */ 1009 | END_CHAIN 1010 set_statement: SET set_list 1011 set_list: set_target TO address_of_opt set_variable_or_nlit 1012 | set_target UP BY var_or_nliteral 1013 | set_target DOWN BY var_or_nliteral 1014 | address_of_opt variable TO address_of_opt set_variable 1015 set_target: name_list 1016 | cond_name 1017 set_variable: variable 1018 | NULL_TOK 1019 set_variable_or_nlit: name_or_lit 1020 | ON 1021 | OFF 1022 | NULL_TOK 1023 | TRUE_TOK 1024 address_of_opt: /* empty */ 1025 | ADDRESS of_opt 1026 $@117: /* empty */ 1027 string_statement: STRINGCMD string_from_list INTO name string_with_pointer $@117 on_overflow_opt end_stringcmd_opt 1028 $@118: /* empty */ 1029 unstring_statement: UNSTRING name unstring_delimited INTO unstring_destinations string_with_pointer unstring_tallying $@118 on_overflow_opt end_unstring_opt 1030 unstring_delimited: DELIMITED by_opt unstring_delimited_vars 1031 | /* empty */ 1032 unstring_delimited_vars: all_opt gname 1033 | unstring_delimited_vars OR all_opt gname 1034 unstring_destinations: unstring_dest_var 1035 | unstring_destinations sep_opt unstring_dest_var 1036 unstring_dest_var: name unstring_delim_opt unstring_count_opt 1037 unstring_delim_opt: /* empty */ 1038 | DELIMITER in_opt name 1039 unstring_count_opt: /* empty */ 1040 | COUNT in_opt name 1041 unstring_tallying: /* empty */ 1042 | TALLYING in_opt name 1043 all_opt: /* empty */ 1044 | ALL 1045 $@119: /* empty */ 1046 on_overflow_opt: $@119 on_overflow on_not_overflow 1047 @120: /* empty */ 1048 on_exception_or_overflow: on_opt exception_or_overflow @120 statement_list 1049 | /* empty */ 1050 exception_or_overflow: EXCEPTION 1051 | OVERFLOW_TOK 1052 @121: /* empty */ 1053 on_not_exception: NOT on_opt EXCEPTION @121 statement_list 1054 | /* empty */ 1055 @122: /* empty */ 1056 on_overflow: on_opt OVERFLOW_TOK @122 statement_list 1057 | /* empty */ 1058 @123: /* empty */ 1059 on_not_overflow: not_excep on_opt OVERFLOW_TOK @123 statement_list 1060 | /* empty */ 1061 invalid_key_opt: invalid_key_sentence 1062 | not_invalid_key_sentence 1063 | invalid_key_sentence not_invalid_key_sentence 1064 | /* empty */ 1065 @124: /* empty */ 1066 invalid_key_sentence: INVALID key_opt @124 statement_list 1067 @125: /* empty */ 1068 not_invalid_key_sentence: not_excep INVALID key_opt @125 statement_list 1069 not_excep: NOTEXCEP 1070 | NOT 1071 string_with_pointer: with_opt POINTER name 1072 | /* empty */ 1073 string_from_list: string_from 1074 | string_from_list sep_opt string_from 1075 | error 1076 string_from: gname 1077 | gname DELIMITED by_opt delimited_by 1078 delimited_by: gname 1079 | SIZE 1080 | error 1081 end_stringcmd_opt: /* empty */ 1082 | END_STRINGCMD 1083 end_unstring_opt: /* empty */ 1084 | END_UNSTRING 1085 $@126: /* empty */ 1086 inspect_statement: INSPECT name tallying_clause $@126 replacing_clause 1087 | INSPECT name converting_clause 1088 converting_clause: CONVERTING noallname TO noallname inspect_before_after 1089 tallying_clause: TALLYING tallying_list 1090 | /* empty */ 1091 tallying_list: tallying_list name FOR tallying_for_list 1092 | /* empty */ 1093 tallying_for_list: tallying_for_list CHARACTERS inspect_before_after 1094 | tallying_for_list ALL noallname inspect_before_after 1095 | tallying_for_list LEADING noallname inspect_before_after 1096 | /* empty */ 1097 replacing_clause: REPLACING replacing_list 1098 | /* empty */ 1099 replacing_list: replacing_list CHARACTERS BY noallname inspect_before_after 1100 | replacing_list replacing_kind replacing_by_list 1101 | /* empty */ 1102 replacing_by_list: replacing_by_list noallname BY noallname inspect_before_after 1103 | /* empty */ 1104 replacing_kind: ALL 1105 | LEADING 1106 | TRAILING 1107 | FIRST 1108 inspect_before_after: inspect_before_after BEFORE initial_opt noallname 1109 | inspect_before_after AFTER initial_opt noallname 1110 | /* empty */ 1111 initial_opt: INITIAL_TOK 1112 | /* empty */ 1113 expr: gname 1114 | expr '*' expr 1115 | expr '/' expr 1116 | expr '+' expr 1117 | expr '-' expr 1118 | expr POW_OP expr 1119 | '(' expr ')' 1120 expr_opt: /* empty */ 1121 | expr 1122 using_options: /* empty */ 1123 @127: /* empty */ 1124 @128: /* empty */ 1125 using_options: USING @127 dummy @128 parm_list 1126 returning_options: /* empty */ 1127 | RETURNING variable 1128 | GIVING variable 1129 dummy: /* empty */ 1130 using_parameters: /* empty */ 1131 | USING gname_list 1132 | CHAINING gname_list 1133 parm_list: parm_list sep_opt parameter 1134 | parameter 1135 parameter: gname 1136 | by_opt parm_type gname 1137 parm_type: REFERENCE 1138 | VALUE 1139 | CONTENT 1140 intrinsic_parm_list: intrinsic_parm_list sep_opt intrinsic_parm 1141 | intrinsic_parm 1142 intrinsic_parm: gname 1143 perform_range: label perform_thru_opt 1144 perform_options: perform_statements END_PERFORM 1145 @129: /* empty */ 1146 $@130: /* empty */ 1147 perform_options: gname TIMES @129 perform_statements $@130 END_PERFORM 1148 @131: /* empty */ 1149 @132: /* empty */ 1150 $@133: /* empty */ 1151 perform_options: with_test_opt UNTIL @131 condition @132 perform_statements $@133 END_PERFORM 1152 @134: /* empty */ 1153 @135: /* empty */ 1154 $@136: /* empty */ 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM 1156 | label perform_thru_opt 1157 @137: /* empty */ 1158 perform_options: label perform_thru_opt with_test_opt UNTIL @137 condition 1159 | label perform_thru_opt gname TIMES 1160 @138: /* empty */ 1161 @139: /* empty */ 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname UNTIL @138 condition @139 perform_after_opt 1163 perform_thru_opt: /* empty */ 1164 | THRU label 1165 with_test_opt: /* empty */ 1166 | with_opt TEST before_after 1167 perform_after_opt: /* empty */ 1168 | AFTER perform_after 1169 | AFTER perform_after AFTER perform_after 1170 | AFTER perform_after AFTER perform_after AFTER perform_after 1171 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after 1172 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after 1173 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after 1174 @140: /* empty */ 1175 perform_after: name FROM gname by_opt gname UNTIL @140 condition 1176 $@141: /* empty */ 1177 perform_statements: $@141 statement_list 1178 before_after: BEFORE 1179 | AFTER 1180 $@142: /* empty */ 1181 condition: expr extended_cond_op $@142 expr_opt 1182 | NOT condition 1183 @143: /* empty */ 1184 condition: condition AND @143 implied_op_condition 1185 @144: /* empty */ 1186 condition: condition OR @144 implied_op_condition 1187 | '(' condition ')' 1188 | cond_name 1189 implied_op_condition: condition 1190 | cond_op expr 1191 | expr 1192 sign_condition: POSITIVE 1193 | NEGATIVE 1194 | ZERO 1195 class_condition: NUMERIC 1196 | ALPHABETIC 1197 | ALPHABETIC_LOWER 1198 | ALPHABETIC_UPPER 1199 extended_cond_op: IS ext_cond 1200 | IS NOT ext_cond 1201 | IS ext_cond OR ext_cond 1202 | ext_cond 1203 | NOT is_opt ext_cond 1204 | ext_cond OR ext_cond 1205 ext_cond: conditional 1206 | class_condition 1207 | sign_condition 1208 cond_op: conditional 1209 | NOT conditional 1210 | conditional OR conditional 1211 conditional: CONDITIONAL than_to_opt 1212 comma_opt: /* empty */ 1213 | ',' 1214 sep_opt: /* empty */ 1215 | LISTSEP 1216 key_opt: /* empty */ 1217 | KEY 1218 advancing_opt: /* empty */ 1219 | ADVANCING 1220 than_to_opt: /* empty */ 1221 | TO 1222 | THAN 1223 record_opt: /* empty */ 1224 | RECORD 1225 at_opt: /* empty */ 1226 | AT 1227 in_opt: /* empty */ 1228 | IN 1229 in_of: IN 1230 | OF 1231 by_opt: /* empty */ 1232 | BY 1233 with_opt: /* empty */ 1234 | WITH 1235 on_opt: /* empty */ 1236 | ON 1237 gname_opt: gname 1238 | /* empty */ 1239 to_opt: /* empty */ 1240 | TO 1241 name_var_list: name_var 1242 | name_var_list sep_opt name_var 1243 gname_list: gname 1244 | gname_list sep_opt gname 1245 gname: name 1246 | gliteral 1247 @145: /* empty */ 1248 gname: FUNCTION LABELSTR '(' @145 intrinsic_parm_list ')' 1249 | FUNCTION LABELSTR 1250 name_or_lit: name 1251 | literal 1252 noallname: name 1253 | without_all_literal 1254 gliteral: without_all_literal 1255 | all_literal 1256 without_all_literal: literal 1257 | special_literal 1258 all_literal: ALL literal 1259 | ALL special_literal 1260 special_literal: SPACES 1261 | ZERO 1262 | QUOTES 1263 | HIGHVALUES 1264 | LOWVALUES 1265 var_or_nliteral: variable 1266 | nliteral 1267 nliteral: signed_nliteral 1268 literal: signed_nliteral 1269 | CLITERAL 1270 signed_nliteral: NLITERAL 1271 | '+' NLITERAL 1272 | '-' NLITERAL 1273 def_name_opt: def_name 1274 | /* empty */ 1275 def_name: STRING 1276 | FILLER 1277 variable_indexed: SUBSCVAR 1278 filename: literal 1279 | STRING 1280 data_name: literal 1281 | STRING 1282 $@146: /* empty */ 1283 cond_name: VARCOND '(' $@146 subscripts ')' 1284 | VARCOND 1285 name: variable '(' gname ':' gname_opt ')' 1286 | variable 1287 | LABELSTR 1288 name_var: gname 1289 variable: qualified_var 1290 $@147: /* empty */ 1291 variable: qualified_var LPAR $@147 subscripts ')' 1292 qualified_var: unqualified_var 1293 | unqualified_var in_of qualified_var 1294 unqualified_var: VARIABLE 1295 | SUBSCVAR 1296 subscripts: subscript 1297 | subscripts comma_opt subscript 1298 subscript: gname 1299 | subscript '+' gname 1300 | subscript '-' gname 1301 integer: signed_nliteral 1302 label: LABELSTR in_of LABELSTR 1303 | LABELSTR 1304 | NLITERAL 1305 | NLITERAL in_of NLITERAL 1306 | NLITERAL in_of LABELSTR 1307 anystring: STRING 1308 | LABELSTR Terminals, with rules where they appear $end (0) 0 '(' (40) 1119 1187 1248 1283 1285 ')' (41) 1119 1187 1248 1283 1285 1291 '*' (42) 1114 '+' (43) 410 1116 1271 1299 ',' (44) 1213 '-' (45) 412 1117 1272 1300 '.' (46) 594 '/' (47) 1115 ':' (58) 1285 error (256) 40 50 96 114 123 171 174 424 568 580 583 585 876 1075 1080 LOW_PREC (258) IDSTRING (259) 10 15 STRING (260) 36 38 43 63 69 70 74 75 77 81 109 110 111 112 160 169 170 194 419 423 459 505 506 520 521 528 1275 1279 1281 1307 VARIABLE (261) 435 1294 VARCOND (262) 1283 1284 SUBSCVAR (263) 436 1277 1295 LABELSTR (264) 592 593 1248 1249 1287 1302 1303 1306 1308 CMD_LINE (265) 828 ENVIRONMENT_VARIABLE (266) 830 INKEY (267) 826 ESCKEY (268) 829 CHAR (269) 480 MULTIPLIER (270) 482 USAGENUM (271) 466 ZERONUM (272) CONDITIONAL (273) 721 722 788 1211 TO (274) 348 350 458 526 534 770 771 772 773 793 795 797 1011 1014 1088 1221 1240 IS (275) 131 212 286 1199 1200 1201 ARE (276) 133 213 287 THRU (277) 67 89 453 475 679 1164 THAN (278) 1222 NO (279) 372 396 850 886 COMMENTING (280) DIRECTION (281) 459 754 755 READ (282) 898 899 WRITE (283) 934 INPUT_OUTPUT (284) 93 RELEASE (285) 930 NLITERAL (286) 113 860 989 1270 1271 1272 1304 1305 1306 CLITERAL (287) 60 66 67 830 988 1269 PORTNUM (288) 119 121 DATE_TIME (289) 831 POW_OP (290) 1118 OR (291) 1033 1186 1201 1204 1210 AND (292) 724 1184 NOT (293) 690 910 914 916 925 998 1001 1053 1070 1182 1200 1203 1209 ACCEPT (294) 825 826 827 828 829 830 831 832 836 ACCESS (295) 108 ADD (296) 791 792 ADDRESS (297) 1025 ADVANCING (298) 372 396 850 1219 AFTER (299) 584 1109 1168 1169 1170 1171 1172 1173 1179 ALL (300) 649 736 1044 1094 1104 1258 1259 ALPHABET (301) 81 ALPHABETIC (302) 781 1196 ALPHABETIC_LOWER (303) 1197 ALPHABETIC_UPPER (304) 1198 ALPHANUMERIC (305) 782 ALPHANUMERIC_EDITED (306) 784 ALSO (307) 91 92 658 673 ALTERNATE (308) 112 ANY (309) 675 AREA (310) 128 165 AREAS (311) 129 ASSIGN (312) 107 AT (313) 516 517 860 861 911 914 1226 AUTHOR (314) 23 AUTO (315) 361 385 BACKGROUNDCOLOR (316) 334 400 BEFORE (317) 1108 1178 BELL (318) 356 380 BLANK (319) 298 351 352 369 375 376 393 446 BLINK (320) 364 388 BLOCK (321) 499 BOTTOM (322) 513 BY (323) 780 809 810 815 816 1012 1013 1099 1102 1232 CALL (324) 967 968 CALL_CONV_C (325) 970 CALL_CONV_STDCALL (326) 971 CALL_LOADLIB (327) 973 974 CANCEL (328) 735 736 CENTER (329) 283 CF (330) 257 CH (331) 254 CHAIN (332) 981 982 CHAINING (333) 1132 CHARACTER (334) 405 CHARACTERS (335) 523 548 1093 1099 CLASS (336) 63 CLOSE (337) 879 880 CODE (338) 198 CODE_SET (339) 506 COLLATING (340) 44 COLOR (341) 336 COLUMN (342) 277 278 279 329 858 COLUMNS (343) 280 COMMA (344) 68 COMMON (345) 18 COMPUTE (346) 786 787 CONFIGURATION (347) 31 CONSOLE (348) 846 CONTAINS (349) 546 CONTENT (350) 1139 CONTINUE (351) 641 CONTROL (352) 209 245 248 CONTROLS (353) 210 CONVERTING (354) 1088 CORRESPONDING (355) 771 795 804 COUNT (356) 1040 CURRENCY (357) 60 CURSOR (358) 70 DATA (359) 176 504 552 DATE_COMPILED (360) 25 DATE_WRITTEN (361) 24 DE (362) 255 DEBUGGING (363) 46 DECIMAL_POINT (364) 68 DECLARATIVES (365) 571 DELETE (366) 947 DELIMITED (367) 1030 1077 DELIMITER (368) 1038 DEPENDING (369) 458 528 957 DETAIL (370) 217 219 246 DISPLAY (371) 264 265 467 841 842 843 DISPLAY_SCREEN (372) 69 DIVIDE (373) 813 814 DIVISION (374) 15 29 176 559 DOWN (375) 1013 DUPLICATES (376) 124 761 DYNAMIC (377) 143 ELSE (378) 647 END (379) 10 571 705 918 END_ACCEPT (380) 838 END_ADD (381) 799 END_CALL (382) 1007 END_CALL_LOADLIB (383) 975 END_CHAIN (384) 1009 END_COMPUTE (385) 790 END_DELETE (386) 949 END_DISPLAY (387) 856 END_DIVIDE (388) 821 END_EVALUATE (389) 653 END_IF (390) 692 END_MULTIPLY (391) 812 END_OF_PAGE (392) END_PERFORM (393) 1144 1147 1151 1155 END_READ (394) 927 END_RETURN (395) 929 END_REWRITE (396) 945 END_SEARCH (397) 726 END_START (398) 955 END_STRINGCMD (399) 1082 END_SUBTRACT (400) 806 END_UNSTRING (401) 1084 END_WRITE (402) 941 ENVIRONMENT (403) 29 EOL (404) 353 377 853 EOS (405) 354 378 852 ERASE (406) 353 354 355 377 378 379 851 852 853 854 ERROR_TOK (407) 587 589 1003 EVALUATE (408) 652 EXCEPTION (409) 586 588 836 1050 1053 EXIT (410) 983 984 985 EXTEND (411) 875 EXTERNAL (412) 122 444 487 FALSE_TOK (413) 662 677 FD (414) 419 FILE_CONTROL (415) 97 FILE_ID (416) 503 FILE_TOK (417) 115 157 179 FILLER (418) 1276 FINAL (419) 221 305 313 FIRST (420) 219 1107 FOOTING (421) 215 248 249 250 509 FOR (422) 167 1091 FOREGROUNDCOLOR (423) 332 399 FROM (424) 346 531 802 803 804 826 827 828 829 830 831 932 936 1155 1162 1175 FULL (425) 358 382 FUNCTION (426) 1248 1249 GENERATE (427) 733 GIVING (428) 767 794 803 809 815 816 817 818 1128 GLOBAL (429) 197 445 488 GO (430) 956 957 GOBACK (431) 990 GROUP (432) 267 297 HEADING (433) 204 242 243 245 HIGHLIGHT (434) 368 392 HIGHVALUES (435) 1263 IDENTIFICATION (436) 15 IF (437) 684 IGNORE (438) 892 IN (439) 1228 1229 INDEXED (440) 137 461 INDICATE (441) 300 INITIALIZE (442) 774 775 INITIAL_TOK (443) 17 1111 INITIATE (444) 732 INPUT (445) 764 827 872 INSPECT (446) 1086 1087 INSTALLATION (447) 26 INTO (448) 817 818 819 907 1027 1029 INVALID (449) 923 925 1066 1068 I_O (450) 873 I_O_CONTROL (451) 99 JUSTIFIED (452) 266 362 363 386 387 443 KEY (453) 909 953 1217 LABEL (454) 502 LAST (455) 217 LEADING (456) 308 401 1095 1105 LEFT (457) 282 363 387 450 LENGTH (458) 772 LIMIT (459) 212 LIMITS (460) 213 LINAGE (461) 507 LINE (462) 140 206 272 273 274 327 352 376 857 LINES (463) 208 275 515 516 LINKAGE (464) 185 LISTSEP (465) 961 1215 LOCK (466) 891 892 LOWER (467) 374 398 LOWLIGHT (468) 367 391 LOWVALUES (469) 1264 LPAR (470) 1291 MERGE (471) 740 MINUS (472) 411 MODE (473) 46 135 MOVE (474) 770 771 772 773 MULTIPLE (475) 157 MULTIPLY (476) 807 808 NATIVE (477) 82 NEGATIVE (478) 1193 NEXT (479) 267 268 269 316 688 712 720 904 NOECHO (480) 370 394 NOTEXCEP (481) 1069 NULL_TOK (482) 1018 1022 NUMBER (483) 273 278 307 414 NUMBERS (484) 274 279 NUMERIC (485) 783 1195 NUMERIC_EDITED (486) 785 OBJECT_COMPUTER (487) 38 OCCURS (488) 455 458 OF (489) 317 503 772 1230 OFF (490) 77 1021 OMITTED (491) 538 ON (492) 75 268 1020 1236 ONLY (493) OPEN (494) 868 869 OPTIONAL (495) 126 ORDER (496) 550 ORGANIZATION (497) 117 OTHER (498) 674 OUTPUT (499) 766 874 OVERFLOW_TOK (500) 1051 1056 1059 PADDING (501) PAGE (502) 202 243 249 268 269 316 939 PAGE_COUNTER (503) 295 PARAGRAPH (504) 984 PERFORM (505) 642 PF (506) 258 PH (507) 252 PICTURE (508) 263 477 PLUS (509) 271 315 409 POINTER (510) 468 1071 POSITION (511) 162 859 POSITIVE (512) 1192 PREVIOUS (513) 905 PROCEDURE (514) 559 584 764 766 PROCEED (515) PROGRAM (516) 10 20 41 985 PROGRAM_ID (517) 15 QUOTES (518) 1262 RANDOM (519) 144 RD (520) 194 READY (521) 730 RECORD (522) 110 112 154 500 501 535 1224 RECORDS (523) 524 536 REDEFINES (524) 434 REEL (525) 887 889 REFERENCE (526) 1137 RELATIVE (527) 111 139 REMAINDER (528) 816 817 REMOVAL (529) 889 890 RENAMES (530) 448 REPLACING (531) 777 1097 REPORT (532) 187 242 250 518 REPORTS (533) 519 REQUIRED (534) 359 383 RESERVE (535) 113 RESET (536) 304 305 731 RETURN (537) 894 895 RETURNING (538) 1127 REVERSEVIDEO (539) 365 389 REWIND (540) 886 REWRITE (541) 943 RF (542) 259 RH (543) 251 RIGHT (544) 284 311 362 386 451 ROUNDED (545) 996 RUN (546) 986 SAME (547) 152 SCREEN (548) 320 351 375 854 SD (549) 423 SEARCH (550) 648 649 SECTION (551) 31 93 179 182 185 187 320 592 SECURE (552) 360 384 SECURITY (553) 27 SELECT (554) 103 SENTENCE (555) 688 712 720 SEPARATE (556) 260 261 403 SEQUENCE (557) 43 SEQUENTIAL (558) 138 140 142 SET (559) 1010 SIGN (560) 61 260 407 SIZE (561) 341 998 999 1001 1005 1079 SORT (562) 155 747 749 SORT_MERGE (563) 156 SOURCE (564) 289 SOURCE_COMPUTER (565) 36 SPACES (566) 1260 SPECIAL_NAMES (567) 39 STANDARD (568) 537 588 589 STANDARD_1 (569) 83 STANDARD_2 (570) 84 START (571) 951 STATUS (572) 69 79 109 827 STD_ERROR (573) 848 STD_OUTPUT (574) 847 STOP (575) 986 987 STRINGCMD (576) 1027 SUBTRACT (577) 800 801 SUM (578) 293 SYNCHRONIZED (579) 442 TALLYING (580) 1042 1089 TAPE (581) 163 TCOBPROTO1 (582) 728 TCOBPROTO2 (583) 729 TERMINATE (584) 734 TEST (585) 1166 THEN (586) 694 TIMES (587) 542 1147 1159 TOKDUMMY (588) TOP (589) 511 TRACE (590) 730 731 TRAILING (591) 309 402 1106 TRUE_TOK (592) 661 676 1023 TYPE (593) 241 UNDERLINE (594) 366 390 UNIT (595) 888 890 UNLOCK (596) 727 UNSTRING (597) 1029 UNTIL (598) 1151 1155 1158 1162 1175 UP (599) 1012 UPDATE (600) 371 395 UPON (601) 302 846 847 848 UPPER (602) 373 397 USAGE (603) 264 540 USE (604) 584 USING (605) 344 741 765 1125 1131 VALUE (606) 290 470 503 1138 VALUES (607) 471 VARYING (608) 501 702 1155 1162 WHEN (609) 544 665 669 710 718 WITH (610) 1234 WORKING_STORAGE (611) 182 ZERO (612) 298 369 393 446 1194 1261 PERIOD_TOK (613) 15 23 24 25 26 27 29 31 36 38 39 49 93 97 99 103 147 176 179 182 185 187 194 227 320 325 419 423 429 559 566 568 569 571 578 580 584 592 595 654 Nonterminals, with rules where they appear $accept (368) on left: 0 root_ (369) on left: 1, on right: 0 program_sequences (370) on left: 2 3 4, on right: 1 program_sequence (371) on left: 5 7 8, on right: 3 4 7 8 $@1 (372) on left: 6, on right: 7 end_program (373) on left: 10, on right: 5 7 8 $@2 (374) on left: 9, on right: 10 program (375) on left: 11, on right: 2 4 5 7 8 identification_division (376) on left: 15, on right: 11 $@3 (377) on left: 12, on right: 15 $@4 (378) on left: 13, on right: 15 $@5 (379) on left: 14, on right: 15 programid_opts_opt (380) on left: 16 17 18, on right: 15 programid_program_opt (381) on left: 19 20, on right: 17 18 identification_division_options_opt (382) on left: 21 22, on right: 15 22 identification_division_option (383) on left: 23 24 25 26 27, on right: 22 environment_division_opt (384) on left: 29 30, on right: 11 $@6 (385) on left: 28, on right: 29 configuration_opt (386) on left: 31 32, on right: 29 configuration_section (387) on left: 33 34, on right: 31 33 configuration_option (388) on left: 36 38 39 40, on right: 33 $@7 (389) on left: 35, on right: 36 $@8 (390) on left: 37, on right: 38 program_collating_opt (391) on left: 41 42, on right: 38 collating_sequence (392) on left: 43, on right: 41 763 collating_opt (393) on left: 44 45, on right: 43 debug_mode_opt (394) on left: 46 47, on right: 36 special_names_opt (395) on left: 48 49 50, on right: 39 special_names (396) on left: 51 52, on right: 49 52 special_name (397) on left: 53 54 55 56 57 58 59, on right: 51 52 currency_details (398) on left: 60, on right: 55 sign_opt (399) on left: 61 62, on right: 60 special_name_class (400) on left: 63, on right: 59 special_name_class_item_list (401) on left: 64 65, on right: 63 65 special_name_class_item (402) on left: 66 67, on right: 64 65 decimal_point_details (403) on left: 68, on right: 56 screen_status_details (404) on left: 69, on right: 57 cursor_details (405) on left: 70, on right: 58 switches_details_list (406) on left: 71 72, on right: 53 72 switches_details (407) on left: 74, on right: 72 $@9 (408) on left: 73, on right: 74 switch_on_opt (409) on left: 75 76, on right: 74 switch_off_opt (410) on left: 77 78, on right: 74 status_opt (411) on left: 79 80, on right: 75 77 alphabet_details (412) on left: 81, on right: 54 alphabet_type (413) on left: 82 83 84 85, on right: 81 alphabet_literal_list (414) on left: 86 87, on right: 85 87 alphabet_literal_item (415) on left: 88 89 90, on right: 86 87 alphabet_also_list (416) on left: 91 92, on right: 90 92 input_output_opt (417) on left: 93 94, on right: 29 input_output_section (418) on left: 95 96, on right: 93 file_control_paragraph (419) on left: 97, on right: 95 i_o_control_paragraph (420) on left: 98 99, on right: 95 file_control (421) on left: 100 101, on right: 97 101 file_select (422) on left: 103, on right: 100 101 $@10 (423) on left: 102, on right: 103 select_clauses (424) on left: 104 105, on right: 103 104 select_clause (425) on left: 106 107 108 109 110 111 112 113 114, on right: 104 file_opt (426) on left: 115 116, on right: 109 organization_opt (427) on left: 117 118, on right: 106 assign_clause (428) on left: 119 120 121 122 123, on right: 107 with_duplicates (429) on left: 124 125, on right: 112 optional_opt (430) on left: 126 127, on right: 103 areas_opt (431) on left: 128 129 130, on right: 113 is_opt (432) on left: 131 132, on right: 17 18 43 60 63 68 69 70 74 75 77 81 106 108 109 110 111 112 197 204 209 215 217 219 241 260 263 264 267 273 278 289 290 407 408 414 444 445 459 465 470 477 487 488 501 503 506 507 518 535 721 722 764 766 909 953 1203 are_opt (433) on left: 133 134, on right: 210 274 275 279 280 471 519 536 mode_opt (434) on left: 135 136, on right: 108 organization_options (435) on left: 137 138 139 140 141, on right: 106 access_options (436) on left: 142 143 144 145, on right: 108 i_o_control_opt (437) on left: 146 147, on right: 99 i_o_control_list (438) on left: 148 149, on right: 147 149 i_o_control_clause (439) on left: 150 151, on right: 148 149 i_o_control_same_clause (440) on left: 152, on right: 150 same_clause_options (441) on left: 153 154 155 156, on right: 152 i_o_control_multiple_file_tape_clause (442) on left: 157, on right: 151 i_o_control_multiple_file_list (443) on left: 158 159, on right: 157 159 i_o_control_multiple_file (444) on left: 160, on right: 158 159 i_o_control_multiple_file_position_opt (445) on left: 161 162, on right: 160 tape_opt (446) on left: 163 164, on right: 157 are_opta (447) on left: 165 166, on right: 152 for_opt (448) on left: 167 168, on right: 152 889 890 string_list (449) on left: 169 170 171, on right: 152 170 name_list (450) on left: 172 173 174, on right: 173 1015 data_division_opt (451) on left: 176 177, on right: 11 $@11 (452) on left: 175, on right: 176 file_section_opt (453) on left: 179 180, on right: 176 $@12 (454) on left: 178, on right: 179 working_storage_opt (455) on left: 182 183, on right: 176 $@13 (456) on left: 181, on right: 182 linkage_section_opt (457) on left: 185 186, on right: 176 $@14 (458) on left: 184, on right: 185 report_section_opt (459) on left: 187 188, on right: 176 report_sections (460) on left: 189 190, on right: 187 189 report_section (461) on left: 194, on right: 189 $@15 (462) on left: 191, on right: 194 $@16 (463) on left: 192, on right: 194 $@17 (464) on left: 193, on right: 194 report_controls (465) on left: 195 196, on right: 194 196 report_control (466) on left: 197 198 199 200, on right: 196 report_controls_control (467) on left: 201, on right: 199 report_controls_page (468) on left: 202, on right: 200 heading_opt (469) on left: 203 204, on right: 202 line_lines_opt (470) on left: 205 206, on right: 202 938 lines_opt (471) on left: 207 208, on right: 205 507 control_is_are (472) on left: 209 210, on right: 201 limit_is_are_opt (473) on left: 211 212 213, on right: 202 footing_opt (474) on left: 214 215, on right: 202 last_detail_opt (475) on left: 216 217, on right: 202 first_detail_opt (476) on left: 218 219, on right: 202 final_opt (477) on left: 220 221, on right: 201 report_break_list (478) on left: 222 223, on right: 201 223 report_description (479) on left: 224 225, on right: 194 225 report_item (480) on left: 227, on right: 224 225 $@18 (481) on left: 226, on right: 227 report_clauses (482) on left: 228 229, on right: 227 229 report_clause (483) on left: 230 231 232 233 234 235 236 237 238 239 240, on right: 228 229 report_clause_type (484) on left: 241, on right: 232 report_clause_type2 (485) on left: 242 243 245 246 248 249 250 251 252 254 255 257 258 259, on right: 241 $@19 (486) on left: 244, on right: 245 $@20 (487) on left: 247, on right: 248 $@21 (488) on left: 253, on right: 254 $@22 (489) on left: 256, on right: 257 report_clause_sign_is (490) on left: 260 261, on right: 235 report_clause_picture (491) on left: 263, on right: 234 $@23 (492) on left: 262, on right: 263 report_clause_usage_display (493) on left: 264 265, on right: 233 report_clause_justified (494) on left: 266, on right: 236 report_clause_next_group (495) on left: 267, on right: 231 report_clause_line (496) on left: 268 269 270 271, on right: 230 report_clause_line_is (497) on left: 272 273 274 275, on right: 268 269 270 271 report_clause_column (498) on left: 276, on right: 238 report_clause_column_is (499) on left: 277 278 279 280, on right: 276 report_clause_column_orientation (500) on left: 281 282 283 284, on right: 277 278 279 280 is_are_opt (501) on left: 285 286 287, on right: 272 277 report_clause_svs (502) on left: 289 290 293, on right: 239 $@24 (503) on left: 288, on right: 289 $@25 (504) on left: 291, on right: 293 $@26 (505) on left: 292, on right: 293 gname_page_counter (506) on left: 294 295, on right: 289 report_clause_group_indicate (507) on left: 296 297, on right: 240 report_clause_blank_zero (508) on left: 298, on right: 237 indicate_opt (509) on left: 299 300, on right: 297 upon_opt (510) on left: 301 302, on right: 293 reset_opt (511) on left: 303 304 305, on right: 293 number_opt (512) on left: 306 307, on right: 857 858 leading_trailing (513) on left: 308 309, on right: 260 261 right_opt (514) on left: 310 311, on right: 266 name_final_opt (515) on left: 312 313, on right: 245 248 254 257 integer_on_next_page (516) on left: 314 315 316, on right: 267 of_opt (517) on left: 317 318, on right: 1025 screen_section_opt (518) on left: 320 321, on right: 176 $@27 (519) on left: 319, on right: 320 screen_section (520) on left: 322 323, on right: 320 322 screen_item (521) on left: 325, on right: 322 $@28 (522) on left: 324, on right: 325 screen_clauses (523) on left: 327 329 330 332 334 336 337 338 339 341 342, on right: 325 327 329 330 332 334 336 337 338 339 341 $@29 (524) on left: 326, on right: 327 $@30 (525) on left: 328, on right: 329 $@31 (526) on left: 331, on right: 332 $@32 (527) on left: 333, on right: 334 $@33 (528) on left: 335, on right: 336 $@34 (529) on left: 340, on right: 341 screen_source_destination (530) on left: 344 346 348, on right: 337 $@35 (531) on left: 343, on right: 344 $@36 (532) on left: 345, on right: 346 $@37 (533) on left: 347, on right: 348 screen_to_name (534) on left: 349 350, on right: 346 screen_attrib (535) on left: 351 352 353 354 355 356 357 358 359 360 361 362 363 364 365 366 367 368 369 370 371 372 373 374, on right: 330 screen_attribx (536) on left: 375 376 377 378 379 380 381 382 383 384 385 386 387 388 389 390 391 392 393 394 395 396 397 398 399 400, on right: 864 sign_clause (537) on left: 401 402, on right: 357 381 440 separate_opt (538) on left: 403 404, on right: 401 402 character_opt (539) on left: 405 406, on right: 260 261 403 sign_is_opt (540) on left: 407 408, on right: 401 402 plus_minus_opt (541) on left: 409 410 411 412 413, on right: 327 329 number_is_opt (542) on left: 414 415, on right: 327 329 file_section (543) on left: 419 423 424 425, on right: 179 419 423 $@38 (544) on left: 416, on right: 419 $@39 (545) on left: 417, on right: 419 $@40 (546) on left: 418, on right: 419 $@41 (547) on left: 420, on right: 423 $@42 (548) on left: 421, on right: 423 $@43 (549) on left: 422, on right: 423 file_description (550) on left: 426 427, on right: 419 423 427 field_description (551) on left: 429, on right: 426 427 553 556 $@44 (552) on left: 428, on right: 429 data_clauses (553) on left: 430 431 432, on right: 429 431 432 redefines_clause (554) on left: 434, on right: 432 $@45 (555) on left: 433, on right: 434 redefines_var (556) on left: 435 436, on right: 434 data_clause (557) on left: 437 438 439 440 441 442 443 444 445 446 448, on right: 431 $@46 (558) on left: 447, on right: 448 sync_options (559) on left: 449 450 451, on right: 442 443 thru_gname_opt (560) on left: 452 453, on right: 448 array_options (561) on left: 455 458, on right: 437 $@47 (562) on left: 454, on right: 455 $@48 (563) on left: 456, on right: 458 $@49 (564) on left: 457, on right: 458 key_is_opt (565) on left: 459 460, on right: 461 indexed_by_opt (566) on left: 461 462, on right: 455 458 index_name_list (567) on left: 463 464, on right: 461 464 usage_option (568) on left: 465, on right: 439 usage (569) on left: 466 467 468, on right: 465 value_option (570) on left: 469, on right: 441 value_is_are (571) on left: 470 471, on right: 338 469 value_list (572) on left: 472 473, on right: 469 473 value (573) on left: 474 475, on right: 472 473 pictures (574) on left: 477, on right: 339 438 $@50 (575) on left: 476, on right: 477 picture (576) on left: 478 479, on right: 263 477 479 pic_elem (577) on left: 480, on right: 479 multiplier_opt (578) on left: 481 482, on right: 480 file_description_fd_clauses (579) on left: 483 484, on right: 419 484 file_description_sd_clauses (580) on left: 485 486, on right: 423 486 file_description_fd_clause (581) on left: 487 488 489 490 491 492 493 494 495 496, on right: 484 file_description_sd_clause (582) on left: 497 498, on right: 486 file_description_clause_block (583) on left: 499, on right: 489 file_description_clause_record (584) on left: 500 501, on right: 490 497 file_description_clause_label (585) on left: 502, on right: 491 file_description_clause_value (586) on left: 503, on right: 492 file_description_clause_data (587) on left: 504, on right: 493 498 file_description_clause_report (588) on left: 505, on right: 494 file_description_clause_code_set (589) on left: 506, on right: 496 file_description_clause_linage (590) on left: 507, on right: 495 file_description_clause_linage_footing (591) on left: 508 509, on right: 507 file_description_clause_linage_top (592) on left: 510 511, on right: 507 file_description_clause_linage_bottom (593) on left: 512 513, on right: 507 lines_at_opt (594) on left: 514 515 516 517, on right: 511 513 report_is_are (595) on left: 518 519, on right: 505 var_strings (596) on left: 520 521, on right: 504 521 chars_or_recs_opt (597) on left: 522 523 524, on right: 499 to_integer_opt (598) on left: 525 526, on right: 499 depend_rec_varying (599) on left: 527 528, on right: 501 from_rec_varying (600) on left: 529 530, on right: 501 from_opt (601) on left: 531 532, on right: 530 to_rec_varying (602) on left: 533 534, on right: 500 501 record_is_are (603) on left: 535 536, on right: 502 504 std_or_omitt (604) on left: 537 538, on right: 502 usage_opt (605) on left: 539 540, on right: 465 times_opt (606) on left: 541 542, on right: 455 458 when_opt (607) on left: 543 544, on right: 298 369 393 446 contains_opt (608) on left: 545 546, on right: 157 499 500 character_opts (609) on left: 547 548, on right: 500 501 order_opt (610) on left: 549 550, on right: 761 data_opt (611) on left: 551 552, on right: 780 working_storage_section (612) on left: 553 554, on right: 182 553 linkage_section (613) on left: 555 556, on right: 185 556 procedure_division_opt (614) on left: 559 560, on right: 11 $@51 (615) on left: 557, on right: 559 $@52 (616) on left: 558, on right: 559 procedure_division (617) on left: 561 562, on right: 559 562 procedure_decl (618) on left: 563 564 566 568 569, on right: 562 $@53 (619) on left: 565, on right: 566 $@54 (620) on left: 567, on right: 568 declaratives_opt (621) on left: 571 572, on right: 559 $@55 (622) on left: 570, on right: 571 declaratives_division (623) on left: 573 574, on right: 571 574 declaratives_decl (624) on left: 575 576 578 580, on right: 574 $@56 (625) on left: 577, on right: 578 $@57 (626) on left: 579, on right: 580 declaratives_procedure (627) on left: 582 583, on right: 571 575 $@58 (628) on left: 581, on right: 582 use_phrase (629) on left: 584 585, on right: 582 use_phrase_exception_error (630) on left: 586 587 588 589, on right: 584 use_phrase_option (631) on left: 590 591, on right: 584 procedure_section (632) on left: 592, on right: 563 582 paragraph (633) on left: 593, on right: 564 576 dot_or_eos (634) on left: 594 595, on right: 593 statement_list (635) on left: 596, on right: 686 705 711 719 836 918 923 925 1003 1048 1053 1056 1059 1066 1068 1177 statements (636) on left: 597 598, on right: 566 578 596 598 statement (637) on left: 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641, on right: 597 598 perform_statement (638) on left: 642, on right: 617 if_statement (639) on left: 644 647, on right: 638 $@59 (640) on left: 643, on right: 644 @60 (641) on left: 645, on right: 647 $@61 (642) on left: 646, on right: 647 search_statement (643) on left: 648 649, on right: 640 evaluate_statement (644) on left: 652, on right: 639 @62 (645) on left: 650, on right: 652 $@63 (646) on left: 651, on right: 652 end_evaluate_or_eos (647) on left: 653 654, on right: 652 selection_subject_set (648) on left: 656 658, on right: 652 658 @64 (649) on left: 655, on right: 656 @65 (650) on left: 657, on right: 658 selection_subject (651) on left: 659 660 661 662, on right: 656 658 when_case_list (652) on left: 665 669, on right: 652 669 @66 (653) on left: 663, on right: 665 @67 (654) on left: 664, on right: 665 @68 (655) on left: 666, on right: 669 @69 (656) on left: 667, on right: 669 $@70 (657) on left: 668, on right: 669 when_case (658) on left: 671 673 674, on right: 665 669 673 @71 (659) on left: 670, on right: 671 @72 (660) on left: 672, on right: 673 selection_object (661) on left: 675 676 677 678 679 680, on right: 671 673 sentence_or_nothing (662) on left: 681 682, on right: 665 669 if_part (663) on left: 684, on right: 644 647 @73 (664) on left: 683, on right: 684 conditional_statement (665) on left: 686 688, on right: 647 682 684 $@74 (666) on left: 685, on right: 686 $@75 (667) on left: 687, on right: 688 not_opt (668) on left: 689 690, on right: 678 679 680 end_if_opt (669) on left: 691 692, on right: 644 647 end_then_opt (670) on left: 693 694, on right: 684 search (671) on left: 698, on right: 648 @76 (672) on left: 695, on right: 698 @77 (673) on left: 696, on right: 698 @78 (674) on left: 697, on right: 698 search_all (675) on left: 701, on right: 649 @79 (676) on left: 699, on right: 701 $@80 (677) on left: 700, on right: 701 search_varying_opt (678) on left: 702 703, on right: 698 search_at_end (679) on left: 705 706, on right: 698 701 @81 (680) on left: 704, on right: 705 search_when_list (681) on left: 707 708, on right: 698 708 search_when (682) on left: 710, on right: 707 708 @82 (683) on left: 709, on right: 710 search_when_statement (684) on left: 711 712, on right: 710 search_when_conditional (685) on left: 713, on right: 710 search_all_when_list (686) on left: 714 715, on right: 701 715 search_all_when (687) on left: 718, on right: 714 715 $@83 (688) on left: 716, on right: 718 @84 (689) on left: 717, on right: 718 search_all_when_statement (690) on left: 719 720, on right: 718 search_all_when_conditional (691) on left: 721 722 724, on right: 718 724 @85 (692) on left: 723, on right: 724 end_search_opt (693) on left: 725 726, on right: 648 649 unlock_statement (694) on left: 727, on right: 637 proto_statement (695) on left: 728 729, on right: 633 trace_statement (696) on left: 730 731, on right: 634 initiate_statement (697) on left: 732, on right: 630 generate_statement (698) on left: 733, on right: 631 terminate_statement (699) on left: 734, on right: 632 cancel_statement (700) on left: 735 736, on right: 636 merge_statement (701) on left: 740, on right: 626 $@86 (702) on left: 737, on right: 740 $@87 (703) on left: 738, on right: 740 $@88 (704) on left: 739, on right: 740 merge_using (705) on left: 741, on right: 740 sort_statement (706) on left: 742 743, on right: 625 sort_file (707) on left: 747, on right: 742 $@89 (708) on left: 744, on right: 747 $@90 (709) on left: 745, on right: 747 $@91 (710) on left: 746, on right: 747 sort_variable_indexed (711) on left: 749, on right: 743 $@92 (712) on left: 748, on right: 749 sort_keys (713) on left: 750 751, on right: 740 747 751 sort_keys_idx (714) on left: 752 753, on right: 749 753 sort_key (715) on left: 754, on right: 750 751 sort_key_idx (716) on left: 755, on right: 752 753 sort_keys_names (717) on left: 756 757, on right: 754 757 sort_keys_names_idx (718) on left: 758 759, on right: 755 759 sort_duplicates_opt (719) on left: 760 761, on right: 747 749 sort_collating_opt (720) on left: 762 763, on right: 740 747 749 sort_input (721) on left: 764 765, on right: 747 sort_output (722) on left: 766 767, on right: 740 747 sort_file_list (723) on left: 768 769, on right: 741 765 767 769 move_statement (724) on left: 770 771 772 773, on right: 599 initialize_statement (725) on left: 774 775, on right: 600 initialize_replacing_opt (726) on left: 776 777, on right: 774 initialize_replacing_lists (727) on left: 778 779, on right: 777 779 initialize_replacing_list (728) on left: 780, on right: 778 779 initialize_type_list (729) on left: 781 782 783 784 785, on right: 780 compute_statement (730) on left: 786 787, on right: 601 compute_body (731) on left: 788, on right: 786 end_compute_opt (732) on left: 789 790, on right: 786 add_statement (733) on left: 791 792, on right: 602 add_body (734) on left: 793 794 795, on right: 791 add_to_opt (735) on left: 796 797, on right: 794 end_add_opt (736) on left: 798 799, on right: 791 subtract_statement (737) on left: 800 801, on right: 603 subtract_body (738) on left: 802 803 804, on right: 800 end_subtract_opt (739) on left: 805 806, on right: 800 multiply_statement (740) on left: 807 808, on right: 604 multiply_body (741) on left: 809 810, on right: 807 end_multiply_opt (742) on left: 811 812, on right: 807 divide_statement (743) on left: 813 814, on right: 605 divide_body (744) on left: 815 816 817 818 819, on right: 813 end_divide_opt (745) on left: 820 821, on right: 813 accept_statement (746) on left: 822 823 824 825, on right: 606 accept_hardware (747) on left: 826 827 828 829 830, on right: 822 accept_chronological (748) on left: 831, on right: 823 accept_screen (749) on left: 832 836, on right: 824 $@93 (750) on left: 833, on right: 836 @94 (751) on left: 834, on right: 836 $@95 (752) on left: 835, on right: 836 end_accept_opt (753) on left: 837 838, on right: 826 827 828 829 830 831 832 836 display_statement (754) on left: 839 840 841, on right: 607 display_line (755) on left: 842, on right: 839 display_screen (756) on left: 843, on right: 840 display_varlist (757) on left: 844 845, on right: 842 843 845 display_upon (758) on left: 846 847 848, on right: 842 display_line_options (759) on left: 849 850 851 852 853 854, on right: 842 850 851 852 853 854 end_display_opt (760) on left: 855 856, on right: 842 843 scr_line (761) on left: 857, on right: 865 scr_position (762) on left: 858 859, on right: 866 scr_line_position (763) on left: 860 861, on right: 867 accept_display_options (764) on left: 862 863, on right: 832 836 843 863 accept_display_option (765) on left: 864 865 866 867, on right: 863 open_statement (766) on left: 868 869, on right: 608 open_options (767) on left: 870 871, on right: 868 871 open_mode (768) on left: 872 873 874 875 876, on right: 591 870 871 open_varlist (769) on left: 877 878, on right: 870 871 878 close_statement (770) on left: 879 880, on right: 609 close_files (771) on left: 881 882, on right: 879 882 close_file (772) on left: 883, on right: 881 882 close_options_opt (773) on left: 884 885, on right: 883 close_options (774) on left: 886 887 888 889 890, on right: 884 with_lock_opt (775) on left: 891 892 893, on right: 885 900 901 902 return_statement (776) on left: 894 895, on right: 611 return_body (777) on left: 896 897, on right: 894 read_statement (778) on left: 898 899, on right: 610 read_body (779) on left: 900 901 902, on right: 898 read_next_opt (780) on left: 903 904 905, on right: 900 901 902 read_into_opt (781) on left: 906 907, on right: 896 897 900 901 902 read_key_opt (782) on left: 908 909, on right: 900 901 902 read_at_end_opt (783) on left: 910 911 912 914 916, on right: 897 901 $@96 (784) on left: 913, on right: 914 $@97 (785) on left: 915, on right: 916 on_end (786) on left: 918, on right: 910 911 912 914 916 @98 (787) on left: 917, on right: 918 read_invalid_key_opt (788) on left: 919 920 921, on right: 902 read_invalid_key (789) on left: 923, on right: 919 921 @99 (790) on left: 922, on right: 923 read_not_invalid_key (791) on left: 925, on right: 920 921 @100 (792) on left: 924, on right: 925 end_read_opt (793) on left: 926 927, on right: 898 end_return_opt (794) on left: 928 929, on right: 894 release_statement (795) on left: 930, on right: 612 release_from_opt (796) on left: 931 932, on right: 930 write_statement (797) on left: 934, on right: 613 $@101 (798) on left: 933, on right: 934 write_from_opt (799) on left: 935 936, on right: 934 943 write_options (800) on left: 937 938 939, on right: 934 end_write_opt (801) on left: 940 941, on right: 934 rewrite_statement (802) on left: 943, on right: 614 $@102 (803) on left: 942, on right: 943 end_rewrite_opt (804) on left: 944 945, on right: 943 delete_statement (805) on left: 947, on right: 615 $@103 (806) on left: 946, on right: 947 end_delete_opt (807) on left: 948 949, on right: 947 start_statement (808) on left: 951, on right: 616 $@104 (809) on left: 950, on right: 951 start_body (810) on left: 952 953, on right: 951 end_start_opt (811) on left: 954 955, on right: 951 goto_statement (812) on left: 956 957, on right: 618 goto_label (813) on left: 958, on right: 956 goto_label_list (814) on left: 959 960 961, on right: 957 960 961 call_statement (815) on left: 967 968, on right: 621 $@105 (816) on left: 962, on right: 967 @106 (817) on left: 963, on right: 967 @107 (818) on left: 964, on right: 967 @108 (819) on left: 965, on right: 967 $@109 (820) on left: 966, on right: 967 call_convention_opt (821) on left: 969 970 971, on right: 967 call_loadlib_statement (822) on left: 973 974, on right: 622 $@110 (823) on left: 972, on right: 973 end_call_loadlib_opt (824) on left: 975 976, on right: 973 chain_statement (825) on left: 981 982, on right: 623 $@111 (826) on left: 977, on right: 981 @112 (827) on left: 978, on right: 981 @113 (828) on left: 979, on right: 981 $@114 (829) on left: 980, on right: 981 exit_statement (830) on left: 983 984 985, on right: 619 stop_statement (831) on left: 986 987, on right: 620 stop_literal (832) on left: 988 989, on right: 987 goback_statement (833) on left: 990, on right: 635 var_list_name (834) on left: 991 992, on right: 788 793 794 795 802 803 804 809 810 815 818 819 992 var_list_gname (835) on left: 993 994, on right: 793 794 795 802 803 804 994 rounded_opt (836) on left: 995 996, on right: 795 804 816 817 991 992 on_size_error_opt (837) on left: 997 998 999 1001, on right: 788 793 794 795 802 803 804 809 810 815 816 817 818 819 $@115 (838) on left: 1000, on right: 1001 on_size_error (839) on left: 1003, on right: 998 999 1001 @116 (840) on left: 1002, on right: 1003 size_opt (841) on left: 1004 1005, on right: 501 end_call_opt (842) on left: 1006 1007, on right: 967 end_chain_opt (843) on left: 1008 1009, on right: 981 set_statement (844) on left: 1010, on right: 624 set_list (845) on left: 1011 1012 1013 1014, on right: 1010 set_target (846) on left: 1015 1016, on right: 1011 1012 1013 set_variable (847) on left: 1017 1018, on right: 1014 set_variable_or_nlit (848) on left: 1019 1020 1021 1022 1023, on right: 1011 address_of_opt (849) on left: 1024 1025, on right: 1011 1014 string_statement (850) on left: 1027, on right: 628 $@117 (851) on left: 1026, on right: 1027 unstring_statement (852) on left: 1029, on right: 629 $@118 (853) on left: 1028, on right: 1029 unstring_delimited (854) on left: 1030 1031, on right: 1029 unstring_delimited_vars (855) on left: 1032 1033, on right: 1030 1033 unstring_destinations (856) on left: 1034 1035, on right: 1029 1035 unstring_dest_var (857) on left: 1036, on right: 1034 1035 unstring_delim_opt (858) on left: 1037 1038, on right: 1036 unstring_count_opt (859) on left: 1039 1040, on right: 1036 unstring_tallying (860) on left: 1041 1042, on right: 1029 all_opt (861) on left: 1043 1044, on right: 1032 1033 on_overflow_opt (862) on left: 1046, on right: 1027 1029 $@119 (863) on left: 1045, on right: 1046 on_exception_or_overflow (864) on left: 1048 1049, on right: 967 981 @120 (865) on left: 1047, on right: 1048 exception_or_overflow (866) on left: 1050 1051, on right: 1048 on_not_exception (867) on left: 1053 1054, on right: 967 @121 (868) on left: 1052, on right: 1053 on_overflow (869) on left: 1056 1057, on right: 1046 @122 (870) on left: 1055, on right: 1056 on_not_overflow (871) on left: 1059 1060, on right: 1046 @123 (872) on left: 1058, on right: 1059 invalid_key_opt (873) on left: 1061 1062 1063 1064, on right: 934 943 947 951 invalid_key_sentence (874) on left: 1066, on right: 1061 1063 @124 (875) on left: 1065, on right: 1066 not_invalid_key_sentence (876) on left: 1068, on right: 1062 1063 @125 (877) on left: 1067, on right: 1068 not_excep (878) on left: 1069 1070, on right: 1059 1068 string_with_pointer (879) on left: 1071 1072, on right: 1027 1029 string_from_list (880) on left: 1073 1074 1075, on right: 1027 1074 string_from (881) on left: 1076 1077, on right: 1073 1074 delimited_by (882) on left: 1078 1079 1080, on right: 1077 end_stringcmd_opt (883) on left: 1081 1082, on right: 1027 end_unstring_opt (884) on left: 1083 1084, on right: 1029 inspect_statement (885) on left: 1086 1087, on right: 627 $@126 (886) on left: 1085, on right: 1086 converting_clause (887) on left: 1088, on right: 1087 tallying_clause (888) on left: 1089 1090, on right: 1086 tallying_list (889) on left: 1091 1092, on right: 1089 1091 tallying_for_list (890) on left: 1093 1094 1095 1096, on right: 1091 1093 1094 1095 replacing_clause (891) on left: 1097 1098, on right: 1086 replacing_list (892) on left: 1099 1100 1101, on right: 1097 1099 1100 replacing_by_list (893) on left: 1102 1103, on right: 1100 1102 replacing_kind (894) on left: 1104 1105 1106 1107, on right: 1100 inspect_before_after (895) on left: 1108 1109 1110, on right: 1088 1093 1094 1095 1099 1102 1108 1109 initial_opt (896) on left: 1111 1112, on right: 1108 1109 expr (897) on left: 1113 1114 1115 1116 1117 1118 1119, on right: 659 678 679 788 857 858 859 1114 1115 1116 1117 1118 1119 1121 1181 1190 1191 expr_opt (898) on left: 1120 1121, on right: 1181 using_options (899) on left: 1122 1125, on right: 967 981 @127 (900) on left: 1123, on right: 1125 @128 (901) on left: 1124, on right: 1125 returning_options (902) on left: 1126 1127 1128, on right: 967 dummy (903) on left: 1129, on right: 1125 using_parameters (904) on left: 1130 1131 1132, on right: 559 parm_list (905) on left: 1133 1134, on right: 1125 1133 parameter (906) on left: 1135 1136, on right: 1133 1134 parm_type (907) on left: 1137 1138 1139, on right: 1136 intrinsic_parm_list (908) on left: 1140 1141, on right: 1140 1248 intrinsic_parm (909) on left: 1142, on right: 1140 1141 perform_range (910) on left: 1143, on right: 764 766 perform_options (911) on left: 1144 1147 1151 1155 1156 1158 1159 1162, on right: 642 @129 (912) on left: 1145, on right: 1147 $@130 (913) on left: 1146, on right: 1147 @131 (914) on left: 1148, on right: 1151 @132 (915) on left: 1149, on right: 1151 $@133 (916) on left: 1150, on right: 1151 @134 (917) on left: 1152, on right: 1155 @135 (918) on left: 1153, on right: 1155 $@136 (919) on left: 1154, on right: 1155 @137 (920) on left: 1157, on right: 1158 @138 (921) on left: 1160, on right: 1162 @139 (922) on left: 1161, on right: 1162 perform_thru_opt (923) on left: 1163 1164, on right: 1143 1156 1158 1159 1162 with_test_opt (924) on left: 1165 1166, on right: 1151 1155 1158 1162 perform_after_opt (925) on left: 1167 1168 1169 1170 1171 1172 1173, on right: 1155 1162 perform_after (926) on left: 1175, on right: 1168 1169 1170 1171 1172 1173 @140 (927) on left: 1174, on right: 1175 perform_statements (928) on left: 1177, on right: 1144 1147 1151 1155 $@141 (929) on left: 1176, on right: 1177 before_after (930) on left: 1178 1179, on right: 938 939 1166 condition (931) on left: 1181 1182 1184 1186 1187 1188, on right: 660 684 1151 1155 1158 1162 1175 1182 1184 1186 1187 1189 $@142 (932) on left: 1180, on right: 1181 @143 (933) on left: 1183, on right: 1184 @144 (934) on left: 1185, on right: 1186 implied_op_condition (935) on left: 1189 1190 1191, on right: 1184 1186 sign_condition (936) on left: 1192 1193 1194, on right: 1207 class_condition (937) on left: 1195 1196 1197 1198, on right: 1206 extended_cond_op (938) on left: 1199 1200 1201 1202 1203 1204, on right: 713 1181 ext_cond (939) on left: 1205 1206 1207, on right: 1199 1200 1201 1202 1203 1204 cond_op (940) on left: 1208 1209 1210, on right: 953 1190 conditional (941) on left: 1211, on right: 1205 1208 1209 1210 comma_opt (942) on left: 1212 1213, on right: 473 1297 sep_opt (943) on left: 1214 1215, on right: 845 878 882 991 992 993 994 1035 1074 1133 1140 1242 1244 key_opt (944) on left: 1216 1217, on right: 110 111 112 459 754 755 923 925 1066 1068 advancing_opt (945) on left: 1218 1219, on right: 938 939 than_to_opt (946) on left: 1220 1221 1222, on right: 1211 record_opt (947) on left: 1223 1224, on right: 896 897 900 901 902 947 at_opt (948) on left: 1225 1226, on right: 509 705 910 914 916 in_opt (949) on left: 1227 1228, on right: 501 761 1038 1040 1042 in_of (950) on left: 1229 1230, on right: 1293 1302 1305 1306 by_opt (951) on left: 1231 1232, on right: 461 1030 1077 1136 1155 1162 1175 with_opt (952) on left: 1233 1234, on right: 46 124 330 332 334 336 356 370 371 372 380 394 395 396 509 761 850 851 852 853 854 864 886 891 892 1071 1166 on_opt (953) on left: 1235 1236, on right: 458 528 584 754 755 836 957 998 999 1001 1048 1053 1056 1059 gname_opt (954) on left: 1237 1238, on right: 1285 to_opt (955) on left: 1239 1240, on right: 107 721 722 956 957 name_var_list (956) on left: 1241 1242, on right: 770 1242 gname_list (957) on left: 1243 1244, on right: 293 302 590 774 1131 1132 1244 gname (958) on left: 1245 1246 1248 1249, on right: 294 304 312 458 728 729 735 770 772 773 780 797 803 809 810 815 816 817 818 819 844 845 932 936 938 967 973 981 993 994 1032 1033 1076 1077 1078 1113 1135 1136 1142 1147 1155 1159 1162 1175 1237 1243 1244 1285 1288 1298 1299 1300 @145 (959) on left: 1247, on right: 1248 name_or_lit (960) on left: 1250 1251, on right: 327 329 332 334 336 341 344 346 713 1019 noallname (961) on left: 1252 1253, on right: 1088 1094 1095 1099 1102 1108 1109 gliteral (962) on left: 1254 1255, on right: 198 338 474 475 1246 without_all_literal (963) on left: 1256 1257, on right: 88 89 90 91 92 1253 1254 all_literal (964) on left: 1258 1259, on right: 1255 special_literal (965) on left: 1260 1261 1262 1263 1264, on right: 1257 1259 var_or_nliteral (966) on left: 1265 1266, on right: 1012 1013 nliteral (967) on left: 1267, on right: 530 534 1266 literal (968) on left: 1268 1269, on right: 290 722 1251 1256 1258 1278 1280 signed_nliteral (969) on left: 1270 1271 1272, on right: 1267 1268 1301 def_name_opt (970) on left: 1273 1274, on right: 227 325 429 def_name (971) on left: 1275 1276, on right: 103 463 464 1273 variable_indexed (972) on left: 1277, on right: 698 701 749 758 759 filename (973) on left: 1278 1279, on right: 120 121 122 503 data_name (974) on left: 1280 1281, on right: 507 509 511 513 cond_name (975) on left: 1283 1284, on right: 680 1016 1188 $@146 (976) on left: 1282, on right: 1283 name (977) on left: 1285 1286 1287, on right: 223 348 350 727 732 733 734 740 747 756 757 768 769 816 817 826 827 828 829 830 831 832 836 877 878 883 896 897 900 901 902 907 909 930 934 943 947 952 953 991 992 1027 1029 1036 1038 1040 1042 1071 1086 1087 1091 1155 1162 1175 1245 1250 1252 name_var (978) on left: 1288, on right: 771 772 1241 1242 variable (979) on left: 1289 1291, on right: 172 173 448 453 702 721 722 836 861 957 1014 1017 1127 1128 1265 1285 1286 $@147 (980) on left: 1290, on right: 1291 qualified_var (981) on left: 1292 1293, on right: 1289 1291 1293 unqualified_var (982) on left: 1294 1295, on right: 1292 1293 subscripts (983) on left: 1296 1297, on right: 1283 1291 1297 subscript (984) on left: 1298 1299 1300, on right: 1296 1297 1299 1300 integer (985) on left: 1301, on right: 162 202 204 215 217 219 227 268 269 270 271 276 314 315 325 399 400 429 455 458 499 500 526 label (986) on left: 1302 1303 1304 1305 1306, on right: 958 959 960 961 1143 1156 1158 1159 1162 1164 anystring (987) on left: 1307 1308, on right: 141 145 state 0 0 $accept: . root_ $end IDENTIFICATION shift, and go to state 1 root_ go to state 2 program_sequences go to state 3 program_sequence go to state 4 program go to state 5 identification_division go to state 6 state 1 15 identification_division: IDENTIFICATION . DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt DIVISION shift, and go to state 7 state 2 0 $accept: root_ . $end $end shift, and go to state 8 state 3 1 root_: program_sequences . $default reduce using rule 1 (root_) state 4 3 program_sequences: program_sequence . 4 | program_sequence . program 8 program_sequence: program_sequence . program end_program IDENTIFICATION shift, and go to state 1 $default reduce using rule 3 (program_sequences) program go to state 9 identification_division go to state 6 state 5 2 program_sequences: program . 5 program_sequence: program . end_program 7 | program . $@1 program_sequence end_program END shift, and go to state 10 IDENTIFICATION reduce using rule 6 ($@1) $default reduce using rule 2 (program_sequences) $@1 go to state 11 end_program go to state 12 state 6 11 program: identification_division . environment_division_opt data_division_opt procedure_division_opt ENVIRONMENT shift, and go to state 13 $default reduce using rule 30 (environment_division_opt) environment_division_opt go to state 14 state 7 15 identification_division: IDENTIFICATION DIVISION . PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt PERIOD_TOK shift, and go to state 15 state 8 0 $accept: root_ $end . $default accept state 9 4 program_sequences: program_sequence program . 8 program_sequence: program_sequence program . end_program END shift, and go to state 10 $default reduce using rule 4 (program_sequences) end_program go to state 16 state 10 10 end_program: END . PROGRAM $@2 IDSTRING PROGRAM shift, and go to state 17 state 11 7 program_sequence: program $@1 . program_sequence end_program IDENTIFICATION shift, and go to state 1 program_sequence go to state 18 program go to state 19 identification_division go to state 6 state 12 5 program_sequence: program end_program . $default reduce using rule 5 (program_sequence) state 13 29 environment_division_opt: ENVIRONMENT . DIVISION PERIOD_TOK $@6 configuration_opt input_output_opt DIVISION shift, and go to state 20 state 14 11 program: identification_division environment_division_opt . data_division_opt procedure_division_opt DATA shift, and go to state 21 $default reduce using rule 177 (data_division_opt) data_division_opt go to state 22 state 15 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK . PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt PROGRAM_ID shift, and go to state 23 state 16 8 program_sequence: program_sequence program end_program . $default reduce using rule 8 (program_sequence) state 17 10 end_program: END PROGRAM . $@2 IDSTRING $default reduce using rule 9 ($@2) $@2 go to state 24 state 18 7 program_sequence: program $@1 program_sequence . end_program 8 | program_sequence . program end_program END shift, and go to state 10 IDENTIFICATION shift, and go to state 1 end_program go to state 25 program go to state 26 identification_division go to state 6 state 19 5 program_sequence: program . end_program 7 | program . $@1 program_sequence end_program END shift, and go to state 10 $default reduce using rule 6 ($@1) $@1 go to state 11 end_program go to state 12 state 20 29 environment_division_opt: ENVIRONMENT DIVISION . PERIOD_TOK $@6 configuration_opt input_output_opt PERIOD_TOK shift, and go to state 27 state 21 176 data_division_opt: DATA . DIVISION PERIOD_TOK $@11 file_section_opt working_storage_opt linkage_section_opt report_section_opt screen_section_opt DIVISION shift, and go to state 28 state 22 11 program: identification_division environment_division_opt data_division_opt . procedure_division_opt PROCEDURE shift, and go to state 29 $default reduce using rule 560 (procedure_division_opt) procedure_division_opt go to state 30 state 23 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID . PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt PERIOD_TOK shift, and go to state 31 state 24 10 end_program: END PROGRAM $@2 . IDSTRING IDSTRING shift, and go to state 32 state 25 7 program_sequence: program $@1 program_sequence end_program . $default reduce using rule 7 (program_sequence) state 26 8 program_sequence: program_sequence program . end_program END shift, and go to state 10 end_program go to state 16 state 27 29 environment_division_opt: ENVIRONMENT DIVISION PERIOD_TOK . $@6 configuration_opt input_output_opt $default reduce using rule 28 ($@6) $@6 go to state 33 state 28 176 data_division_opt: DATA DIVISION . PERIOD_TOK $@11 file_section_opt working_storage_opt linkage_section_opt report_section_opt screen_section_opt PERIOD_TOK shift, and go to state 34 state 29 559 procedure_division_opt: PROCEDURE . DIVISION $@51 using_parameters PERIOD_TOK $@52 declaratives_opt procedure_division DIVISION shift, and go to state 35 state 30 11 program: identification_division environment_division_opt data_division_opt procedure_division_opt . $default reduce using rule 11 (program) state 31 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK . $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt $default reduce using rule 12 ($@3) $@3 go to state 36 state 32 10 end_program: END PROGRAM $@2 IDSTRING . $default reduce using rule 10 (end_program) state 33 29 environment_division_opt: ENVIRONMENT DIVISION PERIOD_TOK $@6 . configuration_opt input_output_opt CONFIGURATION shift, and go to state 37 $default reduce using rule 32 (configuration_opt) configuration_opt go to state 38 state 34 176 data_division_opt: DATA DIVISION PERIOD_TOK . $@11 file_section_opt working_storage_opt linkage_section_opt report_section_opt screen_section_opt $default reduce using rule 175 ($@11) $@11 go to state 39 state 35 559 procedure_division_opt: PROCEDURE DIVISION . $@51 using_parameters PERIOD_TOK $@52 declaratives_opt procedure_division $default reduce using rule 557 ($@51) $@51 go to state 40 state 36 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 . IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt IDSTRING shift, and go to state 41 state 37 31 configuration_opt: CONFIGURATION . SECTION PERIOD_TOK configuration_section SECTION shift, and go to state 42 state 38 29 environment_division_opt: ENVIRONMENT DIVISION PERIOD_TOK $@6 configuration_opt . input_output_opt INPUT_OUTPUT shift, and go to state 43 $default reduce using rule 94 (input_output_opt) input_output_opt go to state 44 state 39 176 data_division_opt: DATA DIVISION PERIOD_TOK $@11 . file_section_opt working_storage_opt linkage_section_opt report_section_opt screen_section_opt FILE_TOK shift, and go to state 45 $default reduce using rule 180 (file_section_opt) file_section_opt go to state 46 state 40 559 procedure_division_opt: PROCEDURE DIVISION $@51 . using_parameters PERIOD_TOK $@52 declaratives_opt procedure_division CHAINING shift, and go to state 47 USING shift, and go to state 48 $default reduce using rule 1130 (using_parameters) using_parameters go to state 49 state 41 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING . $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt $default reduce using rule 13 ($@4) $@4 go to state 50 state 42 31 configuration_opt: CONFIGURATION SECTION . PERIOD_TOK configuration_section PERIOD_TOK shift, and go to state 51 state 43 93 input_output_opt: INPUT_OUTPUT . SECTION PERIOD_TOK input_output_section SECTION shift, and go to state 52 state 44 29 environment_division_opt: ENVIRONMENT DIVISION PERIOD_TOK $@6 configuration_opt input_output_opt . $default reduce using rule 29 (environment_division_opt) state 45 179 file_section_opt: FILE_TOK . SECTION PERIOD_TOK $@12 file_section SECTION shift, and go to state 53 state 46 176 data_division_opt: DATA DIVISION PERIOD_TOK $@11 file_section_opt . working_storage_opt linkage_section_opt report_section_opt screen_section_opt WORKING_STORAGE shift, and go to state 54 $default reduce using rule 183 (working_storage_opt) working_storage_opt go to state 55 state 47 1132 using_parameters: CHAINING . gname_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname_list go to state 70 gname go to state 71 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 48 1131 using_parameters: USING . gname_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname_list go to state 82 gname go to state 71 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 49 559 procedure_division_opt: PROCEDURE DIVISION $@51 using_parameters . PERIOD_TOK $@52 declaratives_opt procedure_division PERIOD_TOK shift, and go to state 83 state 50 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 . programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt IS shift, and go to state 84 PERIOD_TOK reduce using rule 16 (programid_opts_opt) $default reduce using rule 132 (is_opt) programid_opts_opt go to state 85 is_opt go to state 86 state 51 31 configuration_opt: CONFIGURATION SECTION PERIOD_TOK . configuration_section $default reduce using rule 34 (configuration_section) configuration_section go to state 87 state 52 93 input_output_opt: INPUT_OUTPUT SECTION . PERIOD_TOK input_output_section PERIOD_TOK shift, and go to state 88 state 53 179 file_section_opt: FILE_TOK SECTION . PERIOD_TOK $@12 file_section PERIOD_TOK shift, and go to state 89 state 54 182 working_storage_opt: WORKING_STORAGE . SECTION PERIOD_TOK $@13 working_storage_section SECTION shift, and go to state 90 state 55 176 data_division_opt: DATA DIVISION PERIOD_TOK $@11 file_section_opt working_storage_opt . linkage_section_opt report_section_opt screen_section_opt LINKAGE shift, and go to state 91 $default reduce using rule 186 (linkage_section_opt) linkage_section_opt go to state 92 state 56 1294 unqualified_var: VARIABLE . $default reduce using rule 1294 (unqualified_var) state 57 1295 unqualified_var: SUBSCVAR . $default reduce using rule 1295 (unqualified_var) state 58 1287 name: LABELSTR . $default reduce using rule 1287 (name) state 59 1270 signed_nliteral: NLITERAL . $default reduce using rule 1270 (signed_nliteral) state 60 1269 literal: CLITERAL . $default reduce using rule 1269 (literal) state 61 1271 signed_nliteral: '+' . NLITERAL NLITERAL shift, and go to state 93 state 62 1272 signed_nliteral: '-' . NLITERAL NLITERAL shift, and go to state 94 state 63 1258 all_literal: ALL . literal 1259 | ALL . special_literal NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 special_literal go to state 95 literal go to state 96 signed_nliteral go to state 77 state 64 1248 gname: FUNCTION . LABELSTR '(' @145 intrinsic_parm_list ')' 1249 | FUNCTION . LABELSTR LABELSTR shift, and go to state 97 state 65 1263 special_literal: HIGHVALUES . $default reduce using rule 1263 (special_literal) state 66 1264 special_literal: LOWVALUES . $default reduce using rule 1264 (special_literal) state 67 1262 special_literal: QUOTES . $default reduce using rule 1262 (special_literal) state 68 1260 special_literal: SPACES . $default reduce using rule 1260 (special_literal) state 69 1261 special_literal: ZERO . $default reduce using rule 1261 (special_literal) state 70 1132 using_parameters: CHAINING gname_list . 1244 gname_list: gname_list . sep_opt gname LISTSEP shift, and go to state 98 PERIOD_TOK reduce using rule 1132 (using_parameters) $default reduce using rule 1214 (sep_opt) sep_opt go to state 99 state 71 1243 gname_list: gname . $default reduce using rule 1243 (gname_list) state 72 1246 gname: gliteral . $default reduce using rule 1246 (gname) state 73 1254 gliteral: without_all_literal . $default reduce using rule 1254 (gliteral) state 74 1255 gliteral: all_literal . $default reduce using rule 1255 (gliteral) state 75 1257 without_all_literal: special_literal . $default reduce using rule 1257 (without_all_literal) state 76 1256 without_all_literal: literal . $default reduce using rule 1256 (without_all_literal) state 77 1268 literal: signed_nliteral . $default reduce using rule 1268 (literal) state 78 1245 gname: name . $default reduce using rule 1245 (gname) state 79 1285 name: variable . '(' gname ':' gname_opt ')' 1286 | variable . '(' shift, and go to state 100 $default reduce using rule 1286 (name) state 80 1289 variable: qualified_var . 1291 | qualified_var . LPAR $@147 subscripts ')' LPAR shift, and go to state 101 $default reduce using rule 1289 (variable) state 81 1292 qualified_var: unqualified_var . 1293 | unqualified_var . in_of qualified_var IN shift, and go to state 102 OF shift, and go to state 103 $default reduce using rule 1292 (qualified_var) in_of go to state 104 state 82 1131 using_parameters: USING gname_list . 1244 gname_list: gname_list . sep_opt gname LISTSEP shift, and go to state 98 PERIOD_TOK reduce using rule 1131 (using_parameters) $default reduce using rule 1214 (sep_opt) sep_opt go to state 99 state 83 559 procedure_division_opt: PROCEDURE DIVISION $@51 using_parameters PERIOD_TOK . $@52 declaratives_opt procedure_division $default reduce using rule 558 ($@52) $@52 go to state 105 state 84 131 is_opt: IS . $default reduce using rule 131 (is_opt) state 85 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt . PERIOD_TOK $@5 identification_division_options_opt PERIOD_TOK shift, and go to state 106 state 86 17 programid_opts_opt: is_opt . INITIAL_TOK programid_program_opt 18 | is_opt . COMMON programid_program_opt COMMON shift, and go to state 107 INITIAL_TOK shift, and go to state 108 state 87 31 configuration_opt: CONFIGURATION SECTION PERIOD_TOK configuration_section . 33 configuration_section: configuration_section . configuration_option error shift, and go to state 109 OBJECT_COMPUTER shift, and go to state 110 SOURCE_COMPUTER shift, and go to state 111 SPECIAL_NAMES shift, and go to state 112 $end reduce using rule 31 (configuration_opt) INPUT_OUTPUT reduce using rule 31 (configuration_opt) DATA reduce using rule 31 (configuration_opt) END reduce using rule 31 (configuration_opt) IDENTIFICATION reduce using rule 31 (configuration_opt) PROCEDURE reduce using rule 31 (configuration_opt) configuration_option go to state 113 state 88 93 input_output_opt: INPUT_OUTPUT SECTION PERIOD_TOK . input_output_section error shift, and go to state 114 FILE_CONTROL shift, and go to state 115 input_output_section go to state 116 file_control_paragraph go to state 117 state 89 179 file_section_opt: FILE_TOK SECTION PERIOD_TOK . $@12 file_section $default reduce using rule 178 ($@12) $@12 go to state 118 state 90 182 working_storage_opt: WORKING_STORAGE SECTION . PERIOD_TOK $@13 working_storage_section PERIOD_TOK shift, and go to state 119 state 91 185 linkage_section_opt: LINKAGE . SECTION PERIOD_TOK $@14 linkage_section SECTION shift, and go to state 120 state 92 176 data_division_opt: DATA DIVISION PERIOD_TOK $@11 file_section_opt working_storage_opt linkage_section_opt . report_section_opt screen_section_opt REPORT shift, and go to state 121 $default reduce using rule 188 (report_section_opt) report_section_opt go to state 122 state 93 1271 signed_nliteral: '+' NLITERAL . $default reduce using rule 1271 (signed_nliteral) state 94 1272 signed_nliteral: '-' NLITERAL . $default reduce using rule 1272 (signed_nliteral) state 95 1259 all_literal: ALL special_literal . $default reduce using rule 1259 (all_literal) state 96 1258 all_literal: ALL literal . $default reduce using rule 1258 (all_literal) state 97 1248 gname: FUNCTION LABELSTR . '(' @145 intrinsic_parm_list ')' 1249 | FUNCTION LABELSTR . '(' shift, and go to state 123 $default reduce using rule 1249 (gname) state 98 1215 sep_opt: LISTSEP . $default reduce using rule 1215 (sep_opt) state 99 1244 gname_list: gname_list sep_opt . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 124 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 100 1285 name: variable '(' . gname ':' gname_opt ')' VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 125 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 101 1291 variable: qualified_var LPAR . $@147 subscripts ')' $default reduce using rule 1290 ($@147) $@147 go to state 126 state 102 1229 in_of: IN . $default reduce using rule 1229 (in_of) state 103 1230 in_of: OF . $default reduce using rule 1230 (in_of) state 104 1293 qualified_var: unqualified_var in_of . qualified_var VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 qualified_var go to state 127 unqualified_var go to state 81 state 105 559 procedure_division_opt: PROCEDURE DIVISION $@51 using_parameters PERIOD_TOK $@52 . declaratives_opt procedure_division DECLARATIVES shift, and go to state 128 $default reduce using rule 572 (declaratives_opt) declaratives_opt go to state 129 state 106 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK . $@5 identification_division_options_opt $default reduce using rule 14 ($@5) $@5 go to state 130 state 107 18 programid_opts_opt: is_opt COMMON . programid_program_opt PROGRAM shift, and go to state 131 $default reduce using rule 19 (programid_program_opt) programid_program_opt go to state 132 state 108 17 programid_opts_opt: is_opt INITIAL_TOK . programid_program_opt PROGRAM shift, and go to state 131 $default reduce using rule 19 (programid_program_opt) programid_program_opt go to state 133 state 109 40 configuration_option: error . $default reduce using rule 40 (configuration_option) state 110 38 configuration_option: OBJECT_COMPUTER . PERIOD_TOK $@8 STRING program_collating_opt PERIOD_TOK PERIOD_TOK shift, and go to state 134 state 111 36 configuration_option: SOURCE_COMPUTER . PERIOD_TOK $@7 STRING debug_mode_opt PERIOD_TOK PERIOD_TOK shift, and go to state 135 state 112 39 configuration_option: SPECIAL_NAMES . PERIOD_TOK special_names_opt PERIOD_TOK shift, and go to state 136 state 113 33 configuration_section: configuration_section configuration_option . $default reduce using rule 33 (configuration_section) state 114 96 input_output_section: error . $default reduce using rule 96 (input_output_section) state 115 97 file_control_paragraph: FILE_CONTROL . PERIOD_TOK file_control PERIOD_TOK shift, and go to state 137 state 116 93 input_output_opt: INPUT_OUTPUT SECTION PERIOD_TOK input_output_section . $default reduce using rule 93 (input_output_opt) state 117 95 input_output_section: file_control_paragraph . i_o_control_paragraph I_O_CONTROL shift, and go to state 138 $default reduce using rule 98 (i_o_control_paragraph) i_o_control_paragraph go to state 139 state 118 179 file_section_opt: FILE_TOK SECTION PERIOD_TOK $@12 . file_section error shift, and go to state 140 $end reduce using rule 425 (file_section) END reduce using rule 425 (file_section) FD reduce using rule 425 (file_section) IDENTIFICATION reduce using rule 425 (file_section) LINKAGE reduce using rule 425 (file_section) PROCEDURE reduce using rule 425 (file_section) REPORT reduce using rule 425 (file_section) SCREEN reduce using rule 425 (file_section) SD reduce using rule 425 (file_section) WORKING_STORAGE reduce using rule 425 (file_section) file_section go to state 141 state 119 182 working_storage_opt: WORKING_STORAGE SECTION PERIOD_TOK . $@13 working_storage_section $default reduce using rule 181 ($@13) $@13 go to state 142 state 120 185 linkage_section_opt: LINKAGE SECTION . PERIOD_TOK $@14 linkage_section PERIOD_TOK shift, and go to state 143 state 121 187 report_section_opt: REPORT . SECTION PERIOD_TOK report_sections SECTION shift, and go to state 144 state 122 176 data_division_opt: DATA DIVISION PERIOD_TOK $@11 file_section_opt working_storage_opt linkage_section_opt report_section_opt . screen_section_opt SCREEN shift, and go to state 145 $default reduce using rule 321 (screen_section_opt) screen_section_opt go to state 146 state 123 1248 gname: FUNCTION LABELSTR '(' . @145 intrinsic_parm_list ')' $default reduce using rule 1247 (@145) @145 go to state 147 state 124 1244 gname_list: gname_list sep_opt gname . $default reduce using rule 1244 (gname_list) state 125 1285 name: variable '(' gname . ':' gname_opt ')' ':' shift, and go to state 148 state 126 1291 variable: qualified_var LPAR $@147 . subscripts ')' VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 149 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 subscripts go to state 150 subscript go to state 151 state 127 1293 qualified_var: unqualified_var in_of qualified_var . $default reduce using rule 1293 (qualified_var) state 128 571 declaratives_opt: DECLARATIVES . PERIOD_TOK $@55 declaratives_procedure declaratives_division END DECLARATIVES PERIOD_TOK PERIOD_TOK shift, and go to state 152 state 129 559 procedure_division_opt: PROCEDURE DIVISION $@51 using_parameters PERIOD_TOK $@52 declaratives_opt . procedure_division $default reduce using rule 561 (procedure_division) procedure_division go to state 153 state 130 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 . identification_division_options_opt $default reduce using rule 21 (identification_division_options_opt) identification_division_options_opt go to state 154 state 131 20 programid_program_opt: PROGRAM . $default reduce using rule 20 (programid_program_opt) state 132 18 programid_opts_opt: is_opt COMMON programid_program_opt . $default reduce using rule 18 (programid_opts_opt) state 133 17 programid_opts_opt: is_opt INITIAL_TOK programid_program_opt . $default reduce using rule 17 (programid_opts_opt) state 134 38 configuration_option: OBJECT_COMPUTER PERIOD_TOK . $@8 STRING program_collating_opt PERIOD_TOK $default reduce using rule 37 ($@8) $@8 go to state 155 state 135 36 configuration_option: SOURCE_COMPUTER PERIOD_TOK . $@7 STRING debug_mode_opt PERIOD_TOK $default reduce using rule 35 ($@7) $@7 go to state 156 state 136 39 configuration_option: SPECIAL_NAMES PERIOD_TOK . special_names_opt error shift, and go to state 157 ALPHABET shift, and go to state 158 CLASS shift, and go to state 159 CURRENCY shift, and go to state 160 CURSOR shift, and go to state 161 DECIMAL_POINT shift, and go to state 162 DISPLAY_SCREEN shift, and go to state 163 $end reduce using rule 48 (special_names_opt) error [reduce using rule 48 (special_names_opt)] STRING reduce using rule 71 (switches_details_list) INPUT_OUTPUT reduce using rule 48 (special_names_opt) ALPHABET [reduce using rule 71 (switches_details_list)] CLASS [reduce using rule 71 (switches_details_list)] CURRENCY [reduce using rule 71 (switches_details_list)] CURSOR [reduce using rule 71 (switches_details_list)] DATA reduce using rule 48 (special_names_opt) DECIMAL_POINT [reduce using rule 71 (switches_details_list)] DISPLAY_SCREEN [reduce using rule 71 (switches_details_list)] END reduce using rule 48 (special_names_opt) IDENTIFICATION reduce using rule 48 (special_names_opt) OBJECT_COMPUTER reduce using rule 48 (special_names_opt) PROCEDURE reduce using rule 48 (special_names_opt) SOURCE_COMPUTER reduce using rule 48 (special_names_opt) SPECIAL_NAMES reduce using rule 48 (special_names_opt) PERIOD_TOK reduce using rule 71 (switches_details_list) special_names_opt go to state 164 special_names go to state 165 special_name go to state 166 currency_details go to state 167 special_name_class go to state 168 decimal_point_details go to state 169 screen_status_details go to state 170 cursor_details go to state 171 switches_details_list go to state 172 alphabet_details go to state 173 state 137 97 file_control_paragraph: FILE_CONTROL PERIOD_TOK . file_control SELECT shift, and go to state 174 file_control go to state 175 file_select go to state 176 state 138 99 i_o_control_paragraph: I_O_CONTROL . PERIOD_TOK i_o_control_opt PERIOD_TOK shift, and go to state 177 state 139 95 input_output_section: file_control_paragraph i_o_control_paragraph . $default reduce using rule 95 (input_output_section) state 140 424 file_section: error . $default reduce using rule 424 (file_section) state 141 179 file_section_opt: FILE_TOK SECTION PERIOD_TOK $@12 file_section . 419 file_section: file_section . FD $@38 STRING $@39 file_description_fd_clauses PERIOD_TOK $@40 file_description 423 | file_section . SD $@41 STRING $@42 file_description_sd_clauses PERIOD_TOK $@43 file_description FD shift, and go to state 178 SD shift, and go to state 179 $default reduce using rule 179 (file_section_opt) state 142 182 working_storage_opt: WORKING_STORAGE SECTION PERIOD_TOK $@13 . working_storage_section $default reduce using rule 554 (working_storage_section) working_storage_section go to state 180 state 143 185 linkage_section_opt: LINKAGE SECTION PERIOD_TOK . $@14 linkage_section $default reduce using rule 184 ($@14) $@14 go to state 181 state 144 187 report_section_opt: REPORT SECTION . PERIOD_TOK report_sections PERIOD_TOK shift, and go to state 182 state 145 320 screen_section_opt: SCREEN . SECTION PERIOD_TOK $@27 screen_section SECTION shift, and go to state 183 state 146 176 data_division_opt: DATA DIVISION PERIOD_TOK $@11 file_section_opt working_storage_opt linkage_section_opt report_section_opt screen_section_opt . $default reduce using rule 176 (data_division_opt) state 147 1248 gname: FUNCTION LABELSTR '(' @145 . intrinsic_parm_list ')' VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 intrinsic_parm_list go to state 184 intrinsic_parm go to state 185 gname go to state 186 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 148 1285 name: variable '(' gname ':' . gname_opt ')' VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 1238 (gname_opt) gname_opt go to state 187 gname go to state 188 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 149 1298 subscript: gname . $default reduce using rule 1298 (subscript) state 150 1291 variable: qualified_var LPAR $@147 subscripts . ')' 1297 subscripts: subscripts . comma_opt subscript ')' shift, and go to state 189 ',' shift, and go to state 190 $default reduce using rule 1212 (comma_opt) comma_opt go to state 191 state 151 1296 subscripts: subscript . 1299 subscript: subscript . '+' gname 1300 | subscript . '-' gname '+' shift, and go to state 192 '-' shift, and go to state 193 '+' [reduce using rule 1296 (subscripts)] '-' [reduce using rule 1296 (subscripts)] $default reduce using rule 1296 (subscripts) state 152 571 declaratives_opt: DECLARATIVES PERIOD_TOK . $@55 declaratives_procedure declaratives_division END DECLARATIVES PERIOD_TOK $default reduce using rule 570 ($@55) $@55 go to state 194 state 153 559 procedure_division_opt: PROCEDURE DIVISION $@51 using_parameters PERIOD_TOK $@52 declaratives_opt procedure_division . 562 procedure_division: procedure_division . procedure_decl error shift, and go to state 195 LABELSTR shift, and go to state 196 PERIOD_TOK shift, and go to state 197 $end reduce using rule 559 (procedure_division_opt) READ reduce using rule 565 ($@53) WRITE reduce using rule 565 ($@53) RELEASE reduce using rule 565 ($@53) ACCEPT reduce using rule 565 ($@53) ADD reduce using rule 565 ($@53) CALL reduce using rule 565 ($@53) CALL_LOADLIB reduce using rule 565 ($@53) CANCEL reduce using rule 565 ($@53) CHAIN reduce using rule 565 ($@53) CLOSE reduce using rule 565 ($@53) COMPUTE reduce using rule 565 ($@53) CONTINUE reduce using rule 565 ($@53) DELETE reduce using rule 565 ($@53) DISPLAY reduce using rule 565 ($@53) DIVIDE reduce using rule 565 ($@53) END reduce using rule 559 (procedure_division_opt) EVALUATE reduce using rule 565 ($@53) EXIT reduce using rule 565 ($@53) GENERATE reduce using rule 565 ($@53) GO reduce using rule 565 ($@53) GOBACK reduce using rule 565 ($@53) IDENTIFICATION reduce using rule 559 (procedure_division_opt) IF reduce using rule 565 ($@53) INITIALIZE reduce using rule 565 ($@53) INITIATE reduce using rule 565 ($@53) INSPECT reduce using rule 565 ($@53) MERGE reduce using rule 565 ($@53) MOVE reduce using rule 565 ($@53) MULTIPLY reduce using rule 565 ($@53) OPEN reduce using rule 565 ($@53) PERFORM reduce using rule 565 ($@53) READY reduce using rule 565 ($@53) RESET reduce using rule 565 ($@53) RETURN reduce using rule 565 ($@53) REWRITE reduce using rule 565 ($@53) SEARCH reduce using rule 565 ($@53) SET reduce using rule 565 ($@53) SORT reduce using rule 565 ($@53) START reduce using rule 565 ($@53) STOP reduce using rule 565 ($@53) STRINGCMD reduce using rule 565 ($@53) SUBTRACT reduce using rule 565 ($@53) TCOBPROTO1 reduce using rule 565 ($@53) TCOBPROTO2 reduce using rule 565 ($@53) TERMINATE reduce using rule 565 ($@53) UNLOCK reduce using rule 565 ($@53) UNSTRING reduce using rule 565 ($@53) procedure_decl go to state 198 $@53 go to state 199 procedure_section go to state 200 paragraph go to state 201 state 154 15 identification_division: IDENTIFICATION DIVISION PERIOD_TOK PROGRAM_ID PERIOD_TOK $@3 IDSTRING $@4 programid_opts_opt PERIOD_TOK $@5 identification_division_options_opt . 22 identification_division_options_opt: identification_division_options_opt . identification_division_option AUTHOR shift, and go to state 202 DATE_COMPILED shift, and go to state 203 DATE_WRITTEN shift, and go to state 204 INSTALLATION shift, and go to state 205 SECURITY shift, and go to state 206 $default reduce using rule 15 (identification_division) identification_division_option go to state 207 state 155 38 configuration_option: OBJECT_COMPUTER PERIOD_TOK $@8 . STRING program_collating_opt PERIOD_TOK STRING shift, and go to state 208 state 156 36 configuration_option: SOURCE_COMPUTER PERIOD_TOK $@7 . STRING debug_mode_opt PERIOD_TOK STRING shift, and go to state 209 state 157 50 special_names_opt: error . $default reduce using rule 50 (special_names_opt) state 158 81 alphabet_details: ALPHABET . STRING is_opt alphabet_type STRING shift, and go to state 210 state 159 63 special_name_class: CLASS . STRING is_opt special_name_class_item_list STRING shift, and go to state 211 state 160 60 currency_details: CURRENCY . sign_opt is_opt CLITERAL SIGN shift, and go to state 212 $default reduce using rule 62 (sign_opt) sign_opt go to state 213 state 161 70 cursor_details: CURSOR . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 214 state 162 68 decimal_point_details: DECIMAL_POINT . is_opt COMMA IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 215 state 163 69 screen_status_details: DISPLAY_SCREEN . STATUS is_opt STRING STATUS shift, and go to state 216 state 164 39 configuration_option: SPECIAL_NAMES PERIOD_TOK special_names_opt . $default reduce using rule 39 (configuration_option) state 165 49 special_names_opt: special_names . PERIOD_TOK 52 special_names: special_names . special_name ALPHABET shift, and go to state 158 CLASS shift, and go to state 159 CURRENCY shift, and go to state 160 CURSOR shift, and go to state 161 DECIMAL_POINT shift, and go to state 162 DISPLAY_SCREEN shift, and go to state 163 PERIOD_TOK shift, and go to state 217 ALPHABET [reduce using rule 71 (switches_details_list)] CLASS [reduce using rule 71 (switches_details_list)] CURRENCY [reduce using rule 71 (switches_details_list)] CURSOR [reduce using rule 71 (switches_details_list)] DECIMAL_POINT [reduce using rule 71 (switches_details_list)] DISPLAY_SCREEN [reduce using rule 71 (switches_details_list)] PERIOD_TOK [reduce using rule 71 (switches_details_list)] $default reduce using rule 71 (switches_details_list) special_name go to state 218 currency_details go to state 167 special_name_class go to state 168 decimal_point_details go to state 169 screen_status_details go to state 170 cursor_details go to state 171 switches_details_list go to state 172 alphabet_details go to state 173 state 166 51 special_names: special_name . $default reduce using rule 51 (special_names) state 167 55 special_name: currency_details . $default reduce using rule 55 (special_name) state 168 59 special_name: special_name_class . $default reduce using rule 59 (special_name) state 169 56 special_name: decimal_point_details . $default reduce using rule 56 (special_name) state 170 57 special_name: screen_status_details . $default reduce using rule 57 (special_name) state 171 58 special_name: cursor_details . $default reduce using rule 58 (special_name) state 172 53 special_name: switches_details_list . 72 switches_details_list: switches_details_list . switches_details STRING shift, and go to state 219 STRING [reduce using rule 53 (special_name)] $default reduce using rule 53 (special_name) switches_details go to state 220 state 173 54 special_name: alphabet_details . $default reduce using rule 54 (special_name) state 174 103 file_select: SELECT . optional_opt def_name $@10 select_clauses PERIOD_TOK OPTIONAL shift, and go to state 221 $default reduce using rule 127 (optional_opt) optional_opt go to state 222 state 175 97 file_control_paragraph: FILE_CONTROL PERIOD_TOK file_control . 101 file_control: file_control . file_select SELECT shift, and go to state 174 $default reduce using rule 97 (file_control_paragraph) file_select go to state 223 state 176 100 file_control: file_select . $default reduce using rule 100 (file_control) state 177 99 i_o_control_paragraph: I_O_CONTROL PERIOD_TOK . i_o_control_opt MULTIPLE shift, and go to state 224 SAME shift, and go to state 225 $default reduce using rule 146 (i_o_control_opt) i_o_control_opt go to state 226 i_o_control_list go to state 227 i_o_control_clause go to state 228 i_o_control_same_clause go to state 229 i_o_control_multiple_file_tape_clause go to state 230 state 178 419 file_section: file_section FD . $@38 STRING $@39 file_description_fd_clauses PERIOD_TOK $@40 file_description $default reduce using rule 416 ($@38) $@38 go to state 231 state 179 423 file_section: file_section SD . $@41 STRING $@42 file_description_sd_clauses PERIOD_TOK $@43 file_description $default reduce using rule 420 ($@41) $@41 go to state 232 state 180 182 working_storage_opt: WORKING_STORAGE SECTION PERIOD_TOK $@13 working_storage_section . 553 working_storage_section: working_storage_section . field_description NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 $default reduce using rule 182 (working_storage_opt) field_description go to state 233 signed_nliteral go to state 234 integer go to state 235 state 181 185 linkage_section_opt: LINKAGE SECTION PERIOD_TOK $@14 . linkage_section $default reduce using rule 555 (linkage_section) linkage_section go to state 236 state 182 187 report_section_opt: REPORT SECTION PERIOD_TOK . report_sections $default reduce using rule 190 (report_sections) report_sections go to state 237 state 183 320 screen_section_opt: SCREEN SECTION . PERIOD_TOK $@27 screen_section PERIOD_TOK shift, and go to state 238 state 184 1140 intrinsic_parm_list: intrinsic_parm_list . sep_opt intrinsic_parm 1248 gname: FUNCTION LABELSTR '(' @145 intrinsic_parm_list . ')' LISTSEP shift, and go to state 98 ')' shift, and go to state 239 $default reduce using rule 1214 (sep_opt) sep_opt go to state 240 state 185 1141 intrinsic_parm_list: intrinsic_parm . $default reduce using rule 1141 (intrinsic_parm_list) state 186 1142 intrinsic_parm: gname . $default reduce using rule 1142 (intrinsic_parm) state 187 1285 name: variable '(' gname ':' gname_opt . ')' ')' shift, and go to state 241 state 188 1237 gname_opt: gname . $default reduce using rule 1237 (gname_opt) state 189 1291 variable: qualified_var LPAR $@147 subscripts ')' . $default reduce using rule 1291 (variable) state 190 1213 comma_opt: ',' . $default reduce using rule 1213 (comma_opt) state 191 1297 subscripts: subscripts comma_opt . subscript VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 149 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 subscript go to state 242 state 192 1299 subscript: subscript '+' . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 243 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 193 1300 subscript: subscript '-' . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 244 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 194 571 declaratives_opt: DECLARATIVES PERIOD_TOK $@55 . declaratives_procedure declaratives_division END DECLARATIVES PERIOD_TOK error shift, and go to state 245 LABELSTR shift, and go to state 246 declaratives_procedure go to state 247 procedure_section go to state 248 state 195 568 procedure_decl: error . $@54 PERIOD_TOK $default reduce using rule 567 ($@54) $@54 go to state 249 state 196 592 procedure_section: LABELSTR . SECTION PERIOD_TOK 593 paragraph: LABELSTR . dot_or_eos SECTION shift, and go to state 250 PERIOD_TOK shift, and go to state 251 '.' shift, and go to state 252 dot_or_eos go to state 253 state 197 569 procedure_decl: PERIOD_TOK . $default reduce using rule 569 (procedure_decl) state 198 562 procedure_division: procedure_division procedure_decl . $default reduce using rule 562 (procedure_division) state 199 566 procedure_decl: $@53 . statements PERIOD_TOK READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statements go to state 299 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 200 563 procedure_decl: procedure_section . $default reduce using rule 563 (procedure_decl) state 201 564 procedure_decl: paragraph . $default reduce using rule 564 (procedure_decl) state 202 23 identification_division_option: AUTHOR . PERIOD_TOK PERIOD_TOK shift, and go to state 351 state 203 25 identification_division_option: DATE_COMPILED . PERIOD_TOK PERIOD_TOK shift, and go to state 352 state 204 24 identification_division_option: DATE_WRITTEN . PERIOD_TOK PERIOD_TOK shift, and go to state 353 state 205 26 identification_division_option: INSTALLATION . PERIOD_TOK PERIOD_TOK shift, and go to state 354 state 206 27 identification_division_option: SECURITY . PERIOD_TOK PERIOD_TOK shift, and go to state 355 state 207 22 identification_division_options_opt: identification_division_options_opt identification_division_option . $default reduce using rule 22 (identification_division_options_opt) state 208 38 configuration_option: OBJECT_COMPUTER PERIOD_TOK $@8 STRING . program_collating_opt PERIOD_TOK PROGRAM shift, and go to state 356 $default reduce using rule 42 (program_collating_opt) program_collating_opt go to state 357 state 209 36 configuration_option: SOURCE_COMPUTER PERIOD_TOK $@7 STRING . debug_mode_opt PERIOD_TOK WITH shift, and go to state 358 DEBUGGING reduce using rule 1233 (with_opt) $default reduce using rule 47 (debug_mode_opt) debug_mode_opt go to state 359 with_opt go to state 360 state 210 81 alphabet_details: ALPHABET STRING . is_opt alphabet_type IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 361 state 211 63 special_name_class: CLASS STRING . is_opt special_name_class_item_list IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 362 state 212 61 sign_opt: SIGN . $default reduce using rule 61 (sign_opt) state 213 60 currency_details: CURRENCY sign_opt . is_opt CLITERAL IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 363 state 214 70 cursor_details: CURSOR is_opt . STRING STRING shift, and go to state 364 state 215 68 decimal_point_details: DECIMAL_POINT is_opt . COMMA COMMA shift, and go to state 365 state 216 69 screen_status_details: DISPLAY_SCREEN STATUS . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 366 state 217 49 special_names_opt: special_names PERIOD_TOK . $default reduce using rule 49 (special_names_opt) state 218 52 special_names: special_names special_name . $default reduce using rule 52 (special_names) state 219 74 switches_details: STRING . is_opt STRING $@9 switch_on_opt switch_off_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 367 state 220 72 switches_details_list: switches_details_list switches_details . $default reduce using rule 72 (switches_details_list) state 221 126 optional_opt: OPTIONAL . $default reduce using rule 126 (optional_opt) state 222 103 file_select: SELECT optional_opt . def_name $@10 select_clauses PERIOD_TOK STRING shift, and go to state 368 FILLER shift, and go to state 369 def_name go to state 370 state 223 101 file_control: file_control file_select . $default reduce using rule 101 (file_control) state 224 157 i_o_control_multiple_file_tape_clause: MULTIPLE . FILE_TOK tape_opt contains_opt i_o_control_multiple_file_list FILE_TOK shift, and go to state 371 state 225 152 i_o_control_same_clause: SAME . same_clause_options are_opta for_opt string_list RECORD shift, and go to state 372 SORT shift, and go to state 373 SORT_MERGE shift, and go to state 374 $default reduce using rule 153 (same_clause_options) same_clause_options go to state 375 state 226 99 i_o_control_paragraph: I_O_CONTROL PERIOD_TOK i_o_control_opt . $default reduce using rule 99 (i_o_control_paragraph) state 227 147 i_o_control_opt: i_o_control_list . PERIOD_TOK 149 i_o_control_list: i_o_control_list . i_o_control_clause MULTIPLE shift, and go to state 224 SAME shift, and go to state 225 PERIOD_TOK shift, and go to state 376 i_o_control_clause go to state 377 i_o_control_same_clause go to state 229 i_o_control_multiple_file_tape_clause go to state 230 state 228 148 i_o_control_list: i_o_control_clause . $default reduce using rule 148 (i_o_control_list) state 229 150 i_o_control_clause: i_o_control_same_clause . $default reduce using rule 150 (i_o_control_clause) state 230 151 i_o_control_clause: i_o_control_multiple_file_tape_clause . $default reduce using rule 151 (i_o_control_clause) state 231 419 file_section: file_section FD $@38 . STRING $@39 file_description_fd_clauses PERIOD_TOK $@40 file_description STRING shift, and go to state 378 state 232 423 file_section: file_section SD $@41 . STRING $@42 file_description_sd_clauses PERIOD_TOK $@43 file_description STRING shift, and go to state 379 state 233 553 working_storage_section: working_storage_section field_description . $default reduce using rule 553 (working_storage_section) state 234 1301 integer: signed_nliteral . $default reduce using rule 1301 (integer) state 235 429 field_description: integer . def_name_opt $@44 data_clauses PERIOD_TOK STRING shift, and go to state 368 FILLER shift, and go to state 369 $default reduce using rule 1274 (def_name_opt) def_name_opt go to state 380 def_name go to state 381 state 236 185 linkage_section_opt: LINKAGE SECTION PERIOD_TOK $@14 linkage_section . 556 linkage_section: linkage_section . field_description NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 $default reduce using rule 185 (linkage_section_opt) field_description go to state 382 signed_nliteral go to state 234 integer go to state 235 state 237 187 report_section_opt: REPORT SECTION PERIOD_TOK report_sections . 189 report_sections: report_sections . report_section RD shift, and go to state 383 $default reduce using rule 187 (report_section_opt) report_section go to state 384 state 238 320 screen_section_opt: SCREEN SECTION PERIOD_TOK . $@27 screen_section $default reduce using rule 319 ($@27) $@27 go to state 385 state 239 1248 gname: FUNCTION LABELSTR '(' @145 intrinsic_parm_list ')' . $default reduce using rule 1248 (gname) state 240 1140 intrinsic_parm_list: intrinsic_parm_list sep_opt . intrinsic_parm VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 intrinsic_parm go to state 386 gname go to state 186 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 241 1285 name: variable '(' gname ':' gname_opt ')' . $default reduce using rule 1285 (name) state 242 1297 subscripts: subscripts comma_opt subscript . 1299 subscript: subscript . '+' gname 1300 | subscript . '-' gname '+' shift, and go to state 192 '-' shift, and go to state 193 '+' [reduce using rule 1297 (subscripts)] '-' [reduce using rule 1297 (subscripts)] $default reduce using rule 1297 (subscripts) state 243 1299 subscript: subscript '+' gname . $default reduce using rule 1299 (subscript) state 244 1300 subscript: subscript '-' gname . $default reduce using rule 1300 (subscript) state 245 583 declaratives_procedure: error . $default reduce using rule 583 (declaratives_procedure) state 246 592 procedure_section: LABELSTR . SECTION PERIOD_TOK SECTION shift, and go to state 250 state 247 571 declaratives_opt: DECLARATIVES PERIOD_TOK $@55 declaratives_procedure . declaratives_division END DECLARATIVES PERIOD_TOK $default reduce using rule 573 (declaratives_division) declaratives_division go to state 387 state 248 582 declaratives_procedure: procedure_section . $@58 use_phrase $default reduce using rule 581 ($@58) $@58 go to state 388 state 249 568 procedure_decl: error $@54 . PERIOD_TOK PERIOD_TOK shift, and go to state 389 state 250 592 procedure_section: LABELSTR SECTION . PERIOD_TOK PERIOD_TOK shift, and go to state 390 state 251 595 dot_or_eos: PERIOD_TOK . $default reduce using rule 595 (dot_or_eos) state 252 594 dot_or_eos: '.' . $default reduce using rule 594 (dot_or_eos) state 253 593 paragraph: LABELSTR dot_or_eos . $default reduce using rule 593 (paragraph) state 254 898 read_statement: READ . read_body end_read_opt 899 | READ . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 899 (read_statement) read_body go to state 391 name go to state 392 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 255 934 write_statement: WRITE . name write_from_opt write_options $@101 invalid_key_opt end_write_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 393 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 256 930 release_statement: RELEASE . name release_from_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 394 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 257 825 accept_statement: ACCEPT . 826 accept_hardware: ACCEPT . name FROM INKEY end_accept_opt 827 | ACCEPT . name FROM INPUT STATUS end_accept_opt 828 | ACCEPT . name FROM CMD_LINE end_accept_opt 829 | ACCEPT . name FROM ESCKEY end_accept_opt 830 | ACCEPT . name FROM ENVIRONMENT_VARIABLE CLITERAL end_accept_opt 831 accept_chronological: ACCEPT . name FROM DATE_TIME end_accept_opt 832 accept_screen: ACCEPT . name accept_display_options end_accept_opt 836 | ACCEPT . name accept_display_options on_opt EXCEPTION $@93 variable @94 statement_list $@95 end_accept_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 825 (accept_statement) name go to state 395 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 258 791 add_statement: ADD . add_body end_add_opt 792 | ADD . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 CORRESPONDING shift, and go to state 396 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 792 (add_statement) add_body go to state 397 var_list_gname go to state 398 gname go to state 399 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 259 967 call_statement: CALL . $@105 call_convention_opt gname using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt 968 | CALL . VARIABLE reduce using rule 962 ($@105) SUBSCVAR reduce using rule 962 ($@105) LABELSTR reduce using rule 962 ($@105) NLITERAL reduce using rule 962 ($@105) CLITERAL reduce using rule 962 ($@105) '+' reduce using rule 962 ($@105) '-' reduce using rule 962 ($@105) ALL reduce using rule 962 ($@105) CALL_CONV_C reduce using rule 962 ($@105) CALL_CONV_STDCALL reduce using rule 962 ($@105) FUNCTION reduce using rule 962 ($@105) HIGHVALUES reduce using rule 962 ($@105) LOWVALUES reduce using rule 962 ($@105) QUOTES reduce using rule 962 ($@105) SPACES reduce using rule 962 ($@105) ZERO reduce using rule 962 ($@105) $default reduce using rule 968 (call_statement) $@105 go to state 400 state 260 973 call_loadlib_statement: CALL_LOADLIB . gname $@110 end_call_loadlib_opt 974 | CALL_LOADLIB . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 974 (call_loadlib_statement) gname go to state 401 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 261 735 cancel_statement: CANCEL . gname 736 | CANCEL . ALL VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 402 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 403 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 262 981 chain_statement: CHAIN . $@111 gname using_options @112 @113 on_exception_or_overflow $@114 end_chain_opt 982 | CHAIN . VARIABLE reduce using rule 977 ($@111) SUBSCVAR reduce using rule 977 ($@111) LABELSTR reduce using rule 977 ($@111) NLITERAL reduce using rule 977 ($@111) CLITERAL reduce using rule 977 ($@111) '+' reduce using rule 977 ($@111) '-' reduce using rule 977 ($@111) ALL reduce using rule 977 ($@111) FUNCTION reduce using rule 977 ($@111) HIGHVALUES reduce using rule 977 ($@111) LOWVALUES reduce using rule 977 ($@111) QUOTES reduce using rule 977 ($@111) SPACES reduce using rule 977 ($@111) ZERO reduce using rule 977 ($@111) $default reduce using rule 982 (chain_statement) $@111 go to state 404 state 263 879 close_statement: CLOSE . close_files 880 | CLOSE . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 880 (close_statement) close_files go to state 405 close_file go to state 406 name go to state 407 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 264 786 compute_statement: COMPUTE . compute_body end_compute_opt 787 | COMPUTE . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 787 (compute_statement) compute_body go to state 408 var_list_name go to state 409 name go to state 410 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 265 641 statement: CONTINUE . $default reduce using rule 641 (statement) state 266 947 delete_statement: DELETE . name record_opt $@103 invalid_key_opt end_delete_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 411 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 267 841 display_statement: DISPLAY . 842 display_line: DISPLAY . display_varlist display_upon display_line_options end_display_opt 843 display_screen: DISPLAY . display_varlist accept_display_options end_display_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 841 (display_statement) display_varlist go to state 412 gname go to state 413 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 268 813 divide_statement: DIVIDE . divide_body end_divide_opt 814 | DIVIDE . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 814 (divide_statement) divide_body go to state 414 gname go to state 415 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 269 652 evaluate_statement: EVALUATE . @62 selection_subject_set $@63 when_case_list end_evaluate_or_eos $default reduce using rule 650 (@62) @62 go to state 416 state 270 983 exit_statement: EXIT . 984 | EXIT . PARAGRAPH 985 | EXIT . PROGRAM PARAGRAPH shift, and go to state 417 PROGRAM shift, and go to state 418 $default reduce using rule 983 (exit_statement) state 271 733 generate_statement: GENERATE . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 419 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 272 956 goto_statement: GO . to_opt goto_label 957 | GO . to_opt goto_label_list DEPENDING on_opt variable TO shift, and go to state 420 $default reduce using rule 1239 (to_opt) to_opt go to state 421 state 273 990 goback_statement: GOBACK . $default reduce using rule 990 (goback_statement) state 274 684 if_part: IF . condition @73 end_then_opt conditional_statement VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 426 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 275 774 initialize_statement: INITIALIZE . gname_list initialize_replacing_opt 775 | INITIALIZE . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 775 (initialize_statement) gname_list go to state 429 gname go to state 71 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 276 732 initiate_statement: INITIATE . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 430 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 277 1086 inspect_statement: INSPECT . name tallying_clause $@126 replacing_clause 1087 | INSPECT . name converting_clause VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 431 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 278 740 merge_statement: MERGE . name sort_keys $@86 sort_collating_opt $@87 merge_using $@88 sort_output VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 432 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 279 770 move_statement: MOVE . gname TO name_var_list 771 | MOVE . CORRESPONDING name_var TO name_var 772 | MOVE . LENGTH OF gname TO name_var 773 | MOVE . gname TO VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 CORRESPONDING shift, and go to state 433 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LENGTH shift, and go to state 434 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 435 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 280 807 multiply_statement: MULTIPLY . multiply_body end_multiply_opt 808 | MULTIPLY . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 808 (multiply_statement) multiply_body go to state 436 gname go to state 437 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 281 868 open_statement: OPEN . open_options 869 | OPEN . error shift, and go to state 438 EXTEND shift, and go to state 439 INPUT shift, and go to state 440 I_O shift, and go to state 441 OUTPUT shift, and go to state 442 READ reduce using rule 869 (open_statement) WRITE reduce using rule 869 (open_statement) RELEASE reduce using rule 869 (open_statement) NOT reduce using rule 869 (open_statement) ACCEPT reduce using rule 869 (open_statement) ADD reduce using rule 869 (open_statement) CALL reduce using rule 869 (open_statement) CALL_LOADLIB reduce using rule 869 (open_statement) CANCEL reduce using rule 869 (open_statement) CHAIN reduce using rule 869 (open_statement) CLOSE reduce using rule 869 (open_statement) COMPUTE reduce using rule 869 (open_statement) CONTINUE reduce using rule 869 (open_statement) DELETE reduce using rule 869 (open_statement) DISPLAY reduce using rule 869 (open_statement) DIVIDE reduce using rule 869 (open_statement) ELSE reduce using rule 869 (open_statement) END_ACCEPT reduce using rule 869 (open_statement) END_ADD reduce using rule 869 (open_statement) END_CALL reduce using rule 869 (open_statement) END_CHAIN reduce using rule 869 (open_statement) END_COMPUTE reduce using rule 869 (open_statement) END_DELETE reduce using rule 869 (open_statement) END_DIVIDE reduce using rule 869 (open_statement) END_EVALUATE reduce using rule 869 (open_statement) END_IF reduce using rule 869 (open_statement) END_MULTIPLY reduce using rule 869 (open_statement) END_PERFORM reduce using rule 869 (open_statement) END_READ reduce using rule 869 (open_statement) END_RETURN reduce using rule 869 (open_statement) END_REWRITE reduce using rule 869 (open_statement) END_SEARCH reduce using rule 869 (open_statement) END_START reduce using rule 869 (open_statement) END_STRINGCMD reduce using rule 869 (open_statement) END_SUBTRACT reduce using rule 869 (open_statement) END_UNSTRING reduce using rule 869 (open_statement) END_WRITE reduce using rule 869 (open_statement) EVALUATE reduce using rule 869 (open_statement) EXIT reduce using rule 869 (open_statement) GENERATE reduce using rule 869 (open_statement) GO reduce using rule 869 (open_statement) GOBACK reduce using rule 869 (open_statement) IF reduce using rule 869 (open_statement) INITIALIZE reduce using rule 869 (open_statement) INITIATE reduce using rule 869 (open_statement) INSPECT reduce using rule 869 (open_statement) MERGE reduce using rule 869 (open_statement) MOVE reduce using rule 869 (open_statement) MULTIPLY reduce using rule 869 (open_statement) NOTEXCEP reduce using rule 869 (open_statement) OPEN reduce using rule 869 (open_statement) PERFORM reduce using rule 869 (open_statement) READY reduce using rule 869 (open_statement) RESET reduce using rule 869 (open_statement) RETURN reduce using rule 869 (open_statement) REWRITE reduce using rule 869 (open_statement) SEARCH reduce using rule 869 (open_statement) SET reduce using rule 869 (open_statement) SORT reduce using rule 869 (open_statement) START reduce using rule 869 (open_statement) STOP reduce using rule 869 (open_statement) STRINGCMD reduce using rule 869 (open_statement) SUBTRACT reduce using rule 869 (open_statement) TCOBPROTO1 reduce using rule 869 (open_statement) TCOBPROTO2 reduce using rule 869 (open_statement) TERMINATE reduce using rule 869 (open_statement) UNLOCK reduce using rule 869 (open_statement) UNSTRING reduce using rule 869 (open_statement) WHEN reduce using rule 869 (open_statement) PERIOD_TOK reduce using rule 869 (open_statement) open_options go to state 443 open_mode go to state 444 state 282 642 perform_statement: PERFORM . perform_options VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 445 NLITERAL shift, and go to state 446 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 WITH shift, and go to state 358 ZERO shift, and go to state 69 TEST reduce using rule 1233 (with_opt) UNTIL reduce using rule 1165 (with_test_opt) VARYING reduce using rule 1165 (with_test_opt) $default reduce using rule 1176 ($@141) perform_options go to state 447 with_test_opt go to state 448 perform_statements go to state 449 $@141 go to state 450 with_opt go to state 451 gname go to state 452 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 label go to state 453 state 283 730 trace_statement: READY . TRACE TRACE shift, and go to state 454 state 284 731 trace_statement: RESET . TRACE TRACE shift, and go to state 455 state 285 894 return_statement: RETURN . return_body end_return_opt 895 | RETURN . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 895 (return_statement) return_body go to state 456 name go to state 457 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 286 943 rewrite_statement: REWRITE . name write_from_opt $@102 invalid_key_opt end_rewrite_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 458 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 287 648 search_statement: SEARCH . search end_search_opt 649 | SEARCH . ALL search_all end_search_opt SUBSCVAR shift, and go to state 459 ALL shift, and go to state 460 search go to state 461 variable_indexed go to state 462 state 288 1010 set_statement: SET . set_list error shift, and go to state 463 VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 ADDRESS shift, and go to state 464 VARIABLE [reduce using rule 1024 (address_of_opt)] SUBSCVAR [reduce using rule 1024 (address_of_opt)] name_list go to state 465 set_list go to state 466 set_target go to state 467 address_of_opt go to state 468 cond_name go to state 469 variable go to state 470 qualified_var go to state 80 unqualified_var go to state 81 state 289 747 sort_file: SORT . name sort_keys $@89 sort_duplicates_opt sort_collating_opt $@90 sort_input $@91 sort_output 749 sort_variable_indexed: SORT . variable_indexed sort_keys_idx $@92 sort_duplicates_opt sort_collating_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 471 LABELSTR shift, and go to state 58 variable_indexed go to state 472 name go to state 473 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 290 951 start_statement: START . start_body invalid_key_opt $@104 end_start_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 start_body go to state 474 name go to state 475 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 291 986 stop_statement: STOP . RUN 987 | STOP . stop_literal NLITERAL shift, and go to state 476 CLITERAL shift, and go to state 477 RUN shift, and go to state 478 stop_literal go to state 479 state 292 1027 string_statement: STRINGCMD . string_from_list INTO name string_with_pointer $@117 on_overflow_opt end_stringcmd_opt error shift, and go to state 480 VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 string_from_list go to state 481 string_from go to state 482 gname go to state 483 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 293 800 subtract_statement: SUBTRACT . subtract_body end_subtract_opt 801 | SUBTRACT . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 CORRESPONDING shift, and go to state 484 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 801 (subtract_statement) subtract_body go to state 485 var_list_gname go to state 486 gname go to state 399 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 294 728 proto_statement: TCOBPROTO1 . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 487 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 295 729 proto_statement: TCOBPROTO2 . gname gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 488 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 296 734 terminate_statement: TERMINATE . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 489 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 297 727 unlock_statement: UNLOCK . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 490 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 298 1029 unstring_statement: UNSTRING . name unstring_delimited INTO unstring_destinations string_with_pointer unstring_tallying $@118 on_overflow_opt end_unstring_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 491 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 299 566 procedure_decl: $@53 statements . PERIOD_TOK 598 statements: statements . statement READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 PERIOD_TOK shift, and go to state 492 statement go to state 493 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 300 597 statements: statement . $default reduce using rule 597 (statements) state 301 617 statement: perform_statement . $default reduce using rule 617 (statement) state 302 638 statement: if_statement . $default reduce using rule 638 (statement) state 303 640 statement: search_statement . $default reduce using rule 640 (statement) state 304 639 statement: evaluate_statement . $default reduce using rule 639 (statement) state 305 644 if_statement: if_part . $@59 end_if_opt 647 | if_part . ELSE @60 conditional_statement $@61 end_if_opt ELSE shift, and go to state 494 ELSE [reduce using rule 643 ($@59)] $default reduce using rule 643 ($@59) $@59 go to state 495 state 306 637 statement: unlock_statement . $default reduce using rule 637 (statement) state 307 633 statement: proto_statement . $default reduce using rule 633 (statement) state 308 634 statement: trace_statement . $default reduce using rule 634 (statement) state 309 630 statement: initiate_statement . $default reduce using rule 630 (statement) state 310 631 statement: generate_statement . $default reduce using rule 631 (statement) state 311 632 statement: terminate_statement . $default reduce using rule 632 (statement) state 312 636 statement: cancel_statement . $default reduce using rule 636 (statement) state 313 626 statement: merge_statement . $default reduce using rule 626 (statement) state 314 625 statement: sort_statement . $default reduce using rule 625 (statement) state 315 742 sort_statement: sort_file . $default reduce using rule 742 (sort_statement) state 316 743 sort_statement: sort_variable_indexed . $default reduce using rule 743 (sort_statement) state 317 599 statement: move_statement . $default reduce using rule 599 (statement) state 318 600 statement: initialize_statement . $default reduce using rule 600 (statement) state 319 601 statement: compute_statement . $default reduce using rule 601 (statement) state 320 602 statement: add_statement . $default reduce using rule 602 (statement) state 321 603 statement: subtract_statement . $default reduce using rule 603 (statement) state 322 604 statement: multiply_statement . $default reduce using rule 604 (statement) state 323 605 statement: divide_statement . $default reduce using rule 605 (statement) state 324 606 statement: accept_statement . $default reduce using rule 606 (statement) state 325 822 accept_statement: accept_hardware . $default reduce using rule 822 (accept_statement) state 326 823 accept_statement: accept_chronological . $default reduce using rule 823 (accept_statement) state 327 824 accept_statement: accept_screen . $default reduce using rule 824 (accept_statement) state 328 607 statement: display_statement . $default reduce using rule 607 (statement) state 329 839 display_statement: display_line . $default reduce using rule 839 (display_statement) state 330 840 display_statement: display_screen . $default reduce using rule 840 (display_statement) state 331 608 statement: open_statement . $default reduce using rule 608 (statement) state 332 609 statement: close_statement . $default reduce using rule 609 (statement) state 333 611 statement: return_statement . $default reduce using rule 611 (statement) state 334 610 statement: read_statement . $default reduce using rule 610 (statement) state 335 612 statement: release_statement . $default reduce using rule 612 (statement) state 336 613 statement: write_statement . $default reduce using rule 613 (statement) state 337 614 statement: rewrite_statement . $default reduce using rule 614 (statement) state 338 615 statement: delete_statement . $default reduce using rule 615 (statement) state 339 616 statement: start_statement . $default reduce using rule 616 (statement) state 340 618 statement: goto_statement . $default reduce using rule 618 (statement) state 341 621 statement: call_statement . $default reduce using rule 621 (statement) state 342 622 statement: call_loadlib_statement . $default reduce using rule 622 (statement) state 343 623 statement: chain_statement . $default reduce using rule 623 (statement) state 344 619 statement: exit_statement . $default reduce using rule 619 (statement) state 345 620 statement: stop_statement . $default reduce using rule 620 (statement) state 346 635 statement: goback_statement . $default reduce using rule 635 (statement) state 347 624 statement: set_statement . $default reduce using rule 624 (statement) state 348 628 statement: string_statement . $default reduce using rule 628 (statement) state 349 629 statement: unstring_statement . $default reduce using rule 629 (statement) state 350 627 statement: inspect_statement . $default reduce using rule 627 (statement) state 351 23 identification_division_option: AUTHOR PERIOD_TOK . $default reduce using rule 23 (identification_division_option) state 352 25 identification_division_option: DATE_COMPILED PERIOD_TOK . $default reduce using rule 25 (identification_division_option) state 353 24 identification_division_option: DATE_WRITTEN PERIOD_TOK . $default reduce using rule 24 (identification_division_option) state 354 26 identification_division_option: INSTALLATION PERIOD_TOK . $default reduce using rule 26 (identification_division_option) state 355 27 identification_division_option: SECURITY PERIOD_TOK . $default reduce using rule 27 (identification_division_option) state 356 41 program_collating_opt: PROGRAM . collating_sequence COLLATING shift, and go to state 496 $default reduce using rule 45 (collating_opt) collating_sequence go to state 497 collating_opt go to state 498 state 357 38 configuration_option: OBJECT_COMPUTER PERIOD_TOK $@8 STRING program_collating_opt . PERIOD_TOK PERIOD_TOK shift, and go to state 499 state 358 1234 with_opt: WITH . $default reduce using rule 1234 (with_opt) state 359 36 configuration_option: SOURCE_COMPUTER PERIOD_TOK $@7 STRING debug_mode_opt . PERIOD_TOK PERIOD_TOK shift, and go to state 500 state 360 46 debug_mode_opt: with_opt . DEBUGGING MODE DEBUGGING shift, and go to state 501 state 361 81 alphabet_details: ALPHABET STRING is_opt . alphabet_type NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 NATIVE shift, and go to state 502 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 STANDARD_1 shift, and go to state 503 STANDARD_2 shift, and go to state 504 ZERO shift, and go to state 69 alphabet_type go to state 505 alphabet_literal_list go to state 506 alphabet_literal_item go to state 507 without_all_literal go to state 508 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 362 63 special_name_class: CLASS STRING is_opt . special_name_class_item_list CLITERAL shift, and go to state 509 special_name_class_item_list go to state 510 special_name_class_item go to state 511 state 363 60 currency_details: CURRENCY sign_opt is_opt . CLITERAL CLITERAL shift, and go to state 512 state 364 70 cursor_details: CURSOR is_opt STRING . $default reduce using rule 70 (cursor_details) state 365 68 decimal_point_details: DECIMAL_POINT is_opt COMMA . $default reduce using rule 68 (decimal_point_details) state 366 69 screen_status_details: DISPLAY_SCREEN STATUS is_opt . STRING STRING shift, and go to state 513 state 367 74 switches_details: STRING is_opt . STRING $@9 switch_on_opt switch_off_opt STRING shift, and go to state 514 state 368 1275 def_name: STRING . $default reduce using rule 1275 (def_name) state 369 1276 def_name: FILLER . $default reduce using rule 1276 (def_name) state 370 103 file_select: SELECT optional_opt def_name . $@10 select_clauses PERIOD_TOK $default reduce using rule 102 ($@10) $@10 go to state 515 state 371 157 i_o_control_multiple_file_tape_clause: MULTIPLE FILE_TOK . tape_opt contains_opt i_o_control_multiple_file_list TAPE shift, and go to state 516 $default reduce using rule 164 (tape_opt) tape_opt go to state 517 state 372 154 same_clause_options: RECORD . $default reduce using rule 154 (same_clause_options) state 373 155 same_clause_options: SORT . $default reduce using rule 155 (same_clause_options) state 374 156 same_clause_options: SORT_MERGE . $default reduce using rule 156 (same_clause_options) state 375 152 i_o_control_same_clause: SAME same_clause_options . are_opta for_opt string_list AREA shift, and go to state 518 $default reduce using rule 166 (are_opta) are_opta go to state 519 state 376 147 i_o_control_opt: i_o_control_list PERIOD_TOK . $default reduce using rule 147 (i_o_control_opt) state 377 149 i_o_control_list: i_o_control_list i_o_control_clause . $default reduce using rule 149 (i_o_control_list) state 378 419 file_section: file_section FD $@38 STRING . $@39 file_description_fd_clauses PERIOD_TOK $@40 file_description $default reduce using rule 417 ($@39) $@39 go to state 520 state 379 423 file_section: file_section SD $@41 STRING . $@42 file_description_sd_clauses PERIOD_TOK $@43 file_description $default reduce using rule 421 ($@42) $@42 go to state 521 state 380 429 field_description: integer def_name_opt . $@44 data_clauses PERIOD_TOK $default reduce using rule 428 ($@44) $@44 go to state 522 state 381 1273 def_name_opt: def_name . $default reduce using rule 1273 (def_name_opt) state 382 556 linkage_section: linkage_section field_description . $default reduce using rule 556 (linkage_section) state 383 194 report_section: RD . $@15 STRING $@16 report_controls PERIOD_TOK $@17 report_description $default reduce using rule 191 ($@15) $@15 go to state 523 state 384 189 report_sections: report_sections report_section . $default reduce using rule 189 (report_sections) state 385 320 screen_section_opt: SCREEN SECTION PERIOD_TOK $@27 . screen_section $default reduce using rule 323 (screen_section) screen_section go to state 524 state 386 1140 intrinsic_parm_list: intrinsic_parm_list sep_opt intrinsic_parm . $default reduce using rule 1140 (intrinsic_parm_list) state 387 571 declaratives_opt: DECLARATIVES PERIOD_TOK $@55 declaratives_procedure declaratives_division . END DECLARATIVES PERIOD_TOK 574 declaratives_division: declaratives_division . declaratives_decl error shift, and go to state 525 LABELSTR shift, and go to state 196 END shift, and go to state 526 READ reduce using rule 577 ($@56) WRITE reduce using rule 577 ($@56) RELEASE reduce using rule 577 ($@56) ACCEPT reduce using rule 577 ($@56) ADD reduce using rule 577 ($@56) CALL reduce using rule 577 ($@56) CALL_LOADLIB reduce using rule 577 ($@56) CANCEL reduce using rule 577 ($@56) CHAIN reduce using rule 577 ($@56) CLOSE reduce using rule 577 ($@56) COMPUTE reduce using rule 577 ($@56) CONTINUE reduce using rule 577 ($@56) DELETE reduce using rule 577 ($@56) DISPLAY reduce using rule 577 ($@56) DIVIDE reduce using rule 577 ($@56) EVALUATE reduce using rule 577 ($@56) EXIT reduce using rule 577 ($@56) GENERATE reduce using rule 577 ($@56) GO reduce using rule 577 ($@56) GOBACK reduce using rule 577 ($@56) IF reduce using rule 577 ($@56) INITIALIZE reduce using rule 577 ($@56) INITIATE reduce using rule 577 ($@56) INSPECT reduce using rule 577 ($@56) MERGE reduce using rule 577 ($@56) MOVE reduce using rule 577 ($@56) MULTIPLY reduce using rule 577 ($@56) OPEN reduce using rule 577 ($@56) PERFORM reduce using rule 577 ($@56) READY reduce using rule 577 ($@56) RESET reduce using rule 577 ($@56) RETURN reduce using rule 577 ($@56) REWRITE reduce using rule 577 ($@56) SEARCH reduce using rule 577 ($@56) SET reduce using rule 577 ($@56) SORT reduce using rule 577 ($@56) START reduce using rule 577 ($@56) STOP reduce using rule 577 ($@56) STRINGCMD reduce using rule 577 ($@56) SUBTRACT reduce using rule 577 ($@56) TCOBPROTO1 reduce using rule 577 ($@56) TCOBPROTO2 reduce using rule 577 ($@56) TERMINATE reduce using rule 577 ($@56) UNLOCK reduce using rule 577 ($@56) UNSTRING reduce using rule 577 ($@56) declaratives_decl go to state 527 $@56 go to state 528 declaratives_procedure go to state 529 procedure_section go to state 248 paragraph go to state 530 state 388 582 declaratives_procedure: procedure_section $@58 . use_phrase error shift, and go to state 531 USE shift, and go to state 532 use_phrase go to state 533 state 389 568 procedure_decl: error $@54 PERIOD_TOK . $default reduce using rule 568 (procedure_decl) state 390 592 procedure_section: LABELSTR SECTION PERIOD_TOK . $default reduce using rule 592 (procedure_section) state 391 898 read_statement: READ read_body . end_read_opt END_READ shift, and go to state 534 END_READ [reduce using rule 926 (end_read_opt)] $default reduce using rule 926 (end_read_opt) end_read_opt go to state 535 state 392 900 read_body: name . read_next_opt record_opt read_into_opt with_lock_opt read_key_opt 901 | name . read_next_opt record_opt read_into_opt with_lock_opt read_key_opt read_at_end_opt 902 | name . read_next_opt record_opt read_into_opt with_lock_opt read_key_opt read_invalid_key_opt NEXT shift, and go to state 536 PREVIOUS shift, and go to state 537 $default reduce using rule 903 (read_next_opt) read_next_opt go to state 538 state 393 934 write_statement: WRITE name . write_from_opt write_options $@101 invalid_key_opt end_write_opt FROM shift, and go to state 539 $default reduce using rule 935 (write_from_opt) write_from_opt go to state 540 state 394 930 release_statement: RELEASE name . release_from_opt FROM shift, and go to state 541 $default reduce using rule 931 (release_from_opt) release_from_opt go to state 542 state 395 826 accept_hardware: ACCEPT name . FROM INKEY end_accept_opt 827 | ACCEPT name . FROM INPUT STATUS end_accept_opt 828 | ACCEPT name . FROM CMD_LINE end_accept_opt 829 | ACCEPT name . FROM ESCKEY end_accept_opt 830 | ACCEPT name . FROM ENVIRONMENT_VARIABLE CLITERAL end_accept_opt 831 accept_chronological: ACCEPT name . FROM DATE_TIME end_accept_opt 832 accept_screen: ACCEPT name . accept_display_options end_accept_opt 836 | ACCEPT name . accept_display_options on_opt EXCEPTION $@93 variable @94 statement_list $@95 end_accept_opt FROM shift, and go to state 543 $default reduce using rule 862 (accept_display_options) accept_display_options go to state 544 state 396 795 add_body: CORRESPONDING . var_list_gname TO var_list_name rounded_opt on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 var_list_gname go to state 545 gname go to state 399 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 397 791 add_statement: ADD add_body . end_add_opt END_ADD shift, and go to state 546 END_ADD [reduce using rule 798 (end_add_opt)] $default reduce using rule 798 (end_add_opt) end_add_opt go to state 547 state 398 793 add_body: var_list_gname . TO var_list_name on_size_error_opt 794 | var_list_gname . add_to_opt GIVING var_list_name on_size_error_opt 994 var_list_gname: var_list_gname . gname sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 TO shift, and go to state 548 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 796 (add_to_opt) add_to_opt go to state 549 gname go to state 550 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 399 993 var_list_gname: gname . sep_opt LISTSEP shift, and go to state 98 $default reduce using rule 1214 (sep_opt) sep_opt go to state 551 state 400 967 call_statement: CALL $@105 . call_convention_opt gname using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt CALL_CONV_C shift, and go to state 552 CALL_CONV_STDCALL shift, and go to state 553 $default reduce using rule 969 (call_convention_opt) call_convention_opt go to state 554 state 401 973 call_loadlib_statement: CALL_LOADLIB gname . $@110 end_call_loadlib_opt $default reduce using rule 972 ($@110) $@110 go to state 555 state 402 736 cancel_statement: CANCEL ALL . 1258 all_literal: ALL . literal 1259 | ALL . special_literal NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 736 (cancel_statement) special_literal go to state 95 literal go to state 96 signed_nliteral go to state 77 state 403 735 cancel_statement: CANCEL gname . $default reduce using rule 735 (cancel_statement) state 404 981 chain_statement: CHAIN $@111 . gname using_options @112 @113 on_exception_or_overflow $@114 end_chain_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 556 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 405 879 close_statement: CLOSE close_files . 882 close_files: close_files . sep_opt close_file LISTSEP shift, and go to state 98 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) $default reduce using rule 879 (close_statement) sep_opt go to state 557 state 406 881 close_files: close_file . $default reduce using rule 881 (close_files) state 407 883 close_file: name . close_options_opt REEL shift, and go to state 558 UNIT shift, and go to state 559 WITH shift, and go to state 358 NO reduce using rule 1233 (with_opt) IGNORE reduce using rule 1233 (with_opt) LOCK reduce using rule 1233 (with_opt) $default reduce using rule 893 (with_lock_opt) close_options_opt go to state 560 close_options go to state 561 with_lock_opt go to state 562 with_opt go to state 563 state 408 786 compute_statement: COMPUTE compute_body . end_compute_opt END_COMPUTE shift, and go to state 564 END_COMPUTE [reduce using rule 789 (end_compute_opt)] $default reduce using rule 789 (end_compute_opt) end_compute_opt go to state 565 state 409 788 compute_body: var_list_name . CONDITIONAL expr on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 CONDITIONAL shift, and go to state 566 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 410 991 var_list_name: name . rounded_opt sep_opt ROUNDED shift, and go to state 568 ROUNDED [reduce using rule 995 (rounded_opt)] $default reduce using rule 995 (rounded_opt) rounded_opt go to state 569 state 411 947 delete_statement: DELETE name . record_opt $@103 invalid_key_opt end_delete_opt RECORD shift, and go to state 570 $default reduce using rule 1223 (record_opt) record_opt go to state 571 state 412 842 display_line: DISPLAY display_varlist . display_upon display_line_options end_display_opt 843 display_screen: DISPLAY display_varlist . accept_display_options end_display_opt 845 display_varlist: display_varlist . sep_opt gname LISTSEP shift, and go to state 98 UPON shift, and go to state 572 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) NLITERAL reduce using rule 1214 (sep_opt) CLITERAL reduce using rule 1214 (sep_opt) '+' reduce using rule 1214 (sep_opt) '-' reduce using rule 1214 (sep_opt) ALL reduce using rule 1214 (sep_opt) FUNCTION reduce using rule 1214 (sep_opt) HIGHVALUES reduce using rule 1214 (sep_opt) LOWVALUES reduce using rule 1214 (sep_opt) QUOTES reduce using rule 1214 (sep_opt) SPACES reduce using rule 1214 (sep_opt) ZERO reduce using rule 1214 (sep_opt) $default reduce using rule 862 (accept_display_options) display_upon go to state 573 accept_display_options go to state 574 sep_opt go to state 575 state 413 844 display_varlist: gname . $default reduce using rule 844 (display_varlist) state 414 813 divide_statement: DIVIDE divide_body . end_divide_opt END_DIVIDE shift, and go to state 576 END_DIVIDE [reduce using rule 820 (end_divide_opt)] $default reduce using rule 820 (end_divide_opt) end_divide_opt go to state 577 state 415 815 divide_body: gname . BY gname GIVING var_list_name on_size_error_opt 816 | gname . BY gname GIVING name rounded_opt REMAINDER name on_size_error_opt 817 | gname . INTO gname GIVING name rounded_opt REMAINDER name on_size_error_opt 818 | gname . INTO gname GIVING var_list_name on_size_error_opt 819 | gname . INTO var_list_name on_size_error_opt BY shift, and go to state 578 INTO shift, and go to state 579 state 416 652 evaluate_statement: EVALUATE @62 . selection_subject_set $@63 when_case_list end_evaluate_or_eos $default reduce using rule 655 (@64) selection_subject_set go to state 580 @64 go to state 581 state 417 984 exit_statement: EXIT PARAGRAPH . $default reduce using rule 984 (exit_statement) state 418 985 exit_statement: EXIT PROGRAM . $default reduce using rule 985 (exit_statement) state 419 733 generate_statement: GENERATE name . $default reduce using rule 733 (generate_statement) state 420 1240 to_opt: TO . $default reduce using rule 1240 (to_opt) state 421 956 goto_statement: GO to_opt . goto_label 957 | GO to_opt . goto_label_list DEPENDING on_opt variable LABELSTR shift, and go to state 582 NLITERAL shift, and go to state 583 goto_label go to state 584 goto_label_list go to state 585 label go to state 586 state 422 1283 cond_name: VARCOND . '(' $@146 subscripts ')' 1284 | VARCOND . '(' shift, and go to state 587 $default reduce using rule 1284 (cond_name) state 423 1182 condition: NOT . condition VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 588 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 424 1119 expr: '(' . expr ')' 1187 condition: '(' . condition ')' VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 589 condition go to state 590 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 425 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1181 condition: expr . extended_cond_op $@142 expr_opt CONDITIONAL shift, and go to state 591 IS shift, and go to state 592 '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 NOT shift, and go to state 598 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 sign_condition go to state 606 class_condition go to state 607 extended_cond_op go to state 608 ext_cond go to state 609 conditional go to state 610 state 426 684 if_part: IF condition . @73 end_then_opt conditional_statement 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition OR shift, and go to state 611 AND shift, and go to state 612 $default reduce using rule 683 (@73) @73 go to state 613 state 427 1113 expr: gname . $default reduce using rule 1113 (expr) state 428 1188 condition: cond_name . $default reduce using rule 1188 (condition) state 429 774 initialize_statement: INITIALIZE gname_list . initialize_replacing_opt 1244 gname_list: gname_list . sep_opt gname LISTSEP shift, and go to state 98 REPLACING shift, and go to state 614 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) NLITERAL reduce using rule 1214 (sep_opt) CLITERAL reduce using rule 1214 (sep_opt) '+' reduce using rule 1214 (sep_opt) '-' reduce using rule 1214 (sep_opt) ALL reduce using rule 1214 (sep_opt) FUNCTION reduce using rule 1214 (sep_opt) HIGHVALUES reduce using rule 1214 (sep_opt) LOWVALUES reduce using rule 1214 (sep_opt) QUOTES reduce using rule 1214 (sep_opt) SPACES reduce using rule 1214 (sep_opt) ZERO reduce using rule 1214 (sep_opt) $default reduce using rule 776 (initialize_replacing_opt) initialize_replacing_opt go to state 615 sep_opt go to state 99 state 430 732 initiate_statement: INITIATE name . $default reduce using rule 732 (initiate_statement) state 431 1086 inspect_statement: INSPECT name . tallying_clause $@126 replacing_clause 1087 | INSPECT name . converting_clause CONVERTING shift, and go to state 616 TALLYING shift, and go to state 617 $default reduce using rule 1090 (tallying_clause) converting_clause go to state 618 tallying_clause go to state 619 state 432 740 merge_statement: MERGE name . sort_keys $@86 sort_collating_opt $@87 merge_using $@88 sort_output ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) sort_keys go to state 621 sort_key go to state 622 on_opt go to state 623 state 433 771 move_statement: MOVE CORRESPONDING . name_var TO name_var VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 624 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 name_var go to state 625 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 434 772 move_statement: MOVE LENGTH . OF gname TO name_var OF shift, and go to state 626 state 435 770 move_statement: MOVE gname . TO name_var_list 773 | MOVE gname . TO TO shift, and go to state 627 state 436 807 multiply_statement: MULTIPLY multiply_body . end_multiply_opt END_MULTIPLY shift, and go to state 628 END_MULTIPLY [reduce using rule 811 (end_multiply_opt)] $default reduce using rule 811 (end_multiply_opt) end_multiply_opt go to state 629 state 437 809 multiply_body: gname . BY gname GIVING var_list_name on_size_error_opt 810 | gname . BY var_list_name on_size_error_opt BY shift, and go to state 630 state 438 876 open_mode: error . $default reduce using rule 876 (open_mode) state 439 875 open_mode: EXTEND . $default reduce using rule 875 (open_mode) state 440 872 open_mode: INPUT . $default reduce using rule 872 (open_mode) state 441 873 open_mode: I_O . $default reduce using rule 873 (open_mode) state 442 874 open_mode: OUTPUT . $default reduce using rule 874 (open_mode) state 443 868 open_statement: OPEN open_options . 871 open_options: open_options . open_mode open_varlist error shift, and go to state 438 EXTEND shift, and go to state 439 INPUT shift, and go to state 440 I_O shift, and go to state 441 OUTPUT shift, and go to state 442 READ reduce using rule 868 (open_statement) WRITE reduce using rule 868 (open_statement) RELEASE reduce using rule 868 (open_statement) NOT reduce using rule 868 (open_statement) ACCEPT reduce using rule 868 (open_statement) ADD reduce using rule 868 (open_statement) CALL reduce using rule 868 (open_statement) CALL_LOADLIB reduce using rule 868 (open_statement) CANCEL reduce using rule 868 (open_statement) CHAIN reduce using rule 868 (open_statement) CLOSE reduce using rule 868 (open_statement) COMPUTE reduce using rule 868 (open_statement) CONTINUE reduce using rule 868 (open_statement) DELETE reduce using rule 868 (open_statement) DISPLAY reduce using rule 868 (open_statement) DIVIDE reduce using rule 868 (open_statement) ELSE reduce using rule 868 (open_statement) END_ACCEPT reduce using rule 868 (open_statement) END_ADD reduce using rule 868 (open_statement) END_CALL reduce using rule 868 (open_statement) END_CHAIN reduce using rule 868 (open_statement) END_COMPUTE reduce using rule 868 (open_statement) END_DELETE reduce using rule 868 (open_statement) END_DIVIDE reduce using rule 868 (open_statement) END_EVALUATE reduce using rule 868 (open_statement) END_IF reduce using rule 868 (open_statement) END_MULTIPLY reduce using rule 868 (open_statement) END_PERFORM reduce using rule 868 (open_statement) END_READ reduce using rule 868 (open_statement) END_RETURN reduce using rule 868 (open_statement) END_REWRITE reduce using rule 868 (open_statement) END_SEARCH reduce using rule 868 (open_statement) END_START reduce using rule 868 (open_statement) END_STRINGCMD reduce using rule 868 (open_statement) END_SUBTRACT reduce using rule 868 (open_statement) END_UNSTRING reduce using rule 868 (open_statement) END_WRITE reduce using rule 868 (open_statement) EVALUATE reduce using rule 868 (open_statement) EXIT reduce using rule 868 (open_statement) GENERATE reduce using rule 868 (open_statement) GO reduce using rule 868 (open_statement) GOBACK reduce using rule 868 (open_statement) IF reduce using rule 868 (open_statement) INITIALIZE reduce using rule 868 (open_statement) INITIATE reduce using rule 868 (open_statement) INSPECT reduce using rule 868 (open_statement) MERGE reduce using rule 868 (open_statement) MOVE reduce using rule 868 (open_statement) MULTIPLY reduce using rule 868 (open_statement) NOTEXCEP reduce using rule 868 (open_statement) OPEN reduce using rule 868 (open_statement) PERFORM reduce using rule 868 (open_statement) READY reduce using rule 868 (open_statement) RESET reduce using rule 868 (open_statement) RETURN reduce using rule 868 (open_statement) REWRITE reduce using rule 868 (open_statement) SEARCH reduce using rule 868 (open_statement) SET reduce using rule 868 (open_statement) SORT reduce using rule 868 (open_statement) START reduce using rule 868 (open_statement) STOP reduce using rule 868 (open_statement) STRINGCMD reduce using rule 868 (open_statement) SUBTRACT reduce using rule 868 (open_statement) TCOBPROTO1 reduce using rule 868 (open_statement) TCOBPROTO2 reduce using rule 868 (open_statement) TERMINATE reduce using rule 868 (open_statement) UNLOCK reduce using rule 868 (open_statement) UNSTRING reduce using rule 868 (open_statement) WHEN reduce using rule 868 (open_statement) PERIOD_TOK reduce using rule 868 (open_statement) open_mode go to state 631 state 444 870 open_options: open_mode . open_varlist VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 open_varlist go to state 632 name go to state 633 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 445 1287 name: LABELSTR . 1302 label: LABELSTR . in_of LABELSTR 1303 | LABELSTR . IN shift, and go to state 102 OF shift, and go to state 103 TIMES reduce using rule 1287 (name) $default reduce using rule 1303 (label) in_of go to state 634 state 446 1270 signed_nliteral: NLITERAL . 1304 label: NLITERAL . 1305 | NLITERAL . in_of NLITERAL 1306 | NLITERAL . in_of LABELSTR IN shift, and go to state 102 OF shift, and go to state 103 TIMES reduce using rule 1270 (signed_nliteral) $default reduce using rule 1304 (label) in_of go to state 635 state 447 642 perform_statement: PERFORM perform_options . $default reduce using rule 642 (perform_statement) state 448 1151 perform_options: with_test_opt . UNTIL @131 condition @132 perform_statements $@133 END_PERFORM 1155 | with_test_opt . VARYING name FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM UNTIL shift, and go to state 636 VARYING shift, and go to state 637 state 449 1144 perform_options: perform_statements . END_PERFORM END_PERFORM shift, and go to state 638 state 450 1177 perform_statements: $@141 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 639 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 451 1166 with_test_opt: with_opt . TEST before_after TEST shift, and go to state 641 state 452 1147 perform_options: gname . TIMES @129 perform_statements $@130 END_PERFORM TIMES shift, and go to state 642 state 453 1156 perform_options: label . perform_thru_opt 1158 | label . perform_thru_opt with_test_opt UNTIL @137 condition 1159 | label . perform_thru_opt gname TIMES 1162 | label . perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname UNTIL @138 condition @139 perform_after_opt THRU shift, and go to state 643 $default reduce using rule 1163 (perform_thru_opt) perform_thru_opt go to state 644 state 454 730 trace_statement: READY TRACE . $default reduce using rule 730 (trace_statement) state 455 731 trace_statement: RESET TRACE . $default reduce using rule 731 (trace_statement) state 456 894 return_statement: RETURN return_body . end_return_opt END_RETURN shift, and go to state 645 END_RETURN [reduce using rule 928 (end_return_opt)] $default reduce using rule 928 (end_return_opt) end_return_opt go to state 646 state 457 896 return_body: name . record_opt read_into_opt 897 | name . record_opt read_into_opt read_at_end_opt RECORD shift, and go to state 570 $default reduce using rule 1223 (record_opt) record_opt go to state 647 state 458 943 rewrite_statement: REWRITE name . write_from_opt $@102 invalid_key_opt end_rewrite_opt FROM shift, and go to state 539 $default reduce using rule 935 (write_from_opt) write_from_opt go to state 648 state 459 1277 variable_indexed: SUBSCVAR . $default reduce using rule 1277 (variable_indexed) state 460 649 search_statement: SEARCH ALL . search_all end_search_opt SUBSCVAR shift, and go to state 459 search_all go to state 649 variable_indexed go to state 650 state 461 648 search_statement: SEARCH search . end_search_opt END_SEARCH shift, and go to state 651 END_SEARCH [reduce using rule 725 (end_search_opt)] $default reduce using rule 725 (end_search_opt) end_search_opt go to state 652 state 462 698 search: variable_indexed . @76 search_varying_opt @77 search_at_end @78 search_when_list $default reduce using rule 695 (@76) @76 go to state 653 state 463 174 name_list: error . $default reduce using rule 174 (name_list) state 464 1025 address_of_opt: ADDRESS . of_opt OF shift, and go to state 654 $default reduce using rule 318 (of_opt) of_opt go to state 655 state 465 173 name_list: name_list . variable 1015 set_target: name_list . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 $default reduce using rule 1015 (set_target) variable go to state 656 qualified_var go to state 80 unqualified_var go to state 81 state 466 1010 set_statement: SET set_list . $default reduce using rule 1010 (set_statement) state 467 1011 set_list: set_target . TO address_of_opt set_variable_or_nlit 1012 | set_target . UP BY var_or_nliteral 1013 | set_target . DOWN BY var_or_nliteral TO shift, and go to state 657 DOWN shift, and go to state 658 UP shift, and go to state 659 state 468 1014 set_list: address_of_opt . variable TO address_of_opt set_variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 660 qualified_var go to state 80 unqualified_var go to state 81 state 469 1016 set_target: cond_name . $default reduce using rule 1016 (set_target) state 470 172 name_list: variable . $default reduce using rule 172 (name_list) state 471 1277 variable_indexed: SUBSCVAR . 1295 unqualified_var: SUBSCVAR . DIRECTION reduce using rule 1277 (variable_indexed) DIRECTION [reduce using rule 1295 (unqualified_var)] ON reduce using rule 1277 (variable_indexed) ON [reduce using rule 1295 (unqualified_var)] $default reduce using rule 1295 (unqualified_var) state 472 749 sort_variable_indexed: SORT variable_indexed . sort_keys_idx $@92 sort_duplicates_opt sort_collating_opt ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) sort_keys_idx go to state 661 sort_key_idx go to state 662 on_opt go to state 663 state 473 747 sort_file: SORT name . sort_keys $@89 sort_duplicates_opt sort_collating_opt $@90 sort_input $@91 sort_output ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) sort_keys go to state 664 sort_key go to state 622 on_opt go to state 623 state 474 951 start_statement: START start_body . invalid_key_opt $@104 end_start_opt NOT shift, and go to state 665 INVALID shift, and go to state 666 NOTEXCEP shift, and go to state 667 NOT [reduce using rule 1064 (invalid_key_opt)] NOTEXCEP [reduce using rule 1064 (invalid_key_opt)] $default reduce using rule 1064 (invalid_key_opt) invalid_key_opt go to state 668 invalid_key_sentence go to state 669 not_invalid_key_sentence go to state 670 not_excep go to state 671 state 475 952 start_body: name . 953 | name . KEY is_opt cond_op name KEY shift, and go to state 672 $default reduce using rule 952 (start_body) state 476 989 stop_literal: NLITERAL . $default reduce using rule 989 (stop_literal) state 477 988 stop_literal: CLITERAL . $default reduce using rule 988 (stop_literal) state 478 986 stop_statement: STOP RUN . $default reduce using rule 986 (stop_statement) state 479 987 stop_statement: STOP stop_literal . $default reduce using rule 987 (stop_statement) state 480 1075 string_from_list: error . $default reduce using rule 1075 (string_from_list) state 481 1027 string_statement: STRINGCMD string_from_list . INTO name string_with_pointer $@117 on_overflow_opt end_stringcmd_opt 1074 string_from_list: string_from_list . sep_opt string_from INTO shift, and go to state 673 LISTSEP shift, and go to state 98 $default reduce using rule 1214 (sep_opt) sep_opt go to state 674 state 482 1073 string_from_list: string_from . $default reduce using rule 1073 (string_from_list) state 483 1076 string_from: gname . 1077 | gname . DELIMITED by_opt delimited_by DELIMITED shift, and go to state 675 $default reduce using rule 1076 (string_from) state 484 804 subtract_body: CORRESPONDING . var_list_gname FROM var_list_name rounded_opt on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 var_list_gname go to state 676 gname go to state 399 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 485 800 subtract_statement: SUBTRACT subtract_body . end_subtract_opt END_SUBTRACT shift, and go to state 677 END_SUBTRACT [reduce using rule 805 (end_subtract_opt)] $default reduce using rule 805 (end_subtract_opt) end_subtract_opt go to state 678 state 486 802 subtract_body: var_list_gname . FROM var_list_name on_size_error_opt 803 | var_list_gname . FROM gname GIVING var_list_name on_size_error_opt 994 var_list_gname: var_list_gname . gname sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FROM shift, and go to state 679 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 550 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 487 728 proto_statement: TCOBPROTO1 gname . $default reduce using rule 728 (proto_statement) state 488 729 proto_statement: TCOBPROTO2 gname . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 680 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 489 734 terminate_statement: TERMINATE name . $default reduce using rule 734 (terminate_statement) state 490 727 unlock_statement: UNLOCK name . $default reduce using rule 727 (unlock_statement) state 491 1029 unstring_statement: UNSTRING name . unstring_delimited INTO unstring_destinations string_with_pointer unstring_tallying $@118 on_overflow_opt end_unstring_opt DELIMITED shift, and go to state 681 $default reduce using rule 1031 (unstring_delimited) unstring_delimited go to state 682 state 492 566 procedure_decl: $@53 statements PERIOD_TOK . $default reduce using rule 566 (procedure_decl) state 493 598 statements: statements statement . $default reduce using rule 598 (statements) state 494 647 if_statement: if_part ELSE . @60 conditional_statement $@61 end_if_opt $default reduce using rule 645 (@60) @60 go to state 683 state 495 644 if_statement: if_part $@59 . end_if_opt END_IF shift, and go to state 684 END_IF [reduce using rule 691 (end_if_opt)] $default reduce using rule 691 (end_if_opt) end_if_opt go to state 685 state 496 44 collating_opt: COLLATING . $default reduce using rule 44 (collating_opt) state 497 41 program_collating_opt: PROGRAM collating_sequence . $default reduce using rule 41 (program_collating_opt) state 498 43 collating_sequence: collating_opt . SEQUENCE is_opt STRING SEQUENCE shift, and go to state 686 state 499 38 configuration_option: OBJECT_COMPUTER PERIOD_TOK $@8 STRING program_collating_opt PERIOD_TOK . $default reduce using rule 38 (configuration_option) state 500 36 configuration_option: SOURCE_COMPUTER PERIOD_TOK $@7 STRING debug_mode_opt PERIOD_TOK . $default reduce using rule 36 (configuration_option) state 501 46 debug_mode_opt: with_opt DEBUGGING . MODE MODE shift, and go to state 687 state 502 82 alphabet_type: NATIVE . $default reduce using rule 82 (alphabet_type) state 503 83 alphabet_type: STANDARD_1 . $default reduce using rule 83 (alphabet_type) state 504 84 alphabet_type: STANDARD_2 . $default reduce using rule 84 (alphabet_type) state 505 81 alphabet_details: ALPHABET STRING is_opt alphabet_type . $default reduce using rule 81 (alphabet_details) state 506 85 alphabet_type: alphabet_literal_list . 87 alphabet_literal_list: alphabet_literal_list . alphabet_literal_item NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 85 (alphabet_type) alphabet_literal_item go to state 688 without_all_literal go to state 508 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 507 86 alphabet_literal_list: alphabet_literal_item . $default reduce using rule 86 (alphabet_literal_list) state 508 88 alphabet_literal_item: without_all_literal . 89 | without_all_literal . THRU without_all_literal 90 | without_all_literal . alphabet_also_list THRU shift, and go to state 689 ALSO shift, and go to state 690 $default reduce using rule 88 (alphabet_literal_item) alphabet_also_list go to state 691 state 509 66 special_name_class_item: CLITERAL . 67 | CLITERAL . THRU CLITERAL THRU shift, and go to state 692 $default reduce using rule 66 (special_name_class_item) state 510 63 special_name_class: CLASS STRING is_opt special_name_class_item_list . 65 special_name_class_item_list: special_name_class_item_list . special_name_class_item CLITERAL shift, and go to state 509 $default reduce using rule 63 (special_name_class) special_name_class_item go to state 693 state 511 64 special_name_class_item_list: special_name_class_item . $default reduce using rule 64 (special_name_class_item_list) state 512 60 currency_details: CURRENCY sign_opt is_opt CLITERAL . $default reduce using rule 60 (currency_details) state 513 69 screen_status_details: DISPLAY_SCREEN STATUS is_opt STRING . $default reduce using rule 69 (screen_status_details) state 514 74 switches_details: STRING is_opt STRING . $@9 switch_on_opt switch_off_opt $default reduce using rule 73 ($@9) $@9 go to state 694 state 515 103 file_select: SELECT optional_opt def_name $@10 . select_clauses PERIOD_TOK $default reduce using rule 105 (select_clauses) select_clauses go to state 695 state 516 163 tape_opt: TAPE . $default reduce using rule 163 (tape_opt) state 517 157 i_o_control_multiple_file_tape_clause: MULTIPLE FILE_TOK tape_opt . contains_opt i_o_control_multiple_file_list CONTAINS shift, and go to state 696 $default reduce using rule 545 (contains_opt) contains_opt go to state 697 state 518 165 are_opta: AREA . $default reduce using rule 165 (are_opta) state 519 152 i_o_control_same_clause: SAME same_clause_options are_opta . for_opt string_list FOR shift, and go to state 698 $default reduce using rule 168 (for_opt) for_opt go to state 699 state 520 419 file_section: file_section FD $@38 STRING $@39 . file_description_fd_clauses PERIOD_TOK $@40 file_description $default reduce using rule 483 (file_description_fd_clauses) file_description_fd_clauses go to state 700 state 521 423 file_section: file_section SD $@41 STRING $@42 . file_description_sd_clauses PERIOD_TOK $@43 file_description $default reduce using rule 485 (file_description_sd_clauses) file_description_sd_clauses go to state 701 state 522 429 field_description: integer def_name_opt $@44 . data_clauses PERIOD_TOK $default reduce using rule 430 (data_clauses) data_clauses go to state 702 state 523 194 report_section: RD $@15 . STRING $@16 report_controls PERIOD_TOK $@17 report_description STRING shift, and go to state 703 state 524 320 screen_section_opt: SCREEN SECTION PERIOD_TOK $@27 screen_section . 322 screen_section: screen_section . screen_item NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 $default reduce using rule 320 (screen_section_opt) screen_item go to state 704 signed_nliteral go to state 234 integer go to state 705 state 525 580 declaratives_decl: error . $@57 PERIOD_TOK 583 declaratives_procedure: error . PERIOD_TOK reduce using rule 579 ($@57) $default reduce using rule 583 (declaratives_procedure) $@57 go to state 706 state 526 571 declaratives_opt: DECLARATIVES PERIOD_TOK $@55 declaratives_procedure declaratives_division END . DECLARATIVES PERIOD_TOK DECLARATIVES shift, and go to state 707 state 527 574 declaratives_division: declaratives_division declaratives_decl . $default reduce using rule 574 (declaratives_division) state 528 578 declaratives_decl: $@56 . statements PERIOD_TOK READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statements go to state 708 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 529 575 declaratives_decl: declaratives_procedure . $default reduce using rule 575 (declaratives_decl) state 530 576 declaratives_decl: paragraph . $default reduce using rule 576 (declaratives_decl) state 531 585 use_phrase: error . $default reduce using rule 585 (use_phrase) state 532 584 use_phrase: USE . AFTER use_phrase_exception_error PROCEDURE on_opt use_phrase_option PERIOD_TOK AFTER shift, and go to state 709 state 533 582 declaratives_procedure: procedure_section $@58 use_phrase . $default reduce using rule 582 (declaratives_procedure) state 534 927 end_read_opt: END_READ . $default reduce using rule 927 (end_read_opt) state 535 898 read_statement: READ read_body end_read_opt . $default reduce using rule 898 (read_statement) state 536 904 read_next_opt: NEXT . $default reduce using rule 904 (read_next_opt) state 537 905 read_next_opt: PREVIOUS . $default reduce using rule 905 (read_next_opt) state 538 900 read_body: name read_next_opt . record_opt read_into_opt with_lock_opt read_key_opt 901 | name read_next_opt . record_opt read_into_opt with_lock_opt read_key_opt read_at_end_opt 902 | name read_next_opt . record_opt read_into_opt with_lock_opt read_key_opt read_invalid_key_opt RECORD shift, and go to state 570 $default reduce using rule 1223 (record_opt) record_opt go to state 710 state 539 936 write_from_opt: FROM . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 711 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 540 934 write_statement: WRITE name write_from_opt . write_options $@101 invalid_key_opt end_write_opt AFTER shift, and go to state 712 BEFORE shift, and go to state 713 $default reduce using rule 937 (write_options) write_options go to state 714 before_after go to state 715 state 541 932 release_from_opt: FROM . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 716 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 542 930 release_statement: RELEASE name release_from_opt . $default reduce using rule 930 (release_statement) state 543 826 accept_hardware: ACCEPT name FROM . INKEY end_accept_opt 827 | ACCEPT name FROM . INPUT STATUS end_accept_opt 828 | ACCEPT name FROM . CMD_LINE end_accept_opt 829 | ACCEPT name FROM . ESCKEY end_accept_opt 830 | ACCEPT name FROM . ENVIRONMENT_VARIABLE CLITERAL end_accept_opt 831 accept_chronological: ACCEPT name FROM . DATE_TIME end_accept_opt CMD_LINE shift, and go to state 717 ENVIRONMENT_VARIABLE shift, and go to state 718 INKEY shift, and go to state 719 ESCKEY shift, and go to state 720 DATE_TIME shift, and go to state 721 INPUT shift, and go to state 722 state 544 832 accept_screen: ACCEPT name accept_display_options . end_accept_opt 836 | ACCEPT name accept_display_options . on_opt EXCEPTION $@93 variable @94 statement_list $@95 end_accept_opt 863 accept_display_options: accept_display_options . accept_display_option AT shift, and go to state 723 COLUMN shift, and go to state 724 END_ACCEPT shift, and go to state 725 LINE shift, and go to state 726 ON shift, and go to state 620 POSITION shift, and go to state 727 WITH shift, and go to state 358 IS reduce using rule 1233 (with_opt) NO reduce using rule 1233 (with_opt) AUTO reduce using rule 1233 (with_opt) BACKGROUNDCOLOR reduce using rule 1233 (with_opt) BELL reduce using rule 1233 (with_opt) BLANK reduce using rule 1233 (with_opt) BLINK reduce using rule 1233 (with_opt) END_ACCEPT [reduce using rule 837 (end_accept_opt)] ERASE reduce using rule 1233 (with_opt) EXCEPTION reduce using rule 1235 (on_opt) FOREGROUNDCOLOR reduce using rule 1233 (with_opt) FULL reduce using rule 1233 (with_opt) HIGHLIGHT reduce using rule 1233 (with_opt) JUSTIFIED reduce using rule 1233 (with_opt) LEADING reduce using rule 1233 (with_opt) LOWER reduce using rule 1233 (with_opt) LOWLIGHT reduce using rule 1233 (with_opt) NOECHO reduce using rule 1233 (with_opt) REQUIRED reduce using rule 1233 (with_opt) REVERSEVIDEO reduce using rule 1233 (with_opt) SECURE reduce using rule 1233 (with_opt) SIGN reduce using rule 1233 (with_opt) TRAILING reduce using rule 1233 (with_opt) UNDERLINE reduce using rule 1233 (with_opt) UPDATE reduce using rule 1233 (with_opt) UPPER reduce using rule 1233 (with_opt) WITH [reduce using rule 1233 (with_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 728 scr_line go to state 729 scr_position go to state 730 scr_line_position go to state 731 accept_display_option go to state 732 with_opt go to state 733 on_opt go to state 734 state 545 795 add_body: CORRESPONDING var_list_gname . TO var_list_name rounded_opt on_size_error_opt 994 var_list_gname: var_list_gname . gname sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 TO shift, and go to state 735 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 550 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 546 799 end_add_opt: END_ADD . $default reduce using rule 799 (end_add_opt) state 547 791 add_statement: ADD add_body end_add_opt . $default reduce using rule 791 (add_statement) state 548 793 add_body: var_list_gname TO . var_list_name on_size_error_opt 797 add_to_opt: TO . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 var_list_name go to state 736 gname go to state 737 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 738 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 549 794 add_body: var_list_gname add_to_opt . GIVING var_list_name on_size_error_opt GIVING shift, and go to state 739 state 550 994 var_list_gname: var_list_gname gname . sep_opt LISTSEP shift, and go to state 98 $default reduce using rule 1214 (sep_opt) sep_opt go to state 740 state 551 993 var_list_gname: gname sep_opt . $default reduce using rule 993 (var_list_gname) state 552 970 call_convention_opt: CALL_CONV_C . $default reduce using rule 970 (call_convention_opt) state 553 971 call_convention_opt: CALL_CONV_STDCALL . $default reduce using rule 971 (call_convention_opt) state 554 967 call_statement: CALL $@105 call_convention_opt . gname using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 741 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 555 973 call_loadlib_statement: CALL_LOADLIB gname $@110 . end_call_loadlib_opt END_CALL_LOADLIB shift, and go to state 742 $default reduce using rule 976 (end_call_loadlib_opt) end_call_loadlib_opt go to state 743 state 556 981 chain_statement: CHAIN $@111 gname . using_options @112 @113 on_exception_or_overflow $@114 end_chain_opt USING shift, and go to state 744 $default reduce using rule 1122 (using_options) using_options go to state 745 state 557 882 close_files: close_files sep_opt . close_file VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 close_file go to state 746 name go to state 407 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 558 887 close_options: REEL . 889 | REEL . for_opt REMOVAL FOR shift, and go to state 698 REMOVAL reduce using rule 168 (for_opt) $default reduce using rule 887 (close_options) for_opt go to state 747 state 559 888 close_options: UNIT . 890 | UNIT . for_opt REMOVAL FOR shift, and go to state 698 REMOVAL reduce using rule 168 (for_opt) $default reduce using rule 888 (close_options) for_opt go to state 748 state 560 883 close_file: name close_options_opt . $default reduce using rule 883 (close_file) state 561 884 close_options_opt: close_options . $default reduce using rule 884 (close_options_opt) state 562 885 close_options_opt: with_lock_opt . $default reduce using rule 885 (close_options_opt) state 563 886 close_options: with_opt . NO REWIND 891 with_lock_opt: with_opt . LOCK 892 | with_opt . IGNORE LOCK NO shift, and go to state 749 IGNORE shift, and go to state 750 LOCK shift, and go to state 751 state 564 790 end_compute_opt: END_COMPUTE . $default reduce using rule 790 (end_compute_opt) state 565 786 compute_statement: COMPUTE compute_body end_compute_opt . $default reduce using rule 786 (compute_statement) state 566 788 compute_body: var_list_name CONDITIONAL . expr on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 753 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 567 992 var_list_name: var_list_name name . rounded_opt sep_opt ROUNDED shift, and go to state 568 ROUNDED [reduce using rule 995 (rounded_opt)] $default reduce using rule 995 (rounded_opt) rounded_opt go to state 754 state 568 996 rounded_opt: ROUNDED . $default reduce using rule 996 (rounded_opt) state 569 991 var_list_name: name rounded_opt . sep_opt LISTSEP shift, and go to state 98 $default reduce using rule 1214 (sep_opt) sep_opt go to state 755 state 570 1224 record_opt: RECORD . $default reduce using rule 1224 (record_opt) state 571 947 delete_statement: DELETE name record_opt . $@103 invalid_key_opt end_delete_opt $default reduce using rule 946 ($@103) $@103 go to state 756 state 572 846 display_upon: UPON . CONSOLE 847 | UPON . STD_OUTPUT 848 | UPON . STD_ERROR CONSOLE shift, and go to state 757 STD_ERROR shift, and go to state 758 STD_OUTPUT shift, and go to state 759 state 573 842 display_line: DISPLAY display_varlist display_upon . display_line_options end_display_opt $default reduce using rule 849 (display_line_options) display_line_options go to state 760 state 574 843 display_screen: DISPLAY display_varlist accept_display_options . end_display_opt 863 accept_display_options: accept_display_options . accept_display_option AT shift, and go to state 723 COLUMN shift, and go to state 724 END_DISPLAY shift, and go to state 761 LINE shift, and go to state 726 POSITION shift, and go to state 727 WITH shift, and go to state 358 IS reduce using rule 1233 (with_opt) NO reduce using rule 1233 (with_opt) AUTO reduce using rule 1233 (with_opt) BACKGROUNDCOLOR reduce using rule 1233 (with_opt) BELL reduce using rule 1233 (with_opt) BLANK reduce using rule 1233 (with_opt) BLINK reduce using rule 1233 (with_opt) ERASE reduce using rule 1233 (with_opt) FOREGROUNDCOLOR reduce using rule 1233 (with_opt) FULL reduce using rule 1233 (with_opt) HIGHLIGHT reduce using rule 1233 (with_opt) JUSTIFIED reduce using rule 1233 (with_opt) LEADING reduce using rule 1233 (with_opt) LOWER reduce using rule 1233 (with_opt) LOWLIGHT reduce using rule 1233 (with_opt) NOECHO reduce using rule 1233 (with_opt) REQUIRED reduce using rule 1233 (with_opt) REVERSEVIDEO reduce using rule 1233 (with_opt) SECURE reduce using rule 1233 (with_opt) SIGN reduce using rule 1233 (with_opt) TRAILING reduce using rule 1233 (with_opt) UNDERLINE reduce using rule 1233 (with_opt) UPDATE reduce using rule 1233 (with_opt) UPPER reduce using rule 1233 (with_opt) WITH [reduce using rule 1233 (with_opt)] $default reduce using rule 855 (end_display_opt) end_display_opt go to state 762 scr_line go to state 729 scr_position go to state 730 scr_line_position go to state 731 accept_display_option go to state 732 with_opt go to state 733 state 575 845 display_varlist: display_varlist sep_opt . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 763 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 576 821 end_divide_opt: END_DIVIDE . $default reduce using rule 821 (end_divide_opt) state 577 813 divide_statement: DIVIDE divide_body end_divide_opt . $default reduce using rule 813 (divide_statement) state 578 815 divide_body: gname BY . gname GIVING var_list_name on_size_error_opt 816 | gname BY . gname GIVING name rounded_opt REMAINDER name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 764 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 579 817 divide_body: gname INTO . gname GIVING name rounded_opt REMAINDER name on_size_error_opt 818 | gname INTO . gname GIVING var_list_name on_size_error_opt 819 | gname INTO . var_list_name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 var_list_name go to state 765 gname go to state 766 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 738 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 580 652 evaluate_statement: EVALUATE @62 selection_subject_set . $@63 when_case_list end_evaluate_or_eos 658 selection_subject_set: selection_subject_set . ALSO @65 selection_subject ALSO shift, and go to state 767 $default reduce using rule 651 ($@63) $@63 go to state 768 state 581 656 selection_subject_set: @64 . selection_subject VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FALSE_TOK shift, and go to state 769 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 TRUE_TOK shift, and go to state 770 ZERO shift, and go to state 69 '(' shift, and go to state 424 selection_subject go to state 771 expr go to state 772 condition go to state 773 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 582 1302 label: LABELSTR . in_of LABELSTR 1303 | LABELSTR . IN shift, and go to state 102 OF shift, and go to state 103 $default reduce using rule 1303 (label) in_of go to state 634 state 583 1304 label: NLITERAL . 1305 | NLITERAL . in_of NLITERAL 1306 | NLITERAL . in_of LABELSTR IN shift, and go to state 102 OF shift, and go to state 103 $default reduce using rule 1304 (label) in_of go to state 635 state 584 956 goto_statement: GO to_opt goto_label . $default reduce using rule 956 (goto_statement) state 585 957 goto_statement: GO to_opt goto_label_list . DEPENDING on_opt variable 960 goto_label_list: goto_label_list . label 961 | goto_label_list . LISTSEP label LABELSTR shift, and go to state 582 NLITERAL shift, and go to state 583 DEPENDING shift, and go to state 774 LISTSEP shift, and go to state 775 label go to state 776 state 586 958 goto_label: label . 959 goto_label_list: label . LABELSTR reduce using rule 959 (goto_label_list) NLITERAL reduce using rule 959 (goto_label_list) DEPENDING reduce using rule 959 (goto_label_list) LISTSEP reduce using rule 959 (goto_label_list) $default reduce using rule 958 (goto_label) state 587 1283 cond_name: VARCOND '(' . $@146 subscripts ')' $default reduce using rule 1282 ($@146) $@146 go to state 777 state 588 1182 condition: NOT condition . 1184 | condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition $default reduce using rule 1182 (condition) state 589 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1119 | '(' expr . ')' 1181 condition: expr . extended_cond_op $@142 expr_opt CONDITIONAL shift, and go to state 591 IS shift, and go to state 592 '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 NOT shift, and go to state 598 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 ')' shift, and go to state 778 sign_condition go to state 606 class_condition go to state 607 extended_cond_op go to state 608 ext_cond go to state 609 conditional go to state 610 state 590 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition 1187 | '(' condition . ')' OR shift, and go to state 611 AND shift, and go to state 612 ')' shift, and go to state 779 state 591 1211 conditional: CONDITIONAL . than_to_opt TO shift, and go to state 780 THAN shift, and go to state 781 $default reduce using rule 1220 (than_to_opt) than_to_opt go to state 782 state 592 1199 extended_cond_op: IS . ext_cond 1200 | IS . NOT ext_cond 1201 | IS . ext_cond OR ext_cond CONDITIONAL shift, and go to state 591 NOT shift, and go to state 783 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 sign_condition go to state 606 class_condition go to state 607 ext_cond go to state 784 conditional go to state 610 state 593 1116 expr: expr '+' . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 785 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 594 1117 expr: expr '-' . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 786 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 595 1114 expr: expr '*' . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 787 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 596 1115 expr: expr '/' . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 788 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 597 1118 expr: expr POW_OP . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 789 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 598 1203 extended_cond_op: NOT . is_opt ext_cond IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 790 state 599 1196 class_condition: ALPHABETIC . $default reduce using rule 1196 (class_condition) state 600 1197 class_condition: ALPHABETIC_LOWER . $default reduce using rule 1197 (class_condition) state 601 1198 class_condition: ALPHABETIC_UPPER . $default reduce using rule 1198 (class_condition) state 602 1193 sign_condition: NEGATIVE . $default reduce using rule 1193 (sign_condition) state 603 1195 class_condition: NUMERIC . $default reduce using rule 1195 (class_condition) state 604 1192 sign_condition: POSITIVE . $default reduce using rule 1192 (sign_condition) state 605 1194 sign_condition: ZERO . $default reduce using rule 1194 (sign_condition) state 606 1207 ext_cond: sign_condition . $default reduce using rule 1207 (ext_cond) state 607 1206 ext_cond: class_condition . $default reduce using rule 1206 (ext_cond) state 608 1181 condition: expr extended_cond_op . $@142 expr_opt $default reduce using rule 1180 ($@142) $@142 go to state 791 state 609 1202 extended_cond_op: ext_cond . 1204 | ext_cond . OR ext_cond OR shift, and go to state 792 OR [reduce using rule 1202 (extended_cond_op)] $default reduce using rule 1202 (extended_cond_op) state 610 1205 ext_cond: conditional . $default reduce using rule 1205 (ext_cond) state 611 1186 condition: condition OR . @144 implied_op_condition $default reduce using rule 1185 (@144) @144 go to state 793 state 612 1184 condition: condition AND . @143 implied_op_condition $default reduce using rule 1183 (@143) @143 go to state 794 state 613 684 if_part: IF condition @73 . end_then_opt conditional_statement THEN shift, and go to state 795 $default reduce using rule 693 (end_then_opt) end_then_opt go to state 796 state 614 777 initialize_replacing_opt: REPLACING . initialize_replacing_lists ALPHABETIC shift, and go to state 797 ALPHANUMERIC shift, and go to state 798 ALPHANUMERIC_EDITED shift, and go to state 799 NUMERIC shift, and go to state 800 NUMERIC_EDITED shift, and go to state 801 initialize_replacing_lists go to state 802 initialize_replacing_list go to state 803 initialize_type_list go to state 804 state 615 774 initialize_statement: INITIALIZE gname_list initialize_replacing_opt . $default reduce using rule 774 (initialize_statement) state 616 1088 converting_clause: CONVERTING . noallname TO noallname inspect_before_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 805 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 617 1089 tallying_clause: TALLYING . tallying_list $default reduce using rule 1092 (tallying_list) tallying_list go to state 808 state 618 1087 inspect_statement: INSPECT name converting_clause . $default reduce using rule 1087 (inspect_statement) state 619 1086 inspect_statement: INSPECT name tallying_clause . $@126 replacing_clause $default reduce using rule 1085 ($@126) $@126 go to state 809 state 620 1236 on_opt: ON . $default reduce using rule 1236 (on_opt) state 621 740 merge_statement: MERGE name sort_keys . $@86 sort_collating_opt $@87 merge_using $@88 sort_output 751 sort_keys: sort_keys . sort_key ON shift, and go to state 620 DIRECTION reduce using rule 1235 (on_opt) $default reduce using rule 737 ($@86) $@86 go to state 810 sort_key go to state 811 on_opt go to state 623 state 622 750 sort_keys: sort_key . $default reduce using rule 750 (sort_keys) state 623 754 sort_key: on_opt . DIRECTION key_opt sort_keys_names DIRECTION shift, and go to state 812 state 624 1288 name_var: gname . $default reduce using rule 1288 (name_var) state 625 771 move_statement: MOVE CORRESPONDING name_var . TO name_var TO shift, and go to state 813 state 626 772 move_statement: MOVE LENGTH OF . gname TO name_var VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 814 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 627 770 move_statement: MOVE gname TO . name_var_list 773 | MOVE gname TO . VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 773 (move_statement) name_var_list go to state 815 gname go to state 624 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 name_var go to state 816 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 628 812 end_multiply_opt: END_MULTIPLY . $default reduce using rule 812 (end_multiply_opt) state 629 807 multiply_statement: MULTIPLY multiply_body end_multiply_opt . $default reduce using rule 807 (multiply_statement) state 630 809 multiply_body: gname BY . gname GIVING var_list_name on_size_error_opt 810 | gname BY . var_list_name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 var_list_name go to state 817 gname go to state 818 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 738 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 631 871 open_options: open_options open_mode . open_varlist VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 open_varlist go to state 819 name go to state 633 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 632 870 open_options: open_mode open_varlist . 878 open_varlist: open_varlist . sep_opt name LISTSEP shift, and go to state 98 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) $default reduce using rule 870 (open_options) sep_opt go to state 820 state 633 877 open_varlist: name . $default reduce using rule 877 (open_varlist) state 634 1302 label: LABELSTR in_of . LABELSTR LABELSTR shift, and go to state 821 state 635 1305 label: NLITERAL in_of . NLITERAL 1306 | NLITERAL in_of . LABELSTR LABELSTR shift, and go to state 822 NLITERAL shift, and go to state 823 state 636 1151 perform_options: with_test_opt UNTIL . @131 condition @132 perform_statements $@133 END_PERFORM $default reduce using rule 1148 (@131) @131 go to state 824 state 637 1155 perform_options: with_test_opt VARYING . name FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 825 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 638 1144 perform_options: perform_statements END_PERFORM . $default reduce using rule 1144 (perform_options) state 639 1177 perform_statements: $@141 statement_list . $default reduce using rule 1177 (perform_statements) state 640 596 statement_list: statements . 598 statements: statements . statement READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 READ [reduce using rule 596 (statement_list)] WRITE [reduce using rule 596 (statement_list)] RELEASE [reduce using rule 596 (statement_list)] ACCEPT [reduce using rule 596 (statement_list)] ADD [reduce using rule 596 (statement_list)] CALL [reduce using rule 596 (statement_list)] CALL_LOADLIB [reduce using rule 596 (statement_list)] CANCEL [reduce using rule 596 (statement_list)] CHAIN [reduce using rule 596 (statement_list)] CLOSE [reduce using rule 596 (statement_list)] COMPUTE [reduce using rule 596 (statement_list)] CONTINUE [reduce using rule 596 (statement_list)] DELETE [reduce using rule 596 (statement_list)] DISPLAY [reduce using rule 596 (statement_list)] DIVIDE [reduce using rule 596 (statement_list)] EVALUATE [reduce using rule 596 (statement_list)] EXIT [reduce using rule 596 (statement_list)] GENERATE [reduce using rule 596 (statement_list)] GO [reduce using rule 596 (statement_list)] GOBACK [reduce using rule 596 (statement_list)] IF [reduce using rule 596 (statement_list)] INITIALIZE [reduce using rule 596 (statement_list)] INITIATE [reduce using rule 596 (statement_list)] INSPECT [reduce using rule 596 (statement_list)] MERGE [reduce using rule 596 (statement_list)] MOVE [reduce using rule 596 (statement_list)] MULTIPLY [reduce using rule 596 (statement_list)] OPEN [reduce using rule 596 (statement_list)] PERFORM [reduce using rule 596 (statement_list)] READY [reduce using rule 596 (statement_list)] RESET [reduce using rule 596 (statement_list)] RETURN [reduce using rule 596 (statement_list)] REWRITE [reduce using rule 596 (statement_list)] SEARCH [reduce using rule 596 (statement_list)] SET [reduce using rule 596 (statement_list)] SORT [reduce using rule 596 (statement_list)] START [reduce using rule 596 (statement_list)] STOP [reduce using rule 596 (statement_list)] STRINGCMD [reduce using rule 596 (statement_list)] SUBTRACT [reduce using rule 596 (statement_list)] TCOBPROTO1 [reduce using rule 596 (statement_list)] TCOBPROTO2 [reduce using rule 596 (statement_list)] TERMINATE [reduce using rule 596 (statement_list)] UNLOCK [reduce using rule 596 (statement_list)] UNSTRING [reduce using rule 596 (statement_list)] $default reduce using rule 596 (statement_list) statement go to state 493 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 641 1166 with_test_opt: with_opt TEST . before_after AFTER shift, and go to state 712 BEFORE shift, and go to state 713 before_after go to state 826 state 642 1147 perform_options: gname TIMES . @129 perform_statements $@130 END_PERFORM $default reduce using rule 1145 (@129) @129 go to state 827 state 643 1164 perform_thru_opt: THRU . label LABELSTR shift, and go to state 582 NLITERAL shift, and go to state 583 label go to state 828 state 644 1156 perform_options: label perform_thru_opt . 1158 | label perform_thru_opt . with_test_opt UNTIL @137 condition 1159 | label perform_thru_opt . gname TIMES 1162 | label perform_thru_opt . with_test_opt VARYING name FROM gname by_opt gname UNTIL @138 condition @139 perform_after_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 WITH shift, and go to state 358 ZERO shift, and go to state 69 TEST reduce using rule 1233 (with_opt) UNTIL reduce using rule 1165 (with_test_opt) VARYING reduce using rule 1165 (with_test_opt) $default reduce using rule 1156 (perform_options) with_test_opt go to state 829 with_opt go to state 451 gname go to state 830 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 645 929 end_return_opt: END_RETURN . $default reduce using rule 929 (end_return_opt) state 646 894 return_statement: RETURN return_body end_return_opt . $default reduce using rule 894 (return_statement) state 647 896 return_body: name record_opt . read_into_opt 897 | name record_opt . read_into_opt read_at_end_opt INTO shift, and go to state 831 $default reduce using rule 906 (read_into_opt) read_into_opt go to state 832 state 648 943 rewrite_statement: REWRITE name write_from_opt . $@102 invalid_key_opt end_rewrite_opt $default reduce using rule 942 ($@102) $@102 go to state 833 state 649 649 search_statement: SEARCH ALL search_all . end_search_opt END_SEARCH shift, and go to state 651 END_SEARCH [reduce using rule 725 (end_search_opt)] $default reduce using rule 725 (end_search_opt) end_search_opt go to state 834 state 650 701 search_all: variable_indexed . @79 search_at_end $@80 search_all_when_list $default reduce using rule 699 (@79) @79 go to state 835 state 651 726 end_search_opt: END_SEARCH . $default reduce using rule 726 (end_search_opt) state 652 648 search_statement: SEARCH search end_search_opt . $default reduce using rule 648 (search_statement) state 653 698 search: variable_indexed @76 . search_varying_opt @77 search_at_end @78 search_when_list VARYING shift, and go to state 836 $default reduce using rule 703 (search_varying_opt) search_varying_opt go to state 837 state 654 317 of_opt: OF . $default reduce using rule 317 (of_opt) state 655 1025 address_of_opt: ADDRESS of_opt . $default reduce using rule 1025 (address_of_opt) state 656 173 name_list: name_list variable . $default reduce using rule 173 (name_list) state 657 1011 set_list: set_target TO . address_of_opt set_variable_or_nlit ADDRESS shift, and go to state 464 $default reduce using rule 1024 (address_of_opt) address_of_opt go to state 838 state 658 1013 set_list: set_target DOWN . BY var_or_nliteral BY shift, and go to state 839 state 659 1012 set_list: set_target UP . BY var_or_nliteral BY shift, and go to state 840 state 660 1014 set_list: address_of_opt variable . TO address_of_opt set_variable TO shift, and go to state 841 state 661 749 sort_variable_indexed: SORT variable_indexed sort_keys_idx . $@92 sort_duplicates_opt sort_collating_opt 753 sort_keys_idx: sort_keys_idx . sort_key_idx ON shift, and go to state 620 DIRECTION reduce using rule 1235 (on_opt) $default reduce using rule 748 ($@92) $@92 go to state 842 sort_key_idx go to state 843 on_opt go to state 663 state 662 752 sort_keys_idx: sort_key_idx . $default reduce using rule 752 (sort_keys_idx) state 663 755 sort_key_idx: on_opt . DIRECTION key_opt sort_keys_names_idx DIRECTION shift, and go to state 844 state 664 747 sort_file: SORT name sort_keys . $@89 sort_duplicates_opt sort_collating_opt $@90 sort_input $@91 sort_output 751 sort_keys: sort_keys . sort_key ON shift, and go to state 620 DIRECTION reduce using rule 1235 (on_opt) $default reduce using rule 744 ($@89) $@89 go to state 845 sort_key go to state 811 on_opt go to state 623 state 665 1070 not_excep: NOT . $default reduce using rule 1070 (not_excep) state 666 1066 invalid_key_sentence: INVALID . key_opt @124 statement_list KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 847 state 667 1069 not_excep: NOTEXCEP . $default reduce using rule 1069 (not_excep) state 668 951 start_statement: START start_body invalid_key_opt . $@104 end_start_opt $default reduce using rule 950 ($@104) $@104 go to state 848 state 669 1061 invalid_key_opt: invalid_key_sentence . 1063 | invalid_key_sentence . not_invalid_key_sentence NOT shift, and go to state 665 NOTEXCEP shift, and go to state 667 NOT [reduce using rule 1061 (invalid_key_opt)] NOTEXCEP [reduce using rule 1061 (invalid_key_opt)] $default reduce using rule 1061 (invalid_key_opt) not_invalid_key_sentence go to state 849 not_excep go to state 671 state 670 1062 invalid_key_opt: not_invalid_key_sentence . $default reduce using rule 1062 (invalid_key_opt) state 671 1068 not_invalid_key_sentence: not_excep . INVALID key_opt @125 statement_list INVALID shift, and go to state 850 state 672 953 start_body: name KEY . is_opt cond_op name IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 851 state 673 1027 string_statement: STRINGCMD string_from_list INTO . name string_with_pointer $@117 on_overflow_opt end_stringcmd_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 852 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 674 1074 string_from_list: string_from_list sep_opt . string_from VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 string_from go to state 853 gname go to state 483 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 675 1077 string_from: gname DELIMITED . by_opt delimited_by BY shift, and go to state 854 $default reduce using rule 1231 (by_opt) by_opt go to state 855 state 676 804 subtract_body: CORRESPONDING var_list_gname . FROM var_list_name rounded_opt on_size_error_opt 994 var_list_gname: var_list_gname . gname sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FROM shift, and go to state 856 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 550 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 677 806 end_subtract_opt: END_SUBTRACT . $default reduce using rule 806 (end_subtract_opt) state 678 800 subtract_statement: SUBTRACT subtract_body end_subtract_opt . $default reduce using rule 800 (subtract_statement) state 679 802 subtract_body: var_list_gname FROM . var_list_name on_size_error_opt 803 | var_list_gname FROM . gname GIVING var_list_name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 var_list_name go to state 857 gname go to state 858 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 738 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 680 729 proto_statement: TCOBPROTO2 gname gname . $default reduce using rule 729 (proto_statement) state 681 1030 unstring_delimited: DELIMITED . by_opt unstring_delimited_vars BY shift, and go to state 854 $default reduce using rule 1231 (by_opt) by_opt go to state 859 state 682 1029 unstring_statement: UNSTRING name unstring_delimited . INTO unstring_destinations string_with_pointer unstring_tallying $@118 on_overflow_opt end_unstring_opt INTO shift, and go to state 860 state 683 647 if_statement: if_part ELSE @60 . conditional_statement $@61 end_if_opt NEXT reduce using rule 687 ($@75) $default reduce using rule 685 ($@74) conditional_statement go to state 861 $@74 go to state 862 $@75 go to state 863 state 684 692 end_if_opt: END_IF . $default reduce using rule 692 (end_if_opt) state 685 644 if_statement: if_part $@59 end_if_opt . $default reduce using rule 644 (if_statement) state 686 43 collating_sequence: collating_opt SEQUENCE . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 864 state 687 46 debug_mode_opt: with_opt DEBUGGING MODE . $default reduce using rule 46 (debug_mode_opt) state 688 87 alphabet_literal_list: alphabet_literal_list alphabet_literal_item . $default reduce using rule 87 (alphabet_literal_list) state 689 89 alphabet_literal_item: without_all_literal THRU . without_all_literal NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 without_all_literal go to state 865 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 690 91 alphabet_also_list: ALSO . without_all_literal NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 without_all_literal go to state 866 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 691 90 alphabet_literal_item: without_all_literal alphabet_also_list . 92 alphabet_also_list: alphabet_also_list . ALSO without_all_literal ALSO shift, and go to state 867 $default reduce using rule 90 (alphabet_literal_item) state 692 67 special_name_class_item: CLITERAL THRU . CLITERAL CLITERAL shift, and go to state 868 state 693 65 special_name_class_item_list: special_name_class_item_list special_name_class_item . $default reduce using rule 65 (special_name_class_item_list) state 694 74 switches_details: STRING is_opt STRING $@9 . switch_on_opt switch_off_opt ON shift, and go to state 869 $default reduce using rule 76 (switch_on_opt) switch_on_opt go to state 870 state 695 103 file_select: SELECT optional_opt def_name $@10 select_clauses . PERIOD_TOK 104 select_clauses: select_clauses . select_clause error shift, and go to state 871 ACCESS shift, and go to state 872 ALTERNATE shift, and go to state 873 ASSIGN shift, and go to state 874 FILE_TOK shift, and go to state 875 ORGANIZATION shift, and go to state 876 RECORD shift, and go to state 877 RELATIVE shift, and go to state 878 RESERVE shift, and go to state 879 PERIOD_TOK shift, and go to state 880 STRING reduce using rule 118 (organization_opt) LABELSTR reduce using rule 118 (organization_opt) IS reduce using rule 118 (organization_opt) INDEXED reduce using rule 118 (organization_opt) LINE reduce using rule 118 (organization_opt) RELATIVE [reduce using rule 118 (organization_opt)] SEQUENTIAL reduce using rule 118 (organization_opt) STATUS reduce using rule 116 (file_opt) select_clause go to state 881 file_opt go to state 882 organization_opt go to state 883 state 696 546 contains_opt: CONTAINS . $default reduce using rule 546 (contains_opt) state 697 157 i_o_control_multiple_file_tape_clause: MULTIPLE FILE_TOK tape_opt contains_opt . i_o_control_multiple_file_list STRING shift, and go to state 884 i_o_control_multiple_file_list go to state 885 i_o_control_multiple_file go to state 886 state 698 167 for_opt: FOR . $default reduce using rule 167 (for_opt) state 699 152 i_o_control_same_clause: SAME same_clause_options are_opta for_opt . string_list error shift, and go to state 887 STRING shift, and go to state 888 string_list go to state 889 state 700 419 file_section: file_section FD $@38 STRING $@39 file_description_fd_clauses . PERIOD_TOK $@40 file_description 484 file_description_fd_clauses: file_description_fd_clauses . file_description_fd_clause IS shift, and go to state 84 BLOCK shift, and go to state 890 CODE_SET shift, and go to state 891 DATA shift, and go to state 892 LABEL shift, and go to state 893 LINAGE shift, and go to state 894 RECORD shift, and go to state 895 REPORT shift, and go to state 896 REPORTS shift, and go to state 897 VALUE shift, and go to state 898 PERIOD_TOK shift, and go to state 899 $default reduce using rule 132 (is_opt) is_opt go to state 900 file_description_fd_clause go to state 901 file_description_clause_block go to state 902 file_description_clause_record go to state 903 file_description_clause_label go to state 904 file_description_clause_value go to state 905 file_description_clause_data go to state 906 file_description_clause_report go to state 907 file_description_clause_code_set go to state 908 file_description_clause_linage go to state 909 report_is_are go to state 910 state 701 423 file_section: file_section SD $@41 STRING $@42 file_description_sd_clauses . PERIOD_TOK $@43 file_description 486 file_description_sd_clauses: file_description_sd_clauses . file_description_sd_clause DATA shift, and go to state 892 RECORD shift, and go to state 895 PERIOD_TOK shift, and go to state 911 file_description_sd_clause go to state 912 file_description_clause_record go to state 913 file_description_clause_data go to state 914 state 702 429 field_description: integer def_name_opt $@44 data_clauses . PERIOD_TOK 431 data_clauses: data_clauses . data_clause 432 | data_clauses . redefines_clause IS shift, and go to state 84 BLANK shift, and go to state 915 JUSTIFIED shift, and go to state 916 OCCURS shift, and go to state 917 PICTURE shift, and go to state 918 REDEFINES shift, and go to state 919 RENAMES shift, and go to state 920 SIGN shift, and go to state 921 SYNCHRONIZED shift, and go to state 922 USAGE shift, and go to state 923 VALUE shift, and go to state 924 VALUES shift, and go to state 925 PERIOD_TOK shift, and go to state 926 USAGENUM reduce using rule 539 (usage_opt) IS [reduce using rule 539 (usage_opt)] DISPLAY reduce using rule 539 (usage_opt) POINTER reduce using rule 539 (usage_opt) $default reduce using rule 132 (is_opt) is_opt go to state 927 sign_clause go to state 928 sign_is_opt go to state 929 redefines_clause go to state 930 data_clause go to state 931 array_options go to state 932 usage_option go to state 933 value_option go to state 934 value_is_are go to state 935 pictures go to state 936 usage_opt go to state 937 state 703 194 report_section: RD $@15 STRING . $@16 report_controls PERIOD_TOK $@17 report_description $default reduce using rule 192 ($@16) $@16 go to state 938 state 704 322 screen_section: screen_section screen_item . $default reduce using rule 322 (screen_section) state 705 325 screen_item: integer . def_name_opt $@28 screen_clauses PERIOD_TOK STRING shift, and go to state 368 FILLER shift, and go to state 369 $default reduce using rule 1274 (def_name_opt) def_name_opt go to state 939 def_name go to state 381 state 706 580 declaratives_decl: error $@57 . PERIOD_TOK PERIOD_TOK shift, and go to state 940 state 707 571 declaratives_opt: DECLARATIVES PERIOD_TOK $@55 declaratives_procedure declaratives_division END DECLARATIVES . PERIOD_TOK PERIOD_TOK shift, and go to state 941 state 708 578 declaratives_decl: $@56 statements . PERIOD_TOK 598 statements: statements . statement READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 PERIOD_TOK shift, and go to state 942 statement go to state 493 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 709 584 use_phrase: USE AFTER . use_phrase_exception_error PROCEDURE on_opt use_phrase_option PERIOD_TOK ERROR_TOK shift, and go to state 943 EXCEPTION shift, and go to state 944 STANDARD shift, and go to state 945 use_phrase_exception_error go to state 946 state 710 900 read_body: name read_next_opt record_opt . read_into_opt with_lock_opt read_key_opt 901 | name read_next_opt record_opt . read_into_opt with_lock_opt read_key_opt read_at_end_opt 902 | name read_next_opt record_opt . read_into_opt with_lock_opt read_key_opt read_invalid_key_opt INTO shift, and go to state 831 $default reduce using rule 906 (read_into_opt) read_into_opt go to state 947 state 711 936 write_from_opt: FROM gname . $default reduce using rule 936 (write_from_opt) state 712 1179 before_after: AFTER . $default reduce using rule 1179 (before_after) state 713 1178 before_after: BEFORE . $default reduce using rule 1178 (before_after) state 714 934 write_statement: WRITE name write_from_opt write_options . $@101 invalid_key_opt end_write_opt $default reduce using rule 933 ($@101) $@101 go to state 948 state 715 938 write_options: before_after . advancing_opt gname line_lines_opt 939 | before_after . advancing_opt PAGE ADVANCING shift, and go to state 949 $default reduce using rule 1218 (advancing_opt) advancing_opt go to state 950 state 716 932 release_from_opt: FROM gname . $default reduce using rule 932 (release_from_opt) state 717 828 accept_hardware: ACCEPT name FROM CMD_LINE . end_accept_opt END_ACCEPT shift, and go to state 725 END_ACCEPT [reduce using rule 837 (end_accept_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 951 state 718 830 accept_hardware: ACCEPT name FROM ENVIRONMENT_VARIABLE . CLITERAL end_accept_opt CLITERAL shift, and go to state 952 state 719 826 accept_hardware: ACCEPT name FROM INKEY . end_accept_opt END_ACCEPT shift, and go to state 725 END_ACCEPT [reduce using rule 837 (end_accept_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 953 state 720 829 accept_hardware: ACCEPT name FROM ESCKEY . end_accept_opt END_ACCEPT shift, and go to state 725 END_ACCEPT [reduce using rule 837 (end_accept_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 954 state 721 831 accept_chronological: ACCEPT name FROM DATE_TIME . end_accept_opt END_ACCEPT shift, and go to state 725 END_ACCEPT [reduce using rule 837 (end_accept_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 955 state 722 827 accept_hardware: ACCEPT name FROM INPUT . STATUS end_accept_opt STATUS shift, and go to state 956 state 723 860 scr_line_position: AT . NLITERAL 861 | AT . variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 NLITERAL shift, and go to state 957 variable go to state 958 qualified_var go to state 80 unqualified_var go to state 81 state 724 858 scr_position: COLUMN . number_opt expr NUMBER shift, and go to state 959 $default reduce using rule 306 (number_opt) number_opt go to state 960 state 725 838 end_accept_opt: END_ACCEPT . $default reduce using rule 838 (end_accept_opt) state 726 857 scr_line: LINE . number_opt expr NUMBER shift, and go to state 959 $default reduce using rule 306 (number_opt) number_opt go to state 961 state 727 859 scr_position: POSITION . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 962 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 728 832 accept_screen: ACCEPT name accept_display_options end_accept_opt . $default reduce using rule 832 (accept_screen) state 729 865 accept_display_option: scr_line . $default reduce using rule 865 (accept_display_option) state 730 866 accept_display_option: scr_position . $default reduce using rule 866 (accept_display_option) state 731 867 accept_display_option: scr_line_position . $default reduce using rule 867 (accept_display_option) state 732 863 accept_display_options: accept_display_options accept_display_option . $default reduce using rule 863 (accept_display_options) state 733 864 accept_display_option: with_opt . screen_attribx IS shift, and go to state 84 AUTO shift, and go to state 963 BACKGROUNDCOLOR shift, and go to state 964 BLANK shift, and go to state 965 BLINK shift, and go to state 966 ERASE shift, and go to state 967 FOREGROUNDCOLOR shift, and go to state 968 FULL shift, and go to state 969 HIGHLIGHT shift, and go to state 970 JUSTIFIED shift, and go to state 971 LOWER shift, and go to state 972 LOWLIGHT shift, and go to state 973 REQUIRED shift, and go to state 974 REVERSEVIDEO shift, and go to state 975 SECURE shift, and go to state 976 SIGN shift, and go to state 921 UNDERLINE shift, and go to state 977 UPPER shift, and go to state 978 WITH shift, and go to state 358 LEADING reduce using rule 132 (is_opt) TRAILING reduce using rule 132 (is_opt) $default reduce using rule 1233 (with_opt) is_opt go to state 979 screen_attribx go to state 980 sign_clause go to state 981 sign_is_opt go to state 929 with_opt go to state 982 state 734 836 accept_screen: ACCEPT name accept_display_options on_opt . EXCEPTION $@93 variable @94 statement_list $@95 end_accept_opt EXCEPTION shift, and go to state 983 state 735 795 add_body: CORRESPONDING var_list_gname TO . var_list_name rounded_opt on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 var_list_name go to state 984 name go to state 410 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 736 793 add_body: var_list_gname TO var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 986 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 737 797 add_to_opt: TO gname . $default reduce using rule 797 (add_to_opt) state 738 991 var_list_name: name . rounded_opt sep_opt 1245 gname: name . ROUNDED shift, and go to state 568 GIVING reduce using rule 1245 (gname) $default reduce using rule 995 (rounded_opt) rounded_opt go to state 569 state 739 794 add_body: var_list_gname add_to_opt GIVING . var_list_name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 var_list_name go to state 988 name go to state 410 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 740 994 var_list_gname: var_list_gname gname sep_opt . $default reduce using rule 994 (var_list_gname) state 741 967 call_statement: CALL $@105 call_convention_opt gname . using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt USING shift, and go to state 744 $default reduce using rule 1122 (using_options) using_options go to state 989 state 742 975 end_call_loadlib_opt: END_CALL_LOADLIB . $default reduce using rule 975 (end_call_loadlib_opt) state 743 973 call_loadlib_statement: CALL_LOADLIB gname $@110 end_call_loadlib_opt . $default reduce using rule 973 (call_loadlib_statement) state 744 1125 using_options: USING . @127 dummy @128 parm_list $default reduce using rule 1123 (@127) @127 go to state 990 state 745 981 chain_statement: CHAIN $@111 gname using_options . @112 @113 on_exception_or_overflow $@114 end_chain_opt $default reduce using rule 978 (@112) @112 go to state 991 state 746 882 close_files: close_files sep_opt close_file . $default reduce using rule 882 (close_files) state 747 889 close_options: REEL for_opt . REMOVAL REMOVAL shift, and go to state 992 state 748 890 close_options: UNIT for_opt . REMOVAL REMOVAL shift, and go to state 993 state 749 886 close_options: with_opt NO . REWIND REWIND shift, and go to state 994 state 750 892 with_lock_opt: with_opt IGNORE . LOCK LOCK shift, and go to state 995 state 751 891 with_lock_opt: with_opt LOCK . $default reduce using rule 891 (with_lock_opt) state 752 1119 expr: '(' . expr ')' VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 996 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 753 788 compute_body: var_list_name CONDITIONAL expr . on_size_error_opt 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 997 on_opt go to state 987 state 754 992 var_list_name: var_list_name name rounded_opt . sep_opt LISTSEP shift, and go to state 98 $default reduce using rule 1214 (sep_opt) sep_opt go to state 998 state 755 991 var_list_name: name rounded_opt sep_opt . $default reduce using rule 991 (var_list_name) state 756 947 delete_statement: DELETE name record_opt $@103 . invalid_key_opt end_delete_opt NOT shift, and go to state 665 INVALID shift, and go to state 666 NOTEXCEP shift, and go to state 667 NOT [reduce using rule 1064 (invalid_key_opt)] NOTEXCEP [reduce using rule 1064 (invalid_key_opt)] $default reduce using rule 1064 (invalid_key_opt) invalid_key_opt go to state 999 invalid_key_sentence go to state 669 not_invalid_key_sentence go to state 670 not_excep go to state 671 state 757 846 display_upon: UPON CONSOLE . $default reduce using rule 846 (display_upon) state 758 848 display_upon: UPON STD_ERROR . $default reduce using rule 848 (display_upon) state 759 847 display_upon: UPON STD_OUTPUT . $default reduce using rule 847 (display_upon) state 760 842 display_line: DISPLAY display_varlist display_upon display_line_options . end_display_opt 850 display_line_options: display_line_options . with_opt NO ADVANCING 851 | display_line_options . with_opt ERASE 852 | display_line_options . with_opt ERASE EOS 853 | display_line_options . with_opt ERASE EOL 854 | display_line_options . with_opt ERASE SCREEN END_DISPLAY shift, and go to state 761 WITH shift, and go to state 358 NO reduce using rule 1233 (with_opt) ERASE reduce using rule 1233 (with_opt) $default reduce using rule 855 (end_display_opt) end_display_opt go to state 1000 with_opt go to state 1001 state 761 856 end_display_opt: END_DISPLAY . $default reduce using rule 856 (end_display_opt) state 762 843 display_screen: DISPLAY display_varlist accept_display_options end_display_opt . $default reduce using rule 843 (display_screen) state 763 845 display_varlist: display_varlist sep_opt gname . $default reduce using rule 845 (display_varlist) state 764 815 divide_body: gname BY gname . GIVING var_list_name on_size_error_opt 816 | gname BY gname . GIVING name rounded_opt REMAINDER name on_size_error_opt GIVING shift, and go to state 1002 state 765 819 divide_body: gname INTO var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1003 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 766 817 divide_body: gname INTO gname . GIVING name rounded_opt REMAINDER name on_size_error_opt 818 | gname INTO gname . GIVING var_list_name on_size_error_opt GIVING shift, and go to state 1004 state 767 658 selection_subject_set: selection_subject_set ALSO . @65 selection_subject $default reduce using rule 657 (@65) @65 go to state 1005 state 768 652 evaluate_statement: EVALUATE @62 selection_subject_set $@63 . when_case_list end_evaluate_or_eos WHEN shift, and go to state 1006 when_case_list go to state 1007 state 769 662 selection_subject: FALSE_TOK . $default reduce using rule 662 (selection_subject) state 770 661 selection_subject: TRUE_TOK . $default reduce using rule 661 (selection_subject) state 771 656 selection_subject_set: @64 selection_subject . $default reduce using rule 656 (selection_subject_set) state 772 659 selection_subject: expr . 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1181 condition: expr . extended_cond_op $@142 expr_opt CONDITIONAL shift, and go to state 591 IS shift, and go to state 592 '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 NOT shift, and go to state 598 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 $default reduce using rule 659 (selection_subject) sign_condition go to state 606 class_condition go to state 607 extended_cond_op go to state 608 ext_cond go to state 609 conditional go to state 610 state 773 660 selection_subject: condition . 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition OR shift, and go to state 611 AND shift, and go to state 612 $default reduce using rule 660 (selection_subject) state 774 957 goto_statement: GO to_opt goto_label_list DEPENDING . on_opt variable ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1008 state 775 961 goto_label_list: goto_label_list LISTSEP . label LABELSTR shift, and go to state 582 NLITERAL shift, and go to state 583 label go to state 1009 state 776 960 goto_label_list: goto_label_list label . $default reduce using rule 960 (goto_label_list) state 777 1283 cond_name: VARCOND '(' $@146 . subscripts ')' VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 149 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 subscripts go to state 1010 subscript go to state 151 state 778 1119 expr: '(' expr ')' . $default reduce using rule 1119 (expr) state 779 1187 condition: '(' condition ')' . $default reduce using rule 1187 (condition) state 780 1221 than_to_opt: TO . $default reduce using rule 1221 (than_to_opt) state 781 1222 than_to_opt: THAN . $default reduce using rule 1222 (than_to_opt) state 782 1211 conditional: CONDITIONAL than_to_opt . $default reduce using rule 1211 (conditional) state 783 1200 extended_cond_op: IS NOT . ext_cond CONDITIONAL shift, and go to state 591 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 sign_condition go to state 606 class_condition go to state 607 ext_cond go to state 1011 conditional go to state 610 state 784 1199 extended_cond_op: IS ext_cond . 1201 | IS ext_cond . OR ext_cond OR shift, and go to state 1012 OR [reduce using rule 1199 (extended_cond_op)] $default reduce using rule 1199 (extended_cond_op) state 785 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1116 | expr '+' expr . 1117 | expr . '-' expr 1118 | expr . POW_OP expr '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 1116 (expr) state 786 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1117 | expr '-' expr . 1118 | expr . POW_OP expr '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 1117 (expr) state 787 1114 expr: expr . '*' expr 1114 | expr '*' expr . 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr POW_OP shift, and go to state 597 $default reduce using rule 1114 (expr) state 788 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1115 | expr '/' expr . 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr POW_OP shift, and go to state 597 $default reduce using rule 1115 (expr) state 789 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1118 | expr POW_OP expr . $default reduce using rule 1118 (expr) state 790 1203 extended_cond_op: NOT is_opt . ext_cond CONDITIONAL shift, and go to state 591 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 sign_condition go to state 606 class_condition go to state 607 ext_cond go to state 1013 conditional go to state 610 state 791 1181 condition: expr extended_cond_op $@142 . expr_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 $default reduce using rule 1120 (expr_opt) expr go to state 1014 expr_opt go to state 1015 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 792 1204 extended_cond_op: ext_cond OR . ext_cond CONDITIONAL shift, and go to state 591 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 sign_condition go to state 606 class_condition go to state 607 ext_cond go to state 1016 conditional go to state 610 state 793 1186 condition: condition OR @144 . implied_op_condition VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 CONDITIONAL shift, and go to state 591 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 1017 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 1018 condition go to state 1019 implied_op_condition go to state 1020 cond_op go to state 1021 conditional go to state 1022 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 794 1184 condition: condition AND @143 . implied_op_condition VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 CONDITIONAL shift, and go to state 591 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 1017 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 1018 condition go to state 1019 implied_op_condition go to state 1023 cond_op go to state 1021 conditional go to state 1022 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 795 694 end_then_opt: THEN . $default reduce using rule 694 (end_then_opt) state 796 684 if_part: IF condition @73 end_then_opt . conditional_statement NEXT reduce using rule 687 ($@75) $default reduce using rule 685 ($@74) conditional_statement go to state 1024 $@74 go to state 862 $@75 go to state 863 state 797 781 initialize_type_list: ALPHABETIC . $default reduce using rule 781 (initialize_type_list) state 798 782 initialize_type_list: ALPHANUMERIC . $default reduce using rule 782 (initialize_type_list) state 799 784 initialize_type_list: ALPHANUMERIC_EDITED . $default reduce using rule 784 (initialize_type_list) state 800 783 initialize_type_list: NUMERIC . $default reduce using rule 783 (initialize_type_list) state 801 785 initialize_type_list: NUMERIC_EDITED . $default reduce using rule 785 (initialize_type_list) state 802 777 initialize_replacing_opt: REPLACING initialize_replacing_lists . 779 initialize_replacing_lists: initialize_replacing_lists . initialize_replacing_list ALPHABETIC shift, and go to state 797 ALPHANUMERIC shift, and go to state 798 ALPHANUMERIC_EDITED shift, and go to state 799 NUMERIC shift, and go to state 800 NUMERIC_EDITED shift, and go to state 801 $default reduce using rule 777 (initialize_replacing_opt) initialize_replacing_list go to state 1025 initialize_type_list go to state 804 state 803 778 initialize_replacing_lists: initialize_replacing_list . $default reduce using rule 778 (initialize_replacing_lists) state 804 780 initialize_replacing_list: initialize_type_list . data_opt BY gname DATA shift, and go to state 1026 $default reduce using rule 551 (data_opt) data_opt go to state 1027 state 805 1088 converting_clause: CONVERTING noallname . TO noallname inspect_before_after TO shift, and go to state 1028 state 806 1253 noallname: without_all_literal . $default reduce using rule 1253 (noallname) state 807 1252 noallname: name . $default reduce using rule 1252 (noallname) state 808 1089 tallying_clause: TALLYING tallying_list . 1091 tallying_list: tallying_list . name FOR tallying_for_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 1089 (tallying_clause) name go to state 1029 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 809 1086 inspect_statement: INSPECT name tallying_clause $@126 . replacing_clause REPLACING shift, and go to state 1030 $default reduce using rule 1098 (replacing_clause) replacing_clause go to state 1031 state 810 740 merge_statement: MERGE name sort_keys $@86 . sort_collating_opt $@87 merge_using $@88 sort_output COLLATING shift, and go to state 496 USING reduce using rule 762 (sort_collating_opt) $default reduce using rule 45 (collating_opt) collating_sequence go to state 1032 collating_opt go to state 498 sort_collating_opt go to state 1033 state 811 751 sort_keys: sort_keys sort_key . $default reduce using rule 751 (sort_keys) state 812 754 sort_key: on_opt DIRECTION . key_opt sort_keys_names KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1034 state 813 771 move_statement: MOVE CORRESPONDING name_var TO . name_var VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 624 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 name_var go to state 1035 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 814 772 move_statement: MOVE LENGTH OF gname . TO name_var TO shift, and go to state 1036 state 815 770 move_statement: MOVE gname TO name_var_list . 1242 name_var_list: name_var_list . sep_opt name_var LISTSEP shift, and go to state 98 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) NLITERAL reduce using rule 1214 (sep_opt) CLITERAL reduce using rule 1214 (sep_opt) '+' reduce using rule 1214 (sep_opt) '-' reduce using rule 1214 (sep_opt) ALL reduce using rule 1214 (sep_opt) FUNCTION reduce using rule 1214 (sep_opt) HIGHVALUES reduce using rule 1214 (sep_opt) LOWVALUES reduce using rule 1214 (sep_opt) QUOTES reduce using rule 1214 (sep_opt) SPACES reduce using rule 1214 (sep_opt) ZERO reduce using rule 1214 (sep_opt) $default reduce using rule 770 (move_statement) sep_opt go to state 1037 state 816 1241 name_var_list: name_var . $default reduce using rule 1241 (name_var_list) state 817 810 multiply_body: gname BY var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1038 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 818 809 multiply_body: gname BY gname . GIVING var_list_name on_size_error_opt GIVING shift, and go to state 1039 state 819 871 open_options: open_options open_mode open_varlist . 878 open_varlist: open_varlist . sep_opt name LISTSEP shift, and go to state 98 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) $default reduce using rule 871 (open_options) sep_opt go to state 820 state 820 878 open_varlist: open_varlist sep_opt . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1040 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 821 1302 label: LABELSTR in_of LABELSTR . $default reduce using rule 1302 (label) state 822 1306 label: NLITERAL in_of LABELSTR . $default reduce using rule 1306 (label) state 823 1305 label: NLITERAL in_of NLITERAL . $default reduce using rule 1305 (label) state 824 1151 perform_options: with_test_opt UNTIL @131 . condition @132 perform_statements $@133 END_PERFORM VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 1041 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 825 1155 perform_options: with_test_opt VARYING name . FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM FROM shift, and go to state 1042 state 826 1166 with_test_opt: with_opt TEST before_after . $default reduce using rule 1166 (with_test_opt) state 827 1147 perform_options: gname TIMES @129 . perform_statements $@130 END_PERFORM $default reduce using rule 1176 ($@141) perform_statements go to state 1043 $@141 go to state 450 state 828 1164 perform_thru_opt: THRU label . $default reduce using rule 1164 (perform_thru_opt) state 829 1158 perform_options: label perform_thru_opt with_test_opt . UNTIL @137 condition 1162 | label perform_thru_opt with_test_opt . VARYING name FROM gname by_opt gname UNTIL @138 condition @139 perform_after_opt UNTIL shift, and go to state 1044 VARYING shift, and go to state 1045 state 830 1159 perform_options: label perform_thru_opt gname . TIMES TIMES shift, and go to state 1046 state 831 907 read_into_opt: INTO . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1047 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 832 896 return_body: name record_opt read_into_opt . 897 | name record_opt read_into_opt . read_at_end_opt NOT shift, and go to state 1048 AT shift, and go to state 1049 END shift, and go to state 1050 NOT [reduce using rule 896 (return_body)] $default reduce using rule 896 (return_body) read_at_end_opt go to state 1051 on_end go to state 1052 state 833 943 rewrite_statement: REWRITE name write_from_opt $@102 . invalid_key_opt end_rewrite_opt NOT shift, and go to state 665 INVALID shift, and go to state 666 NOTEXCEP shift, and go to state 667 NOT [reduce using rule 1064 (invalid_key_opt)] NOTEXCEP [reduce using rule 1064 (invalid_key_opt)] $default reduce using rule 1064 (invalid_key_opt) invalid_key_opt go to state 1053 invalid_key_sentence go to state 669 not_invalid_key_sentence go to state 670 not_excep go to state 671 state 834 649 search_statement: SEARCH ALL search_all end_search_opt . $default reduce using rule 649 (search_statement) state 835 701 search_all: variable_indexed @79 . search_at_end $@80 search_all_when_list AT shift, and go to state 1054 END reduce using rule 1225 (at_opt) $default reduce using rule 706 (search_at_end) search_at_end go to state 1055 at_opt go to state 1056 state 836 702 search_varying_opt: VARYING . variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 1057 qualified_var go to state 80 unqualified_var go to state 81 state 837 698 search: variable_indexed @76 search_varying_opt . @77 search_at_end @78 search_when_list $default reduce using rule 696 (@77) @77 go to state 1058 state 838 1011 set_list: set_target TO address_of_opt . set_variable_or_nlit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NULL_TOK shift, and go to state 1059 OFF shift, and go to state 1060 ON shift, and go to state 1061 TRUE_TOK shift, and go to state 1062 set_variable_or_nlit go to state 1063 name_or_lit go to state 1064 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 839 1013 set_list: set_target DOWN BY . var_or_nliteral VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 var_or_nliteral go to state 1067 nliteral go to state 1068 signed_nliteral go to state 1069 variable go to state 1070 qualified_var go to state 80 unqualified_var go to state 81 state 840 1012 set_list: set_target UP BY . var_or_nliteral VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 var_or_nliteral go to state 1071 nliteral go to state 1068 signed_nliteral go to state 1069 variable go to state 1070 qualified_var go to state 80 unqualified_var go to state 81 state 841 1014 set_list: address_of_opt variable TO . address_of_opt set_variable ADDRESS shift, and go to state 464 $default reduce using rule 1024 (address_of_opt) address_of_opt go to state 1072 state 842 749 sort_variable_indexed: SORT variable_indexed sort_keys_idx $@92 . sort_duplicates_opt sort_collating_opt WITH shift, and go to state 358 DUPLICATES reduce using rule 1233 (with_opt) $default reduce using rule 760 (sort_duplicates_opt) sort_duplicates_opt go to state 1073 with_opt go to state 1074 state 843 753 sort_keys_idx: sort_keys_idx sort_key_idx . $default reduce using rule 753 (sort_keys_idx) state 844 755 sort_key_idx: on_opt DIRECTION . key_opt sort_keys_names_idx KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1075 state 845 747 sort_file: SORT name sort_keys $@89 . sort_duplicates_opt sort_collating_opt $@90 sort_input $@91 sort_output WITH shift, and go to state 358 DUPLICATES reduce using rule 1233 (with_opt) $default reduce using rule 760 (sort_duplicates_opt) sort_duplicates_opt go to state 1076 with_opt go to state 1074 state 846 1217 key_opt: KEY . $default reduce using rule 1217 (key_opt) state 847 1066 invalid_key_sentence: INVALID key_opt . @124 statement_list $default reduce using rule 1065 (@124) @124 go to state 1077 state 848 951 start_statement: START start_body invalid_key_opt $@104 . end_start_opt END_START shift, and go to state 1078 END_START [reduce using rule 954 (end_start_opt)] $default reduce using rule 954 (end_start_opt) end_start_opt go to state 1079 state 849 1063 invalid_key_opt: invalid_key_sentence not_invalid_key_sentence . $default reduce using rule 1063 (invalid_key_opt) state 850 1068 not_invalid_key_sentence: not_excep INVALID . key_opt @125 statement_list KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1080 state 851 953 start_body: name KEY is_opt . cond_op name CONDITIONAL shift, and go to state 591 NOT shift, and go to state 1081 cond_op go to state 1082 conditional go to state 1022 state 852 1027 string_statement: STRINGCMD string_from_list INTO name . string_with_pointer $@117 on_overflow_opt end_stringcmd_opt WITH shift, and go to state 358 POINTER reduce using rule 1233 (with_opt) $default reduce using rule 1072 (string_with_pointer) string_with_pointer go to state 1083 with_opt go to state 1084 state 853 1074 string_from_list: string_from_list sep_opt string_from . $default reduce using rule 1074 (string_from_list) state 854 1232 by_opt: BY . $default reduce using rule 1232 (by_opt) state 855 1077 string_from: gname DELIMITED by_opt . delimited_by error shift, and go to state 1085 VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SIZE shift, and go to state 1086 SPACES shift, and go to state 68 ZERO shift, and go to state 69 delimited_by go to state 1087 gname go to state 1088 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 856 804 subtract_body: CORRESPONDING var_list_gname FROM . var_list_name rounded_opt on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 var_list_name go to state 1089 name go to state 410 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 857 802 subtract_body: var_list_gname FROM var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1090 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 858 803 subtract_body: var_list_gname FROM gname . GIVING var_list_name on_size_error_opt GIVING shift, and go to state 1091 state 859 1030 unstring_delimited: DELIMITED by_opt . unstring_delimited_vars ALL shift, and go to state 1092 ALL [reduce using rule 1043 (all_opt)] $default reduce using rule 1043 (all_opt) unstring_delimited_vars go to state 1093 all_opt go to state 1094 state 860 1029 unstring_statement: UNSTRING name unstring_delimited INTO . unstring_destinations string_with_pointer unstring_tallying $@118 on_overflow_opt end_unstring_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 unstring_destinations go to state 1095 unstring_dest_var go to state 1096 name go to state 1097 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 861 647 if_statement: if_part ELSE @60 conditional_statement . $@61 end_if_opt $default reduce using rule 646 ($@61) $@61 go to state 1098 state 862 686 conditional_statement: $@74 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1099 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 863 688 conditional_statement: $@75 . NEXT SENTENCE NEXT shift, and go to state 1100 state 864 43 collating_sequence: collating_opt SEQUENCE is_opt . STRING STRING shift, and go to state 1101 state 865 89 alphabet_literal_item: without_all_literal THRU without_all_literal . $default reduce using rule 89 (alphabet_literal_item) state 866 91 alphabet_also_list: ALSO without_all_literal . $default reduce using rule 91 (alphabet_also_list) state 867 92 alphabet_also_list: alphabet_also_list ALSO . without_all_literal NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 without_all_literal go to state 1102 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 868 67 special_name_class_item: CLITERAL THRU CLITERAL . $default reduce using rule 67 (special_name_class_item) state 869 75 switch_on_opt: ON . status_opt is_opt STRING STATUS shift, and go to state 1103 $default reduce using rule 80 (status_opt) status_opt go to state 1104 state 870 74 switches_details: STRING is_opt STRING $@9 switch_on_opt . switch_off_opt OFF shift, and go to state 1105 $default reduce using rule 78 (switch_off_opt) switch_off_opt go to state 1106 state 871 114 select_clause: error . $default reduce using rule 114 (select_clause) state 872 108 select_clause: ACCESS . mode_opt is_opt access_options MODE shift, and go to state 1107 $default reduce using rule 136 (mode_opt) mode_opt go to state 1108 state 873 112 select_clause: ALTERNATE . RECORD key_opt is_opt STRING with_duplicates RECORD shift, and go to state 1109 state 874 107 select_clause: ASSIGN . to_opt assign_clause TO shift, and go to state 420 $default reduce using rule 1239 (to_opt) to_opt go to state 1110 state 875 115 file_opt: FILE_TOK . $default reduce using rule 115 (file_opt) state 876 117 organization_opt: ORGANIZATION . $default reduce using rule 117 (organization_opt) state 877 110 select_clause: RECORD . key_opt is_opt STRING KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1111 state 878 111 select_clause: RELATIVE . key_opt is_opt STRING KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1112 state 879 113 select_clause: RESERVE . NLITERAL areas_opt NLITERAL shift, and go to state 1113 state 880 103 file_select: SELECT optional_opt def_name $@10 select_clauses PERIOD_TOK . $default reduce using rule 103 (file_select) state 881 104 select_clauses: select_clauses select_clause . $default reduce using rule 104 (select_clauses) state 882 109 select_clause: file_opt . STATUS is_opt STRING STATUS shift, and go to state 1114 state 883 106 select_clause: organization_opt . is_opt organization_options IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1115 state 884 160 i_o_control_multiple_file: STRING . i_o_control_multiple_file_position_opt POSITION shift, and go to state 1116 $default reduce using rule 161 (i_o_control_multiple_file_position_opt) i_o_control_multiple_file_position_opt go to state 1117 state 885 157 i_o_control_multiple_file_tape_clause: MULTIPLE FILE_TOK tape_opt contains_opt i_o_control_multiple_file_list . 159 i_o_control_multiple_file_list: i_o_control_multiple_file_list . i_o_control_multiple_file STRING shift, and go to state 884 $default reduce using rule 157 (i_o_control_multiple_file_tape_clause) i_o_control_multiple_file go to state 1118 state 886 158 i_o_control_multiple_file_list: i_o_control_multiple_file . $default reduce using rule 158 (i_o_control_multiple_file_list) state 887 171 string_list: error . $default reduce using rule 171 (string_list) state 888 169 string_list: STRING . $default reduce using rule 169 (string_list) state 889 152 i_o_control_same_clause: SAME same_clause_options are_opta for_opt string_list . 170 string_list: string_list . STRING STRING shift, and go to state 1119 $default reduce using rule 152 (i_o_control_same_clause) state 890 499 file_description_clause_block: BLOCK . contains_opt integer to_integer_opt chars_or_recs_opt CONTAINS shift, and go to state 696 $default reduce using rule 545 (contains_opt) contains_opt go to state 1120 state 891 506 file_description_clause_code_set: CODE_SET . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1121 state 892 504 file_description_clause_data: DATA . record_is_are var_strings RECORD shift, and go to state 1122 RECORDS shift, and go to state 1123 record_is_are go to state 1124 state 893 502 file_description_clause_label: LABEL . record_is_are std_or_omitt RECORD shift, and go to state 1122 RECORDS shift, and go to state 1123 record_is_are go to state 1125 state 894 507 file_description_clause_linage: LINAGE . is_opt data_name lines_opt file_description_clause_linage_footing file_description_clause_linage_top file_description_clause_linage_bottom IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1126 state 895 500 file_description_clause_record: RECORD . contains_opt integer to_rec_varying character_opts 501 | RECORD . is_opt VARYING in_opt size_opt from_rec_varying to_rec_varying character_opts depend_rec_varying IS shift, and go to state 84 CONTAINS shift, and go to state 696 VARYING reduce using rule 132 (is_opt) $default reduce using rule 545 (contains_opt) is_opt go to state 1127 contains_opt go to state 1128 state 896 518 report_is_are: REPORT . is_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1129 state 897 519 report_is_are: REPORTS . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1131 state 898 503 file_description_clause_value: VALUE . OF FILE_ID is_opt filename OF shift, and go to state 1132 state 899 419 file_section: file_section FD $@38 STRING $@39 file_description_fd_clauses PERIOD_TOK . $@40 file_description $default reduce using rule 418 ($@40) $@40 go to state 1133 state 900 487 file_description_fd_clause: is_opt . EXTERNAL 488 | is_opt . GLOBAL EXTERNAL shift, and go to state 1134 GLOBAL shift, and go to state 1135 state 901 484 file_description_fd_clauses: file_description_fd_clauses file_description_fd_clause . $default reduce using rule 484 (file_description_fd_clauses) state 902 489 file_description_fd_clause: file_description_clause_block . $default reduce using rule 489 (file_description_fd_clause) state 903 490 file_description_fd_clause: file_description_clause_record . $default reduce using rule 490 (file_description_fd_clause) state 904 491 file_description_fd_clause: file_description_clause_label . $default reduce using rule 491 (file_description_fd_clause) state 905 492 file_description_fd_clause: file_description_clause_value . $default reduce using rule 492 (file_description_fd_clause) state 906 493 file_description_fd_clause: file_description_clause_data . $default reduce using rule 493 (file_description_fd_clause) state 907 494 file_description_fd_clause: file_description_clause_report . $default reduce using rule 494 (file_description_fd_clause) state 908 496 file_description_fd_clause: file_description_clause_code_set . $default reduce using rule 496 (file_description_fd_clause) state 909 495 file_description_fd_clause: file_description_clause_linage . $default reduce using rule 495 (file_description_fd_clause) state 910 505 file_description_clause_report: report_is_are . STRING STRING shift, and go to state 1136 state 911 423 file_section: file_section SD $@41 STRING $@42 file_description_sd_clauses PERIOD_TOK . $@43 file_description $default reduce using rule 422 ($@43) $@43 go to state 1137 state 912 486 file_description_sd_clauses: file_description_sd_clauses file_description_sd_clause . $default reduce using rule 486 (file_description_sd_clauses) state 913 497 file_description_sd_clause: file_description_clause_record . $default reduce using rule 497 (file_description_sd_clause) state 914 498 file_description_sd_clause: file_description_clause_data . $default reduce using rule 498 (file_description_sd_clause) state 915 446 data_clause: BLANK . when_opt ZERO WHEN shift, and go to state 1138 $default reduce using rule 543 (when_opt) when_opt go to state 1139 state 916 443 data_clause: JUSTIFIED . sync_options LEFT shift, and go to state 1140 RIGHT shift, and go to state 1141 $default reduce using rule 449 (sync_options) sync_options go to state 1142 state 917 455 array_options: OCCURS . integer times_opt $@47 indexed_by_opt 458 | OCCURS . integer TO integer times_opt DEPENDING $@48 on_opt gname $@49 indexed_by_opt NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1143 state 918 477 pictures: PICTURE . $@50 is_opt picture $default reduce using rule 476 ($@50) $@50 go to state 1144 state 919 434 redefines_clause: REDEFINES . $@45 redefines_var $default reduce using rule 433 ($@45) $@45 go to state 1145 state 920 448 data_clause: RENAMES . $@46 variable thru_gname_opt $default reduce using rule 447 ($@46) $@46 go to state 1146 state 921 407 sign_is_opt: SIGN . is_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1147 state 922 442 data_clause: SYNCHRONIZED . sync_options LEFT shift, and go to state 1140 RIGHT shift, and go to state 1141 $default reduce using rule 449 (sync_options) sync_options go to state 1148 state 923 540 usage_opt: USAGE . $default reduce using rule 540 (usage_opt) state 924 470 value_is_are: VALUE . is_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1149 state 925 471 value_is_are: VALUES . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1150 state 926 429 field_description: integer def_name_opt $@44 data_clauses PERIOD_TOK . $default reduce using rule 429 (field_description) state 927 408 sign_is_opt: is_opt . 444 data_clause: is_opt . EXTERNAL 445 | is_opt . GLOBAL EXTERNAL shift, and go to state 1151 GLOBAL shift, and go to state 1152 $default reduce using rule 408 (sign_is_opt) state 928 440 data_clause: sign_clause . $default reduce using rule 440 (data_clause) state 929 401 sign_clause: sign_is_opt . LEADING separate_opt 402 | sign_is_opt . TRAILING separate_opt LEADING shift, and go to state 1153 TRAILING shift, and go to state 1154 state 930 432 data_clauses: data_clauses redefines_clause . $default reduce using rule 432 (data_clauses) state 931 431 data_clauses: data_clauses data_clause . $default reduce using rule 431 (data_clauses) state 932 437 data_clause: array_options . $default reduce using rule 437 (data_clause) state 933 439 data_clause: usage_option . $default reduce using rule 439 (data_clause) state 934 441 data_clause: value_option . $default reduce using rule 441 (data_clause) state 935 469 value_option: value_is_are . value_list NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 value_list go to state 1155 value go to state 1156 gliteral go to state 1157 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 936 438 data_clause: pictures . $default reduce using rule 438 (data_clause) state 937 465 usage_option: usage_opt . is_opt usage IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1158 state 938 194 report_section: RD $@15 STRING $@16 . report_controls PERIOD_TOK $@17 report_description $default reduce using rule 195 (report_controls) report_controls go to state 1159 state 939 325 screen_item: integer def_name_opt . $@28 screen_clauses PERIOD_TOK $default reduce using rule 324 ($@28) $@28 go to state 1160 state 940 580 declaratives_decl: error $@57 PERIOD_TOK . $default reduce using rule 580 (declaratives_decl) state 941 571 declaratives_opt: DECLARATIVES PERIOD_TOK $@55 declaratives_procedure declaratives_division END DECLARATIVES PERIOD_TOK . $default reduce using rule 571 (declaratives_opt) state 942 578 declaratives_decl: $@56 statements PERIOD_TOK . $default reduce using rule 578 (declaratives_decl) state 943 587 use_phrase_exception_error: ERROR_TOK . $default reduce using rule 587 (use_phrase_exception_error) state 944 586 use_phrase_exception_error: EXCEPTION . $default reduce using rule 586 (use_phrase_exception_error) state 945 588 use_phrase_exception_error: STANDARD . EXCEPTION 589 | STANDARD . ERROR_TOK ERROR_TOK shift, and go to state 1161 EXCEPTION shift, and go to state 1162 state 946 584 use_phrase: USE AFTER use_phrase_exception_error . PROCEDURE on_opt use_phrase_option PERIOD_TOK PROCEDURE shift, and go to state 1163 state 947 900 read_body: name read_next_opt record_opt read_into_opt . with_lock_opt read_key_opt 901 | name read_next_opt record_opt read_into_opt . with_lock_opt read_key_opt read_at_end_opt 902 | name read_next_opt record_opt read_into_opt . with_lock_opt read_key_opt read_invalid_key_opt WITH shift, and go to state 358 IGNORE reduce using rule 1233 (with_opt) LOCK reduce using rule 1233 (with_opt) $default reduce using rule 893 (with_lock_opt) with_lock_opt go to state 1164 with_opt go to state 1165 state 948 934 write_statement: WRITE name write_from_opt write_options $@101 . invalid_key_opt end_write_opt NOT shift, and go to state 665 INVALID shift, and go to state 666 NOTEXCEP shift, and go to state 667 NOT [reduce using rule 1064 (invalid_key_opt)] NOTEXCEP [reduce using rule 1064 (invalid_key_opt)] $default reduce using rule 1064 (invalid_key_opt) invalid_key_opt go to state 1166 invalid_key_sentence go to state 669 not_invalid_key_sentence go to state 670 not_excep go to state 671 state 949 1219 advancing_opt: ADVANCING . $default reduce using rule 1219 (advancing_opt) state 950 938 write_options: before_after advancing_opt . gname line_lines_opt 939 | before_after advancing_opt . PAGE VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 PAGE shift, and go to state 1167 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1168 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 951 828 accept_hardware: ACCEPT name FROM CMD_LINE end_accept_opt . $default reduce using rule 828 (accept_hardware) state 952 830 accept_hardware: ACCEPT name FROM ENVIRONMENT_VARIABLE CLITERAL . end_accept_opt END_ACCEPT shift, and go to state 725 END_ACCEPT [reduce using rule 837 (end_accept_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 1169 state 953 826 accept_hardware: ACCEPT name FROM INKEY end_accept_opt . $default reduce using rule 826 (accept_hardware) state 954 829 accept_hardware: ACCEPT name FROM ESCKEY end_accept_opt . $default reduce using rule 829 (accept_hardware) state 955 831 accept_chronological: ACCEPT name FROM DATE_TIME end_accept_opt . $default reduce using rule 831 (accept_chronological) state 956 827 accept_hardware: ACCEPT name FROM INPUT STATUS . end_accept_opt END_ACCEPT shift, and go to state 725 END_ACCEPT [reduce using rule 837 (end_accept_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 1170 state 957 860 scr_line_position: AT NLITERAL . $default reduce using rule 860 (scr_line_position) state 958 861 scr_line_position: AT variable . $default reduce using rule 861 (scr_line_position) state 959 307 number_opt: NUMBER . $default reduce using rule 307 (number_opt) state 960 858 scr_position: COLUMN number_opt . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 1171 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 961 857 scr_line: LINE number_opt . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 1172 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 962 859 scr_position: POSITION expr . 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 859 (scr_position) state 963 385 screen_attribx: AUTO . $default reduce using rule 385 (screen_attribx) state 964 400 screen_attribx: BACKGROUNDCOLOR . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1173 state 965 375 screen_attribx: BLANK . SCREEN 376 | BLANK . LINE 393 | BLANK . when_opt ZERO LINE shift, and go to state 1174 SCREEN shift, and go to state 1175 WHEN shift, and go to state 1138 $default reduce using rule 543 (when_opt) when_opt go to state 1176 state 966 388 screen_attribx: BLINK . $default reduce using rule 388 (screen_attribx) state 967 377 screen_attribx: ERASE . EOL 378 | ERASE . EOS 379 | ERASE . EOL shift, and go to state 1177 EOS shift, and go to state 1178 $default reduce using rule 379 (screen_attribx) state 968 399 screen_attribx: FOREGROUNDCOLOR . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1179 state 969 382 screen_attribx: FULL . $default reduce using rule 382 (screen_attribx) state 970 392 screen_attribx: HIGHLIGHT . $default reduce using rule 392 (screen_attribx) state 971 386 screen_attribx: JUSTIFIED . RIGHT 387 | JUSTIFIED . LEFT LEFT shift, and go to state 1180 RIGHT shift, and go to state 1181 state 972 398 screen_attribx: LOWER . $default reduce using rule 398 (screen_attribx) state 973 391 screen_attribx: LOWLIGHT . $default reduce using rule 391 (screen_attribx) state 974 383 screen_attribx: REQUIRED . $default reduce using rule 383 (screen_attribx) state 975 389 screen_attribx: REVERSEVIDEO . $default reduce using rule 389 (screen_attribx) state 976 384 screen_attribx: SECURE . $default reduce using rule 384 (screen_attribx) state 977 390 screen_attribx: UNDERLINE . $default reduce using rule 390 (screen_attribx) state 978 397 screen_attribx: UPPER . $default reduce using rule 397 (screen_attribx) state 979 408 sign_is_opt: is_opt . $default reduce using rule 408 (sign_is_opt) state 980 864 accept_display_option: with_opt screen_attribx . $default reduce using rule 864 (accept_display_option) state 981 381 screen_attribx: sign_clause . $default reduce using rule 381 (screen_attribx) state 982 380 screen_attribx: with_opt . BELL 394 | with_opt . NOECHO 395 | with_opt . UPDATE 396 | with_opt . NO ADVANCING NO shift, and go to state 1182 BELL shift, and go to state 1183 NOECHO shift, and go to state 1184 UPDATE shift, and go to state 1185 state 983 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION . $@93 variable @94 statement_list $@95 end_accept_opt $default reduce using rule 833 ($@93) $@93 go to state 1186 state 984 795 add_body: CORRESPONDING var_list_gname TO var_list_name . rounded_opt on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 ROUNDED shift, and go to state 568 $default reduce using rule 995 (rounded_opt) rounded_opt go to state 1187 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 985 998 on_size_error_opt: NOT . on_opt SIZE on_size_error ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1188 state 986 793 add_body: var_list_gname TO var_list_name on_size_error_opt . $default reduce using rule 793 (add_body) state 987 999 on_size_error_opt: on_opt . SIZE on_size_error 1001 | on_opt . SIZE on_size_error NOT on_opt SIZE $@115 on_size_error SIZE shift, and go to state 1189 state 988 794 add_body: var_list_gname add_to_opt GIVING var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1190 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 989 967 call_statement: CALL $@105 call_convention_opt gname using_options . returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt GIVING shift, and go to state 1191 RETURNING shift, and go to state 1192 $default reduce using rule 1126 (returning_options) returning_options go to state 1193 state 990 1125 using_options: USING @127 . dummy @128 parm_list $default reduce using rule 1129 (dummy) dummy go to state 1194 state 991 981 chain_statement: CHAIN $@111 gname using_options @112 . @113 on_exception_or_overflow $@114 end_chain_opt $default reduce using rule 979 (@113) @113 go to state 1195 state 992 889 close_options: REEL for_opt REMOVAL . $default reduce using rule 889 (close_options) state 993 890 close_options: UNIT for_opt REMOVAL . $default reduce using rule 890 (close_options) state 994 886 close_options: with_opt NO REWIND . $default reduce using rule 886 (close_options) state 995 892 with_lock_opt: with_opt IGNORE LOCK . $default reduce using rule 892 (with_lock_opt) state 996 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1119 | '(' expr . ')' '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 ')' shift, and go to state 778 state 997 788 compute_body: var_list_name CONDITIONAL expr on_size_error_opt . $default reduce using rule 788 (compute_body) state 998 992 var_list_name: var_list_name name rounded_opt sep_opt . $default reduce using rule 992 (var_list_name) state 999 947 delete_statement: DELETE name record_opt $@103 invalid_key_opt . end_delete_opt END_DELETE shift, and go to state 1196 END_DELETE [reduce using rule 948 (end_delete_opt)] $default reduce using rule 948 (end_delete_opt) end_delete_opt go to state 1197 state 1000 842 display_line: DISPLAY display_varlist display_upon display_line_options end_display_opt . $default reduce using rule 842 (display_line) state 1001 850 display_line_options: display_line_options with_opt . NO ADVANCING 851 | display_line_options with_opt . ERASE 852 | display_line_options with_opt . ERASE EOS 853 | display_line_options with_opt . ERASE EOL 854 | display_line_options with_opt . ERASE SCREEN NO shift, and go to state 1198 ERASE shift, and go to state 1199 state 1002 815 divide_body: gname BY gname GIVING . var_list_name on_size_error_opt 816 | gname BY gname GIVING . name rounded_opt REMAINDER name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 var_list_name go to state 1200 name go to state 1201 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1003 819 divide_body: gname INTO var_list_name on_size_error_opt . $default reduce using rule 819 (divide_body) state 1004 817 divide_body: gname INTO gname GIVING . name rounded_opt REMAINDER name on_size_error_opt 818 | gname INTO gname GIVING . var_list_name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 var_list_name go to state 1202 name go to state 1203 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1005 658 selection_subject_set: selection_subject_set ALSO @65 . selection_subject VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FALSE_TOK shift, and go to state 769 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 TRUE_TOK shift, and go to state 770 ZERO shift, and go to state 69 '(' shift, and go to state 424 selection_subject go to state 1204 expr go to state 772 condition go to state 773 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1006 665 when_case_list: WHEN . @66 @67 when_case sentence_or_nothing $default reduce using rule 663 (@66) @66 go to state 1205 state 1007 652 evaluate_statement: EVALUATE @62 selection_subject_set $@63 when_case_list . end_evaluate_or_eos 669 when_case_list: when_case_list . WHEN @68 @69 when_case $@70 sentence_or_nothing END_EVALUATE shift, and go to state 1206 WHEN shift, and go to state 1207 PERIOD_TOK shift, and go to state 1208 end_evaluate_or_eos go to state 1209 state 1008 957 goto_statement: GO to_opt goto_label_list DEPENDING on_opt . variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 1210 qualified_var go to state 80 unqualified_var go to state 81 state 1009 961 goto_label_list: goto_label_list LISTSEP label . $default reduce using rule 961 (goto_label_list) state 1010 1283 cond_name: VARCOND '(' $@146 subscripts . ')' 1297 subscripts: subscripts . comma_opt subscript ')' shift, and go to state 1211 ',' shift, and go to state 190 $default reduce using rule 1212 (comma_opt) comma_opt go to state 191 state 1011 1200 extended_cond_op: IS NOT ext_cond . $default reduce using rule 1200 (extended_cond_op) state 1012 1201 extended_cond_op: IS ext_cond OR . ext_cond CONDITIONAL shift, and go to state 591 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 sign_condition go to state 606 class_condition go to state 607 ext_cond go to state 1212 conditional go to state 610 state 1013 1203 extended_cond_op: NOT is_opt ext_cond . $default reduce using rule 1203 (extended_cond_op) state 1014 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1121 expr_opt: expr . '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 1121 (expr_opt) state 1015 1181 condition: expr extended_cond_op $@142 expr_opt . $default reduce using rule 1181 (condition) state 1016 1204 extended_cond_op: ext_cond OR ext_cond . $default reduce using rule 1204 (extended_cond_op) state 1017 1182 condition: NOT . condition 1209 cond_op: NOT . conditional VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 CONDITIONAL shift, and go to state 591 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 588 conditional go to state 1213 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1018 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1181 condition: expr . extended_cond_op $@142 expr_opt 1191 implied_op_condition: expr . CONDITIONAL shift, and go to state 591 IS shift, and go to state 592 '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 NOT shift, and go to state 598 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 NOT [reduce using rule 1191 (implied_op_condition)] $default reduce using rule 1191 (implied_op_condition) sign_condition go to state 606 class_condition go to state 607 extended_cond_op go to state 608 ext_cond go to state 609 conditional go to state 610 state 1019 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition 1189 implied_op_condition: condition . OR shift, and go to state 611 AND shift, and go to state 612 OR [reduce using rule 1189 (implied_op_condition)] AND [reduce using rule 1189 (implied_op_condition)] $default reduce using rule 1189 (implied_op_condition) state 1020 1186 condition: condition OR @144 implied_op_condition . $default reduce using rule 1186 (condition) state 1021 1190 implied_op_condition: cond_op . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 1214 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1022 1208 cond_op: conditional . 1210 | conditional . OR conditional OR shift, and go to state 1215 $default reduce using rule 1208 (cond_op) state 1023 1184 condition: condition AND @143 implied_op_condition . $default reduce using rule 1184 (condition) state 1024 684 if_part: IF condition @73 end_then_opt conditional_statement . $default reduce using rule 684 (if_part) state 1025 779 initialize_replacing_lists: initialize_replacing_lists initialize_replacing_list . $default reduce using rule 779 (initialize_replacing_lists) state 1026 552 data_opt: DATA . $default reduce using rule 552 (data_opt) state 1027 780 initialize_replacing_list: initialize_type_list data_opt . BY gname BY shift, and go to state 1216 state 1028 1088 converting_clause: CONVERTING noallname TO . noallname inspect_before_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 1217 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1029 1091 tallying_list: tallying_list name . FOR tallying_for_list FOR shift, and go to state 1218 state 1030 1097 replacing_clause: REPLACING . replacing_list $default reduce using rule 1101 (replacing_list) replacing_list go to state 1219 state 1031 1086 inspect_statement: INSPECT name tallying_clause $@126 replacing_clause . $default reduce using rule 1086 (inspect_statement) state 1032 763 sort_collating_opt: collating_sequence . $default reduce using rule 763 (sort_collating_opt) state 1033 740 merge_statement: MERGE name sort_keys $@86 sort_collating_opt . $@87 merge_using $@88 sort_output $default reduce using rule 738 ($@87) $@87 go to state 1220 state 1034 754 sort_key: on_opt DIRECTION key_opt . sort_keys_names VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 sort_keys_names go to state 1221 name go to state 1222 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1035 771 move_statement: MOVE CORRESPONDING name_var TO name_var . $default reduce using rule 771 (move_statement) state 1036 772 move_statement: MOVE LENGTH OF gname TO . name_var VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 624 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 name_var go to state 1223 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1037 1242 name_var_list: name_var_list sep_opt . name_var VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 624 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 name_var go to state 1224 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1038 810 multiply_body: gname BY var_list_name on_size_error_opt . $default reduce using rule 810 (multiply_body) state 1039 809 multiply_body: gname BY gname GIVING . var_list_name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 var_list_name go to state 1225 name go to state 410 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1040 878 open_varlist: open_varlist sep_opt name . $default reduce using rule 878 (open_varlist) state 1041 1151 perform_options: with_test_opt UNTIL @131 condition . @132 perform_statements $@133 END_PERFORM 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition OR shift, and go to state 611 AND shift, and go to state 612 $default reduce using rule 1149 (@132) @132 go to state 1226 state 1042 1155 perform_options: with_test_opt VARYING name FROM . gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1227 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1043 1147 perform_options: gname TIMES @129 perform_statements . $@130 END_PERFORM $default reduce using rule 1146 ($@130) $@130 go to state 1228 state 1044 1158 perform_options: label perform_thru_opt with_test_opt UNTIL . @137 condition $default reduce using rule 1157 (@137) @137 go to state 1229 state 1045 1162 perform_options: label perform_thru_opt with_test_opt VARYING . name FROM gname by_opt gname UNTIL @138 condition @139 perform_after_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1230 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1046 1159 perform_options: label perform_thru_opt gname TIMES . $default reduce using rule 1159 (perform_options) state 1047 907 read_into_opt: INTO name . $default reduce using rule 907 (read_into_opt) state 1048 910 read_at_end_opt: NOT . at_opt on_end AT shift, and go to state 1054 $default reduce using rule 1225 (at_opt) at_opt go to state 1231 state 1049 911 read_at_end_opt: AT . on_end 914 | AT . on_end NOT at_opt $@96 on_end END shift, and go to state 1050 on_end go to state 1232 state 1050 918 on_end: END . @98 statement_list $default reduce using rule 917 (@98) @98 go to state 1233 state 1051 897 return_body: name record_opt read_into_opt read_at_end_opt . $default reduce using rule 897 (return_body) state 1052 912 read_at_end_opt: on_end . 916 | on_end . NOT at_opt $@97 on_end NOT shift, and go to state 1234 NOT [reduce using rule 912 (read_at_end_opt)] $default reduce using rule 912 (read_at_end_opt) state 1053 943 rewrite_statement: REWRITE name write_from_opt $@102 invalid_key_opt . end_rewrite_opt END_REWRITE shift, and go to state 1235 END_REWRITE [reduce using rule 944 (end_rewrite_opt)] $default reduce using rule 944 (end_rewrite_opt) end_rewrite_opt go to state 1236 state 1054 1226 at_opt: AT . $default reduce using rule 1226 (at_opt) state 1055 701 search_all: variable_indexed @79 search_at_end . $@80 search_all_when_list $default reduce using rule 700 ($@80) $@80 go to state 1237 state 1056 705 search_at_end: at_opt . END @81 statement_list END shift, and go to state 1238 state 1057 702 search_varying_opt: VARYING variable . $default reduce using rule 702 (search_varying_opt) state 1058 698 search: variable_indexed @76 search_varying_opt @77 . search_at_end @78 search_when_list AT shift, and go to state 1054 END reduce using rule 1225 (at_opt) $default reduce using rule 706 (search_at_end) search_at_end go to state 1239 at_opt go to state 1056 state 1059 1022 set_variable_or_nlit: NULL_TOK . $default reduce using rule 1022 (set_variable_or_nlit) state 1060 1021 set_variable_or_nlit: OFF . $default reduce using rule 1021 (set_variable_or_nlit) state 1061 1020 set_variable_or_nlit: ON . $default reduce using rule 1020 (set_variable_or_nlit) state 1062 1023 set_variable_or_nlit: TRUE_TOK . $default reduce using rule 1023 (set_variable_or_nlit) state 1063 1011 set_list: set_target TO address_of_opt set_variable_or_nlit . $default reduce using rule 1011 (set_list) state 1064 1019 set_variable_or_nlit: name_or_lit . $default reduce using rule 1019 (set_variable_or_nlit) state 1065 1251 name_or_lit: literal . $default reduce using rule 1251 (name_or_lit) state 1066 1250 name_or_lit: name . $default reduce using rule 1250 (name_or_lit) state 1067 1013 set_list: set_target DOWN BY var_or_nliteral . $default reduce using rule 1013 (set_list) state 1068 1266 var_or_nliteral: nliteral . $default reduce using rule 1266 (var_or_nliteral) state 1069 1267 nliteral: signed_nliteral . $default reduce using rule 1267 (nliteral) state 1070 1265 var_or_nliteral: variable . $default reduce using rule 1265 (var_or_nliteral) state 1071 1012 set_list: set_target UP BY var_or_nliteral . $default reduce using rule 1012 (set_list) state 1072 1014 set_list: address_of_opt variable TO address_of_opt . set_variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 NULL_TOK shift, and go to state 1240 set_variable go to state 1241 variable go to state 1242 qualified_var go to state 80 unqualified_var go to state 81 state 1073 749 sort_variable_indexed: SORT variable_indexed sort_keys_idx $@92 sort_duplicates_opt . sort_collating_opt COLLATING shift, and go to state 496 SEQUENCE reduce using rule 45 (collating_opt) $default reduce using rule 762 (sort_collating_opt) collating_sequence go to state 1032 collating_opt go to state 498 sort_collating_opt go to state 1243 state 1074 761 sort_duplicates_opt: with_opt . DUPLICATES in_opt order_opt DUPLICATES shift, and go to state 1244 state 1075 755 sort_key_idx: on_opt DIRECTION key_opt . sort_keys_names_idx SUBSCVAR shift, and go to state 459 sort_keys_names_idx go to state 1245 variable_indexed go to state 1246 state 1076 747 sort_file: SORT name sort_keys $@89 sort_duplicates_opt . sort_collating_opt $@90 sort_input $@91 sort_output COLLATING shift, and go to state 496 SEQUENCE reduce using rule 45 (collating_opt) $default reduce using rule 762 (sort_collating_opt) collating_sequence go to state 1032 collating_opt go to state 498 sort_collating_opt go to state 1247 state 1077 1066 invalid_key_sentence: INVALID key_opt @124 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1248 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1078 955 end_start_opt: END_START . $default reduce using rule 955 (end_start_opt) state 1079 951 start_statement: START start_body invalid_key_opt $@104 end_start_opt . $default reduce using rule 951 (start_statement) state 1080 1068 not_invalid_key_sentence: not_excep INVALID key_opt . @125 statement_list $default reduce using rule 1067 (@125) @125 go to state 1249 state 1081 1209 cond_op: NOT . conditional CONDITIONAL shift, and go to state 591 conditional go to state 1213 state 1082 953 start_body: name KEY is_opt cond_op . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1250 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1083 1027 string_statement: STRINGCMD string_from_list INTO name string_with_pointer . $@117 on_overflow_opt end_stringcmd_opt $default reduce using rule 1026 ($@117) $@117 go to state 1251 state 1084 1071 string_with_pointer: with_opt . POINTER name POINTER shift, and go to state 1252 state 1085 1080 delimited_by: error . $default reduce using rule 1080 (delimited_by) state 1086 1079 delimited_by: SIZE . $default reduce using rule 1079 (delimited_by) state 1087 1077 string_from: gname DELIMITED by_opt delimited_by . $default reduce using rule 1077 (string_from) state 1088 1078 delimited_by: gname . $default reduce using rule 1078 (delimited_by) state 1089 804 subtract_body: CORRESPONDING var_list_gname FROM var_list_name . rounded_opt on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 ROUNDED shift, and go to state 568 $default reduce using rule 995 (rounded_opt) rounded_opt go to state 1253 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1090 802 subtract_body: var_list_gname FROM var_list_name on_size_error_opt . $default reduce using rule 802 (subtract_body) state 1091 803 subtract_body: var_list_gname FROM gname GIVING . var_list_name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 var_list_name go to state 1254 name go to state 410 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1092 1044 all_opt: ALL . $default reduce using rule 1044 (all_opt) state 1093 1030 unstring_delimited: DELIMITED by_opt unstring_delimited_vars . 1033 unstring_delimited_vars: unstring_delimited_vars . OR all_opt gname OR shift, and go to state 1255 $default reduce using rule 1030 (unstring_delimited) state 1094 1032 unstring_delimited_vars: all_opt . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1256 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1095 1029 unstring_statement: UNSTRING name unstring_delimited INTO unstring_destinations . string_with_pointer unstring_tallying $@118 on_overflow_opt end_unstring_opt 1035 unstring_destinations: unstring_destinations . sep_opt unstring_dest_var LISTSEP shift, and go to state 98 WITH shift, and go to state 358 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) POINTER reduce using rule 1233 (with_opt) $default reduce using rule 1072 (string_with_pointer) string_with_pointer go to state 1257 sep_opt go to state 1258 with_opt go to state 1084 state 1096 1034 unstring_destinations: unstring_dest_var . $default reduce using rule 1034 (unstring_destinations) state 1097 1036 unstring_dest_var: name . unstring_delim_opt unstring_count_opt DELIMITER shift, and go to state 1259 $default reduce using rule 1037 (unstring_delim_opt) unstring_delim_opt go to state 1260 state 1098 647 if_statement: if_part ELSE @60 conditional_statement $@61 . end_if_opt END_IF shift, and go to state 684 END_IF [reduce using rule 691 (end_if_opt)] $default reduce using rule 691 (end_if_opt) end_if_opt go to state 1261 state 1099 686 conditional_statement: $@74 statement_list . $default reduce using rule 686 (conditional_statement) state 1100 688 conditional_statement: $@75 NEXT . SENTENCE SENTENCE shift, and go to state 1262 state 1101 43 collating_sequence: collating_opt SEQUENCE is_opt STRING . $default reduce using rule 43 (collating_sequence) state 1102 92 alphabet_also_list: alphabet_also_list ALSO without_all_literal . $default reduce using rule 92 (alphabet_also_list) state 1103 79 status_opt: STATUS . $default reduce using rule 79 (status_opt) state 1104 75 switch_on_opt: ON status_opt . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1263 state 1105 77 switch_off_opt: OFF . status_opt is_opt STRING STATUS shift, and go to state 1103 $default reduce using rule 80 (status_opt) status_opt go to state 1264 state 1106 74 switches_details: STRING is_opt STRING $@9 switch_on_opt switch_off_opt . $default reduce using rule 74 (switches_details) state 1107 135 mode_opt: MODE . $default reduce using rule 135 (mode_opt) state 1108 108 select_clause: ACCESS mode_opt . is_opt access_options IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1265 state 1109 112 select_clause: ALTERNATE RECORD . key_opt is_opt STRING with_duplicates KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1266 state 1110 107 select_clause: ASSIGN to_opt . assign_clause error shift, and go to state 1267 STRING shift, and go to state 1268 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 PORTNUM shift, and go to state 1269 '+' shift, and go to state 61 '-' shift, and go to state 62 EXTERNAL shift, and go to state 1270 assign_clause go to state 1271 literal go to state 1272 signed_nliteral go to state 77 filename go to state 1273 state 1111 110 select_clause: RECORD key_opt . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1274 state 1112 111 select_clause: RELATIVE key_opt . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1275 state 1113 113 select_clause: RESERVE NLITERAL . areas_opt AREA shift, and go to state 1276 AREAS shift, and go to state 1277 $default reduce using rule 130 (areas_opt) areas_opt go to state 1278 state 1114 109 select_clause: file_opt STATUS . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1279 state 1115 106 select_clause: organization_opt is_opt . organization_options STRING shift, and go to state 1280 LABELSTR shift, and go to state 1281 INDEXED shift, and go to state 1282 LINE shift, and go to state 1283 RELATIVE shift, and go to state 1284 SEQUENTIAL shift, and go to state 1285 organization_options go to state 1286 anystring go to state 1287 state 1116 162 i_o_control_multiple_file_position_opt: POSITION . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1288 state 1117 160 i_o_control_multiple_file: STRING i_o_control_multiple_file_position_opt . $default reduce using rule 160 (i_o_control_multiple_file) state 1118 159 i_o_control_multiple_file_list: i_o_control_multiple_file_list i_o_control_multiple_file . $default reduce using rule 159 (i_o_control_multiple_file_list) state 1119 170 string_list: string_list STRING . $default reduce using rule 170 (string_list) state 1120 499 file_description_clause_block: BLOCK contains_opt . integer to_integer_opt chars_or_recs_opt NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1289 state 1121 506 file_description_clause_code_set: CODE_SET is_opt . STRING STRING shift, and go to state 1290 state 1122 535 record_is_are: RECORD . is_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1291 state 1123 536 record_is_are: RECORDS . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1292 state 1124 504 file_description_clause_data: DATA record_is_are . var_strings STRING shift, and go to state 1293 var_strings go to state 1294 state 1125 502 file_description_clause_label: LABEL record_is_are . std_or_omitt OMITTED shift, and go to state 1295 STANDARD shift, and go to state 1296 std_or_omitt go to state 1297 state 1126 507 file_description_clause_linage: LINAGE is_opt . data_name lines_opt file_description_clause_linage_footing file_description_clause_linage_top file_description_clause_linage_bottom STRING shift, and go to state 1298 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1299 signed_nliteral go to state 77 data_name go to state 1300 state 1127 501 file_description_clause_record: RECORD is_opt . VARYING in_opt size_opt from_rec_varying to_rec_varying character_opts depend_rec_varying VARYING shift, and go to state 1301 state 1128 500 file_description_clause_record: RECORD contains_opt . integer to_rec_varying character_opts NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1302 state 1129 518 report_is_are: REPORT is_opt . $default reduce using rule 518 (report_is_are) state 1130 133 are_opt: ARE . $default reduce using rule 133 (are_opt) state 1131 519 report_is_are: REPORTS are_opt . $default reduce using rule 519 (report_is_are) state 1132 503 file_description_clause_value: VALUE OF . FILE_ID is_opt filename FILE_ID shift, and go to state 1303 state 1133 419 file_section: file_section FD $@38 STRING $@39 file_description_fd_clauses PERIOD_TOK $@40 . file_description NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 file_description go to state 1304 field_description go to state 1305 signed_nliteral go to state 234 integer go to state 235 state 1134 487 file_description_fd_clause: is_opt EXTERNAL . $default reduce using rule 487 (file_description_fd_clause) state 1135 488 file_description_fd_clause: is_opt GLOBAL . $default reduce using rule 488 (file_description_fd_clause) state 1136 505 file_description_clause_report: report_is_are STRING . $default reduce using rule 505 (file_description_clause_report) state 1137 423 file_section: file_section SD $@41 STRING $@42 file_description_sd_clauses PERIOD_TOK $@43 . file_description NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 file_description go to state 1306 field_description go to state 1305 signed_nliteral go to state 234 integer go to state 235 state 1138 544 when_opt: WHEN . $default reduce using rule 544 (when_opt) state 1139 446 data_clause: BLANK when_opt . ZERO ZERO shift, and go to state 1307 state 1140 450 sync_options: LEFT . $default reduce using rule 450 (sync_options) state 1141 451 sync_options: RIGHT . $default reduce using rule 451 (sync_options) state 1142 443 data_clause: JUSTIFIED sync_options . $default reduce using rule 443 (data_clause) state 1143 455 array_options: OCCURS integer . times_opt $@47 indexed_by_opt 458 | OCCURS integer . TO integer times_opt DEPENDING $@48 on_opt gname $@49 indexed_by_opt TO shift, and go to state 1308 TIMES shift, and go to state 1309 $default reduce using rule 541 (times_opt) times_opt go to state 1310 state 1144 477 pictures: PICTURE $@50 . is_opt picture IS shift, and go to state 84 IS [reduce using rule 132 (is_opt)] $default reduce using rule 132 (is_opt) is_opt go to state 1311 state 1145 434 redefines_clause: REDEFINES $@45 . redefines_var VARIABLE shift, and go to state 1312 SUBSCVAR shift, and go to state 1313 redefines_var go to state 1314 state 1146 448 data_clause: RENAMES $@46 . variable thru_gname_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 1315 qualified_var go to state 80 unqualified_var go to state 81 state 1147 407 sign_is_opt: SIGN is_opt . $default reduce using rule 407 (sign_is_opt) state 1148 442 data_clause: SYNCHRONIZED sync_options . $default reduce using rule 442 (data_clause) state 1149 470 value_is_are: VALUE is_opt . $default reduce using rule 470 (value_is_are) state 1150 471 value_is_are: VALUES are_opt . $default reduce using rule 471 (value_is_are) state 1151 444 data_clause: is_opt EXTERNAL . $default reduce using rule 444 (data_clause) state 1152 445 data_clause: is_opt GLOBAL . $default reduce using rule 445 (data_clause) state 1153 401 sign_clause: sign_is_opt LEADING . separate_opt SEPARATE shift, and go to state 1316 $default reduce using rule 404 (separate_opt) separate_opt go to state 1317 state 1154 402 sign_clause: sign_is_opt TRAILING . separate_opt SEPARATE shift, and go to state 1316 $default reduce using rule 404 (separate_opt) separate_opt go to state 1318 state 1155 469 value_option: value_is_are value_list . 473 value_list: value_list . comma_opt value ',' shift, and go to state 190 NLITERAL reduce using rule 1212 (comma_opt) CLITERAL reduce using rule 1212 (comma_opt) '+' reduce using rule 1212 (comma_opt) '-' reduce using rule 1212 (comma_opt) ALL reduce using rule 1212 (comma_opt) HIGHVALUES reduce using rule 1212 (comma_opt) LOWVALUES reduce using rule 1212 (comma_opt) QUOTES reduce using rule 1212 (comma_opt) SPACES reduce using rule 1212 (comma_opt) ZERO reduce using rule 1212 (comma_opt) $default reduce using rule 469 (value_option) comma_opt go to state 1319 state 1156 472 value_list: value . $default reduce using rule 472 (value_list) state 1157 474 value: gliteral . 475 | gliteral . THRU gliteral THRU shift, and go to state 1320 $default reduce using rule 474 (value) state 1158 465 usage_option: usage_opt is_opt . usage USAGENUM shift, and go to state 1321 DISPLAY shift, and go to state 1322 POINTER shift, and go to state 1323 usage go to state 1324 state 1159 194 report_section: RD $@15 STRING $@16 report_controls . PERIOD_TOK $@17 report_description 196 report_controls: report_controls . report_control IS shift, and go to state 84 CODE shift, and go to state 1325 CONTROL shift, and go to state 1326 CONTROLS shift, and go to state 1327 PAGE shift, and go to state 1328 PERIOD_TOK shift, and go to state 1329 $default reduce using rule 132 (is_opt) is_opt go to state 1330 report_control go to state 1331 report_controls_control go to state 1332 report_controls_page go to state 1333 control_is_are go to state 1334 state 1160 325 screen_item: integer def_name_opt $@28 . screen_clauses PERIOD_TOK $default reduce using rule 342 (screen_clauses) screen_clauses go to state 1335 state 1161 589 use_phrase_exception_error: STANDARD ERROR_TOK . $default reduce using rule 589 (use_phrase_exception_error) state 1162 588 use_phrase_exception_error: STANDARD EXCEPTION . $default reduce using rule 588 (use_phrase_exception_error) state 1163 584 use_phrase: USE AFTER use_phrase_exception_error PROCEDURE . on_opt use_phrase_option PERIOD_TOK ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1336 state 1164 900 read_body: name read_next_opt record_opt read_into_opt with_lock_opt . read_key_opt 901 | name read_next_opt record_opt read_into_opt with_lock_opt . read_key_opt read_at_end_opt 902 | name read_next_opt record_opt read_into_opt with_lock_opt . read_key_opt read_invalid_key_opt KEY shift, and go to state 1337 $default reduce using rule 908 (read_key_opt) read_key_opt go to state 1338 state 1165 891 with_lock_opt: with_opt . LOCK 892 | with_opt . IGNORE LOCK IGNORE shift, and go to state 750 LOCK shift, and go to state 751 state 1166 934 write_statement: WRITE name write_from_opt write_options $@101 invalid_key_opt . end_write_opt END_WRITE shift, and go to state 1339 END_WRITE [reduce using rule 940 (end_write_opt)] $default reduce using rule 940 (end_write_opt) end_write_opt go to state 1340 state 1167 939 write_options: before_after advancing_opt PAGE . $default reduce using rule 939 (write_options) state 1168 938 write_options: before_after advancing_opt gname . line_lines_opt LINE shift, and go to state 1341 LINES shift, and go to state 1342 $default reduce using rule 207 (lines_opt) line_lines_opt go to state 1343 lines_opt go to state 1344 state 1169 830 accept_hardware: ACCEPT name FROM ENVIRONMENT_VARIABLE CLITERAL end_accept_opt . $default reduce using rule 830 (accept_hardware) state 1170 827 accept_hardware: ACCEPT name FROM INPUT STATUS end_accept_opt . $default reduce using rule 827 (accept_hardware) state 1171 858 scr_position: COLUMN number_opt expr . 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 858 (scr_position) state 1172 857 scr_line: LINE number_opt expr . 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 857 (scr_line) state 1173 400 screen_attribx: BACKGROUNDCOLOR integer . $default reduce using rule 400 (screen_attribx) state 1174 376 screen_attribx: BLANK LINE . $default reduce using rule 376 (screen_attribx) state 1175 375 screen_attribx: BLANK SCREEN . $default reduce using rule 375 (screen_attribx) state 1176 393 screen_attribx: BLANK when_opt . ZERO ZERO shift, and go to state 1345 state 1177 377 screen_attribx: ERASE EOL . $default reduce using rule 377 (screen_attribx) state 1178 378 screen_attribx: ERASE EOS . $default reduce using rule 378 (screen_attribx) state 1179 399 screen_attribx: FOREGROUNDCOLOR integer . $default reduce using rule 399 (screen_attribx) state 1180 387 screen_attribx: JUSTIFIED LEFT . $default reduce using rule 387 (screen_attribx) state 1181 386 screen_attribx: JUSTIFIED RIGHT . $default reduce using rule 386 (screen_attribx) state 1182 396 screen_attribx: with_opt NO . ADVANCING ADVANCING shift, and go to state 1346 state 1183 380 screen_attribx: with_opt BELL . $default reduce using rule 380 (screen_attribx) state 1184 394 screen_attribx: with_opt NOECHO . $default reduce using rule 394 (screen_attribx) state 1185 395 screen_attribx: with_opt UPDATE . $default reduce using rule 395 (screen_attribx) state 1186 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION $@93 . variable @94 statement_list $@95 end_accept_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 1347 qualified_var go to state 80 unqualified_var go to state 81 state 1187 795 add_body: CORRESPONDING var_list_gname TO var_list_name rounded_opt . on_size_error_opt NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1348 on_opt go to state 987 state 1188 998 on_size_error_opt: NOT on_opt . SIZE on_size_error SIZE shift, and go to state 1349 state 1189 999 on_size_error_opt: on_opt SIZE . on_size_error 1001 | on_opt SIZE . on_size_error NOT on_opt SIZE $@115 on_size_error ERROR_TOK shift, and go to state 1350 on_size_error go to state 1351 state 1190 794 add_body: var_list_gname add_to_opt GIVING var_list_name on_size_error_opt . $default reduce using rule 794 (add_body) state 1191 1128 returning_options: GIVING . variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 1352 qualified_var go to state 80 unqualified_var go to state 81 state 1192 1127 returning_options: RETURNING . variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 1353 qualified_var go to state 80 unqualified_var go to state 81 state 1193 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options . @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt $default reduce using rule 963 (@106) @106 go to state 1354 state 1194 1125 using_options: USING @127 dummy . @128 parm_list $default reduce using rule 1124 (@128) @128 go to state 1355 state 1195 981 chain_statement: CHAIN $@111 gname using_options @112 @113 . on_exception_or_overflow $@114 end_chain_opt ON shift, and go to state 620 EXCEPTION reduce using rule 1235 (on_opt) OVERFLOW_TOK reduce using rule 1235 (on_opt) $default reduce using rule 1049 (on_exception_or_overflow) on_exception_or_overflow go to state 1356 on_opt go to state 1357 state 1196 949 end_delete_opt: END_DELETE . $default reduce using rule 949 (end_delete_opt) state 1197 947 delete_statement: DELETE name record_opt $@103 invalid_key_opt end_delete_opt . $default reduce using rule 947 (delete_statement) state 1198 850 display_line_options: display_line_options with_opt NO . ADVANCING ADVANCING shift, and go to state 1358 state 1199 851 display_line_options: display_line_options with_opt ERASE . 852 | display_line_options with_opt ERASE . EOS 853 | display_line_options with_opt ERASE . EOL 854 | display_line_options with_opt ERASE . SCREEN EOL shift, and go to state 1359 EOS shift, and go to state 1360 SCREEN shift, and go to state 1361 $default reduce using rule 851 (display_line_options) state 1200 815 divide_body: gname BY gname GIVING var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1362 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1201 816 divide_body: gname BY gname GIVING name . rounded_opt REMAINDER name on_size_error_opt 991 var_list_name: name . rounded_opt sep_opt ROUNDED shift, and go to state 568 $default reduce using rule 995 (rounded_opt) rounded_opt go to state 1363 state 1202 818 divide_body: gname INTO gname GIVING var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1364 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1203 817 divide_body: gname INTO gname GIVING name . rounded_opt REMAINDER name on_size_error_opt 991 var_list_name: name . rounded_opt sep_opt ROUNDED shift, and go to state 568 $default reduce using rule 995 (rounded_opt) rounded_opt go to state 1365 state 1204 658 selection_subject_set: selection_subject_set ALSO @65 selection_subject . $default reduce using rule 658 (selection_subject_set) state 1205 665 when_case_list: WHEN @66 . @67 when_case sentence_or_nothing $default reduce using rule 664 (@67) @67 go to state 1366 state 1206 653 end_evaluate_or_eos: END_EVALUATE . $default reduce using rule 653 (end_evaluate_or_eos) state 1207 669 when_case_list: when_case_list WHEN . @68 @69 when_case $@70 sentence_or_nothing $default reduce using rule 666 (@68) @68 go to state 1367 state 1208 654 end_evaluate_or_eos: PERIOD_TOK . $default reduce using rule 654 (end_evaluate_or_eos) state 1209 652 evaluate_statement: EVALUATE @62 selection_subject_set $@63 when_case_list end_evaluate_or_eos . $default reduce using rule 652 (evaluate_statement) state 1210 957 goto_statement: GO to_opt goto_label_list DEPENDING on_opt variable . $default reduce using rule 957 (goto_statement) state 1211 1283 cond_name: VARCOND '(' $@146 subscripts ')' . $default reduce using rule 1283 (cond_name) state 1212 1201 extended_cond_op: IS ext_cond OR ext_cond . $default reduce using rule 1201 (extended_cond_op) state 1213 1209 cond_op: NOT conditional . $default reduce using rule 1209 (cond_op) state 1214 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr 1190 implied_op_condition: cond_op expr . '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 1190 (implied_op_condition) state 1215 1210 cond_op: conditional OR . conditional CONDITIONAL shift, and go to state 591 conditional go to state 1368 state 1216 780 initialize_replacing_list: initialize_type_list data_opt BY . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1369 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1217 1088 converting_clause: CONVERTING noallname TO noallname . inspect_before_after $default reduce using rule 1110 (inspect_before_after) inspect_before_after go to state 1370 state 1218 1091 tallying_list: tallying_list name FOR . tallying_for_list $default reduce using rule 1096 (tallying_for_list) tallying_for_list go to state 1371 state 1219 1097 replacing_clause: REPLACING replacing_list . 1099 replacing_list: replacing_list . CHARACTERS BY noallname inspect_before_after 1100 | replacing_list . replacing_kind replacing_by_list ALL shift, and go to state 1372 CHARACTERS shift, and go to state 1373 FIRST shift, and go to state 1374 LEADING shift, and go to state 1375 TRAILING shift, and go to state 1376 $default reduce using rule 1097 (replacing_clause) replacing_kind go to state 1377 state 1220 740 merge_statement: MERGE name sort_keys $@86 sort_collating_opt $@87 . merge_using $@88 sort_output USING shift, and go to state 1378 merge_using go to state 1379 state 1221 754 sort_key: on_opt DIRECTION key_opt sort_keys_names . 757 sort_keys_names: sort_keys_names . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 754 (sort_key) name go to state 1380 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1222 756 sort_keys_names: name . $default reduce using rule 756 (sort_keys_names) state 1223 772 move_statement: MOVE LENGTH OF gname TO name_var . $default reduce using rule 772 (move_statement) state 1224 1242 name_var_list: name_var_list sep_opt name_var . $default reduce using rule 1242 (name_var_list) state 1225 809 multiply_body: gname BY gname GIVING var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1381 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1226 1151 perform_options: with_test_opt UNTIL @131 condition @132 . perform_statements $@133 END_PERFORM $default reduce using rule 1176 ($@141) perform_statements go to state 1382 $@141 go to state 450 state 1227 1155 perform_options: with_test_opt VARYING name FROM gname . by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM BY shift, and go to state 854 $default reduce using rule 1231 (by_opt) by_opt go to state 1383 state 1228 1147 perform_options: gname TIMES @129 perform_statements $@130 . END_PERFORM END_PERFORM shift, and go to state 1384 state 1229 1158 perform_options: label perform_thru_opt with_test_opt UNTIL @137 . condition VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 1385 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1230 1162 perform_options: label perform_thru_opt with_test_opt VARYING name . FROM gname by_opt gname UNTIL @138 condition @139 perform_after_opt FROM shift, and go to state 1386 state 1231 910 read_at_end_opt: NOT at_opt . on_end END shift, and go to state 1050 on_end go to state 1387 state 1232 911 read_at_end_opt: AT on_end . 914 | AT on_end . NOT at_opt $@96 on_end NOT shift, and go to state 1388 NOT [reduce using rule 911 (read_at_end_opt)] $default reduce using rule 911 (read_at_end_opt) state 1233 918 on_end: END @98 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1389 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1234 916 read_at_end_opt: on_end NOT . at_opt $@97 on_end AT shift, and go to state 1054 $default reduce using rule 1225 (at_opt) at_opt go to state 1390 state 1235 945 end_rewrite_opt: END_REWRITE . $default reduce using rule 945 (end_rewrite_opt) state 1236 943 rewrite_statement: REWRITE name write_from_opt $@102 invalid_key_opt end_rewrite_opt . $default reduce using rule 943 (rewrite_statement) state 1237 701 search_all: variable_indexed @79 search_at_end $@80 . search_all_when_list WHEN shift, and go to state 1391 search_all_when_list go to state 1392 search_all_when go to state 1393 state 1238 705 search_at_end: at_opt END . @81 statement_list $default reduce using rule 704 (@81) @81 go to state 1394 state 1239 698 search: variable_indexed @76 search_varying_opt @77 search_at_end . @78 search_when_list $default reduce using rule 697 (@78) @78 go to state 1395 state 1240 1018 set_variable: NULL_TOK . $default reduce using rule 1018 (set_variable) state 1241 1014 set_list: address_of_opt variable TO address_of_opt set_variable . $default reduce using rule 1014 (set_list) state 1242 1017 set_variable: variable . $default reduce using rule 1017 (set_variable) state 1243 749 sort_variable_indexed: SORT variable_indexed sort_keys_idx $@92 sort_duplicates_opt sort_collating_opt . $default reduce using rule 749 (sort_variable_indexed) state 1244 761 sort_duplicates_opt: with_opt DUPLICATES . in_opt order_opt IN shift, and go to state 1396 $default reduce using rule 1227 (in_opt) in_opt go to state 1397 state 1245 755 sort_key_idx: on_opt DIRECTION key_opt sort_keys_names_idx . 759 sort_keys_names_idx: sort_keys_names_idx . variable_indexed SUBSCVAR shift, and go to state 459 $default reduce using rule 755 (sort_key_idx) variable_indexed go to state 1398 state 1246 758 sort_keys_names_idx: variable_indexed . $default reduce using rule 758 (sort_keys_names_idx) state 1247 747 sort_file: SORT name sort_keys $@89 sort_duplicates_opt sort_collating_opt . $@90 sort_input $@91 sort_output $default reduce using rule 745 ($@90) $@90 go to state 1399 state 1248 1066 invalid_key_sentence: INVALID key_opt @124 statement_list . $default reduce using rule 1066 (invalid_key_sentence) state 1249 1068 not_invalid_key_sentence: not_excep INVALID key_opt @125 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1400 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1250 953 start_body: name KEY is_opt cond_op name . $default reduce using rule 953 (start_body) state 1251 1027 string_statement: STRINGCMD string_from_list INTO name string_with_pointer $@117 . on_overflow_opt end_stringcmd_opt $default reduce using rule 1045 ($@119) on_overflow_opt go to state 1401 $@119 go to state 1402 state 1252 1071 string_with_pointer: with_opt POINTER . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1403 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1253 804 subtract_body: CORRESPONDING var_list_gname FROM var_list_name rounded_opt . on_size_error_opt NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1404 on_opt go to state 987 state 1254 803 subtract_body: var_list_gname FROM gname GIVING var_list_name . on_size_error_opt 992 var_list_name: var_list_name . name rounded_opt sep_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1405 on_opt go to state 987 name go to state 567 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1255 1033 unstring_delimited_vars: unstring_delimited_vars OR . all_opt gname ALL shift, and go to state 1092 ALL [reduce using rule 1043 (all_opt)] $default reduce using rule 1043 (all_opt) all_opt go to state 1406 state 1256 1032 unstring_delimited_vars: all_opt gname . $default reduce using rule 1032 (unstring_delimited_vars) state 1257 1029 unstring_statement: UNSTRING name unstring_delimited INTO unstring_destinations string_with_pointer . unstring_tallying $@118 on_overflow_opt end_unstring_opt TALLYING shift, and go to state 1407 $default reduce using rule 1041 (unstring_tallying) unstring_tallying go to state 1408 state 1258 1035 unstring_destinations: unstring_destinations sep_opt . unstring_dest_var VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 unstring_dest_var go to state 1409 name go to state 1097 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1259 1038 unstring_delim_opt: DELIMITER . in_opt name IN shift, and go to state 1396 $default reduce using rule 1227 (in_opt) in_opt go to state 1410 state 1260 1036 unstring_dest_var: name unstring_delim_opt . unstring_count_opt COUNT shift, and go to state 1411 $default reduce using rule 1039 (unstring_count_opt) unstring_count_opt go to state 1412 state 1261 647 if_statement: if_part ELSE @60 conditional_statement $@61 end_if_opt . $default reduce using rule 647 (if_statement) state 1262 688 conditional_statement: $@75 NEXT SENTENCE . $default reduce using rule 688 (conditional_statement) state 1263 75 switch_on_opt: ON status_opt is_opt . STRING STRING shift, and go to state 1413 state 1264 77 switch_off_opt: OFF status_opt . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1414 state 1265 108 select_clause: ACCESS mode_opt is_opt . access_options STRING shift, and go to state 1280 LABELSTR shift, and go to state 1281 DYNAMIC shift, and go to state 1415 RANDOM shift, and go to state 1416 SEQUENTIAL shift, and go to state 1417 access_options go to state 1418 anystring go to state 1419 state 1266 112 select_clause: ALTERNATE RECORD key_opt . is_opt STRING with_duplicates IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1420 state 1267 123 assign_clause: error . $default reduce using rule 123 (assign_clause) state 1268 1279 filename: STRING . $default reduce using rule 1279 (filename) state 1269 119 assign_clause: PORTNUM . 121 | PORTNUM . filename STRING shift, and go to state 1268 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 STRING [reduce using rule 119 (assign_clause)] $default reduce using rule 119 (assign_clause) literal go to state 1272 signed_nliteral go to state 77 filename go to state 1421 state 1270 122 assign_clause: EXTERNAL . filename STRING shift, and go to state 1268 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1272 signed_nliteral go to state 77 filename go to state 1422 state 1271 107 select_clause: ASSIGN to_opt assign_clause . $default reduce using rule 107 (select_clause) state 1272 1278 filename: literal . $default reduce using rule 1278 (filename) state 1273 120 assign_clause: filename . $default reduce using rule 120 (assign_clause) state 1274 110 select_clause: RECORD key_opt is_opt . STRING STRING shift, and go to state 1423 state 1275 111 select_clause: RELATIVE key_opt is_opt . STRING STRING shift, and go to state 1424 state 1276 128 areas_opt: AREA . $default reduce using rule 128 (areas_opt) state 1277 129 areas_opt: AREAS . $default reduce using rule 129 (areas_opt) state 1278 113 select_clause: RESERVE NLITERAL areas_opt . $default reduce using rule 113 (select_clause) state 1279 109 select_clause: file_opt STATUS is_opt . STRING STRING shift, and go to state 1425 state 1280 1307 anystring: STRING . $default reduce using rule 1307 (anystring) state 1281 1308 anystring: LABELSTR . $default reduce using rule 1308 (anystring) state 1282 137 organization_options: INDEXED . $default reduce using rule 137 (organization_options) state 1283 140 organization_options: LINE . SEQUENTIAL SEQUENTIAL shift, and go to state 1426 state 1284 139 organization_options: RELATIVE . $default reduce using rule 139 (organization_options) state 1285 138 organization_options: SEQUENTIAL . $default reduce using rule 138 (organization_options) state 1286 106 select_clause: organization_opt is_opt organization_options . $default reduce using rule 106 (select_clause) state 1287 141 organization_options: anystring . $default reduce using rule 141 (organization_options) state 1288 162 i_o_control_multiple_file_position_opt: POSITION integer . $default reduce using rule 162 (i_o_control_multiple_file_position_opt) state 1289 499 file_description_clause_block: BLOCK contains_opt integer . to_integer_opt chars_or_recs_opt TO shift, and go to state 1427 $default reduce using rule 525 (to_integer_opt) to_integer_opt go to state 1428 state 1290 506 file_description_clause_code_set: CODE_SET is_opt STRING . $default reduce using rule 506 (file_description_clause_code_set) state 1291 535 record_is_are: RECORD is_opt . $default reduce using rule 535 (record_is_are) state 1292 536 record_is_are: RECORDS are_opt . $default reduce using rule 536 (record_is_are) state 1293 520 var_strings: STRING . $default reduce using rule 520 (var_strings) state 1294 504 file_description_clause_data: DATA record_is_are var_strings . 521 var_strings: var_strings . STRING STRING shift, and go to state 1429 $default reduce using rule 504 (file_description_clause_data) state 1295 538 std_or_omitt: OMITTED . $default reduce using rule 538 (std_or_omitt) state 1296 537 std_or_omitt: STANDARD . $default reduce using rule 537 (std_or_omitt) state 1297 502 file_description_clause_label: LABEL record_is_are std_or_omitt . $default reduce using rule 502 (file_description_clause_label) state 1298 1281 data_name: STRING . $default reduce using rule 1281 (data_name) state 1299 1280 data_name: literal . $default reduce using rule 1280 (data_name) state 1300 507 file_description_clause_linage: LINAGE is_opt data_name . lines_opt file_description_clause_linage_footing file_description_clause_linage_top file_description_clause_linage_bottom LINES shift, and go to state 1342 LINES [reduce using rule 207 (lines_opt)] $default reduce using rule 207 (lines_opt) lines_opt go to state 1430 state 1301 501 file_description_clause_record: RECORD is_opt VARYING . in_opt size_opt from_rec_varying to_rec_varying character_opts depend_rec_varying IN shift, and go to state 1396 $default reduce using rule 1227 (in_opt) in_opt go to state 1431 state 1302 500 file_description_clause_record: RECORD contains_opt integer . to_rec_varying character_opts TO shift, and go to state 1432 $default reduce using rule 533 (to_rec_varying) to_rec_varying go to state 1433 state 1303 503 file_description_clause_value: VALUE OF FILE_ID . is_opt filename IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1434 state 1304 419 file_section: file_section FD $@38 STRING $@39 file_description_fd_clauses PERIOD_TOK $@40 file_description . 427 file_description: file_description . field_description NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 $default reduce using rule 419 (file_section) field_description go to state 1435 signed_nliteral go to state 234 integer go to state 235 state 1305 426 file_description: field_description . $default reduce using rule 426 (file_description) state 1306 423 file_section: file_section SD $@41 STRING $@42 file_description_sd_clauses PERIOD_TOK $@43 file_description . 427 file_description: file_description . field_description NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 $default reduce using rule 423 (file_section) field_description go to state 1435 signed_nliteral go to state 234 integer go to state 235 state 1307 446 data_clause: BLANK when_opt ZERO . $default reduce using rule 446 (data_clause) state 1308 458 array_options: OCCURS integer TO . integer times_opt DEPENDING $@48 on_opt gname $@49 indexed_by_opt NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1436 state 1309 542 times_opt: TIMES . $default reduce using rule 542 (times_opt) state 1310 455 array_options: OCCURS integer times_opt . $@47 indexed_by_opt $default reduce using rule 454 ($@47) $@47 go to state 1437 state 1311 477 pictures: PICTURE $@50 is_opt . picture $default reduce using rule 478 (picture) picture go to state 1438 state 1312 435 redefines_var: VARIABLE . $default reduce using rule 435 (redefines_var) state 1313 436 redefines_var: SUBSCVAR . $default reduce using rule 436 (redefines_var) state 1314 434 redefines_clause: REDEFINES $@45 redefines_var . $default reduce using rule 434 (redefines_clause) state 1315 448 data_clause: RENAMES $@46 variable . thru_gname_opt THRU shift, and go to state 1439 $default reduce using rule 452 (thru_gname_opt) thru_gname_opt go to state 1440 state 1316 403 separate_opt: SEPARATE . character_opt CHARACTER shift, and go to state 1441 $default reduce using rule 406 (character_opt) character_opt go to state 1442 state 1317 401 sign_clause: sign_is_opt LEADING separate_opt . $default reduce using rule 401 (sign_clause) state 1318 402 sign_clause: sign_is_opt TRAILING separate_opt . $default reduce using rule 402 (sign_clause) state 1319 473 value_list: value_list comma_opt . value NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 value go to state 1443 gliteral go to state 1157 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 1320 475 value: gliteral THRU . gliteral NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gliteral go to state 1444 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 1321 466 usage: USAGENUM . $default reduce using rule 466 (usage) state 1322 467 usage: DISPLAY . $default reduce using rule 467 (usage) state 1323 468 usage: POINTER . $default reduce using rule 468 (usage) state 1324 465 usage_option: usage_opt is_opt usage . $default reduce using rule 465 (usage_option) state 1325 198 report_control: CODE . gliteral NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gliteral go to state 1445 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 1326 209 control_is_are: CONTROL . is_opt IS shift, and go to state 84 IS [reduce using rule 132 (is_opt)] $default reduce using rule 132 (is_opt) is_opt go to state 1446 state 1327 210 control_is_are: CONTROLS . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1447 state 1328 202 report_controls_page: PAGE . limit_is_are_opt integer line_lines_opt heading_opt first_detail_opt last_detail_opt footing_opt LIMIT shift, and go to state 1448 LIMITS shift, and go to state 1449 $default reduce using rule 211 (limit_is_are_opt) limit_is_are_opt go to state 1450 state 1329 194 report_section: RD $@15 STRING $@16 report_controls PERIOD_TOK . $@17 report_description $default reduce using rule 193 ($@17) $@17 go to state 1451 state 1330 197 report_control: is_opt . GLOBAL GLOBAL shift, and go to state 1452 state 1331 196 report_controls: report_controls report_control . $default reduce using rule 196 (report_controls) state 1332 199 report_control: report_controls_control . $default reduce using rule 199 (report_control) state 1333 200 report_control: report_controls_page . $default reduce using rule 200 (report_control) state 1334 201 report_controls_control: control_is_are . final_opt report_break_list FINAL shift, and go to state 1453 $default reduce using rule 220 (final_opt) final_opt go to state 1454 state 1335 325 screen_item: integer def_name_opt $@28 screen_clauses . PERIOD_TOK 327 screen_clauses: screen_clauses . LINE $@29 number_is_opt plus_minus_opt name_or_lit 329 | screen_clauses . COLUMN $@30 number_is_opt plus_minus_opt name_or_lit 330 | screen_clauses . with_opt screen_attrib 332 | screen_clauses . with_opt FOREGROUNDCOLOR $@31 name_or_lit 334 | screen_clauses . with_opt BACKGROUNDCOLOR $@32 name_or_lit 336 | screen_clauses . with_opt COLOR $@33 name_or_lit 337 | screen_clauses . screen_source_destination 338 | screen_clauses . value_is_are gliteral 339 | screen_clauses . pictures 341 | screen_clauses . SIZE $@34 name_or_lit TO shift, and go to state 1455 COLUMN shift, and go to state 1456 FROM shift, and go to state 1457 LINE shift, and go to state 1458 PICTURE shift, and go to state 918 SIZE shift, and go to state 1459 USING shift, and go to state 1460 VALUE shift, and go to state 924 VALUES shift, and go to state 925 WITH shift, and go to state 358 PERIOD_TOK shift, and go to state 1461 WITH [reduce using rule 1233 (with_opt)] $default reduce using rule 1233 (with_opt) screen_source_destination go to state 1462 value_is_are go to state 1463 pictures go to state 1464 with_opt go to state 1465 state 1336 584 use_phrase: USE AFTER use_phrase_exception_error PROCEDURE on_opt . use_phrase_option PERIOD_TOK error shift, and go to state 438 VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 EXTEND shift, and go to state 439 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 INPUT shift, and go to state 440 I_O shift, and go to state 441 LOWVALUES shift, and go to state 66 OUTPUT shift, and go to state 442 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 use_phrase_option go to state 1466 open_mode go to state 1467 gname_list go to state 1468 gname go to state 71 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1337 909 read_key_opt: KEY . is_opt name IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1469 state 1338 900 read_body: name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt . 901 | name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt . read_at_end_opt 902 | name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt . read_invalid_key_opt NOT shift, and go to state 1470 AT shift, and go to state 1049 END shift, and go to state 1050 INVALID shift, and go to state 1471 NOT [reduce using rule 900 (read_body)] $default reduce using rule 900 (read_body) read_at_end_opt go to state 1472 on_end go to state 1052 read_invalid_key_opt go to state 1473 read_invalid_key go to state 1474 read_not_invalid_key go to state 1475 state 1339 941 end_write_opt: END_WRITE . $default reduce using rule 941 (end_write_opt) state 1340 934 write_statement: WRITE name write_from_opt write_options $@101 invalid_key_opt end_write_opt . $default reduce using rule 934 (write_statement) state 1341 206 line_lines_opt: LINE . $default reduce using rule 206 (line_lines_opt) state 1342 208 lines_opt: LINES . $default reduce using rule 208 (lines_opt) state 1343 938 write_options: before_after advancing_opt gname line_lines_opt . $default reduce using rule 938 (write_options) state 1344 205 line_lines_opt: lines_opt . $default reduce using rule 205 (line_lines_opt) state 1345 393 screen_attribx: BLANK when_opt ZERO . $default reduce using rule 393 (screen_attribx) state 1346 396 screen_attribx: with_opt NO ADVANCING . $default reduce using rule 396 (screen_attribx) state 1347 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION $@93 variable . @94 statement_list $@95 end_accept_opt $default reduce using rule 834 (@94) @94 go to state 1476 state 1348 795 add_body: CORRESPONDING var_list_gname TO var_list_name rounded_opt on_size_error_opt . $default reduce using rule 795 (add_body) state 1349 998 on_size_error_opt: NOT on_opt SIZE . on_size_error ERROR_TOK shift, and go to state 1350 on_size_error go to state 1477 state 1350 1003 on_size_error: ERROR_TOK . @116 statement_list $default reduce using rule 1002 (@116) @116 go to state 1478 state 1351 999 on_size_error_opt: on_opt SIZE on_size_error . 1001 | on_opt SIZE on_size_error . NOT on_opt SIZE $@115 on_size_error NOT shift, and go to state 1479 NOT [reduce using rule 999 (on_size_error_opt)] $default reduce using rule 999 (on_size_error_opt) state 1352 1128 returning_options: GIVING variable . $default reduce using rule 1128 (returning_options) state 1353 1127 returning_options: RETURNING variable . $default reduce using rule 1127 (returning_options) state 1354 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 . @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt $default reduce using rule 964 (@107) @107 go to state 1480 state 1355 1125 using_options: USING @127 dummy @128 . parm_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 BY shift, and go to state 854 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 1231 (by_opt) parm_list go to state 1481 parameter go to state 1482 by_opt go to state 1483 gname go to state 1484 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1356 981 chain_statement: CHAIN $@111 gname using_options @112 @113 on_exception_or_overflow . $@114 end_chain_opt $default reduce using rule 980 ($@114) $@114 go to state 1485 state 1357 1048 on_exception_or_overflow: on_opt . exception_or_overflow @120 statement_list EXCEPTION shift, and go to state 1486 OVERFLOW_TOK shift, and go to state 1487 exception_or_overflow go to state 1488 state 1358 850 display_line_options: display_line_options with_opt NO ADVANCING . $default reduce using rule 850 (display_line_options) state 1359 853 display_line_options: display_line_options with_opt ERASE EOL . $default reduce using rule 853 (display_line_options) state 1360 852 display_line_options: display_line_options with_opt ERASE EOS . $default reduce using rule 852 (display_line_options) state 1361 854 display_line_options: display_line_options with_opt ERASE SCREEN . $default reduce using rule 854 (display_line_options) state 1362 815 divide_body: gname BY gname GIVING var_list_name on_size_error_opt . $default reduce using rule 815 (divide_body) state 1363 816 divide_body: gname BY gname GIVING name rounded_opt . REMAINDER name on_size_error_opt 991 var_list_name: name rounded_opt . sep_opt LISTSEP shift, and go to state 98 REMAINDER shift, and go to state 1489 $default reduce using rule 1214 (sep_opt) sep_opt go to state 755 state 1364 818 divide_body: gname INTO gname GIVING var_list_name on_size_error_opt . $default reduce using rule 818 (divide_body) state 1365 817 divide_body: gname INTO gname GIVING name rounded_opt . REMAINDER name on_size_error_opt 991 var_list_name: name rounded_opt . sep_opt LISTSEP shift, and go to state 98 REMAINDER shift, and go to state 1490 $default reduce using rule 1214 (sep_opt) sep_opt go to state 755 state 1366 665 when_case_list: WHEN @66 @67 . when_case sentence_or_nothing OTHER shift, and go to state 1491 $default reduce using rule 670 (@71) when_case go to state 1492 @71 go to state 1493 state 1367 669 when_case_list: when_case_list WHEN @68 . @69 when_case $@70 sentence_or_nothing $default reduce using rule 667 (@69) @69 go to state 1494 state 1368 1210 cond_op: conditional OR conditional . $default reduce using rule 1210 (cond_op) state 1369 780 initialize_replacing_list: initialize_type_list data_opt BY gname . $default reduce using rule 780 (initialize_replacing_list) state 1370 1088 converting_clause: CONVERTING noallname TO noallname inspect_before_after . 1108 inspect_before_after: inspect_before_after . BEFORE initial_opt noallname 1109 | inspect_before_after . AFTER initial_opt noallname AFTER shift, and go to state 1495 BEFORE shift, and go to state 1496 $default reduce using rule 1088 (converting_clause) state 1371 1091 tallying_list: tallying_list name FOR tallying_for_list . 1093 tallying_for_list: tallying_for_list . CHARACTERS inspect_before_after 1094 | tallying_for_list . ALL noallname inspect_before_after 1095 | tallying_for_list . LEADING noallname inspect_before_after ALL shift, and go to state 1497 CHARACTERS shift, and go to state 1498 LEADING shift, and go to state 1499 $default reduce using rule 1091 (tallying_list) state 1372 1104 replacing_kind: ALL . $default reduce using rule 1104 (replacing_kind) state 1373 1099 replacing_list: replacing_list CHARACTERS . BY noallname inspect_before_after BY shift, and go to state 1500 state 1374 1107 replacing_kind: FIRST . $default reduce using rule 1107 (replacing_kind) state 1375 1105 replacing_kind: LEADING . $default reduce using rule 1105 (replacing_kind) state 1376 1106 replacing_kind: TRAILING . $default reduce using rule 1106 (replacing_kind) state 1377 1100 replacing_list: replacing_list replacing_kind . replacing_by_list $default reduce using rule 1103 (replacing_by_list) replacing_by_list go to state 1501 state 1378 741 merge_using: USING . sort_file_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 sort_file_list go to state 1502 name go to state 1503 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1379 740 merge_statement: MERGE name sort_keys $@86 sort_collating_opt $@87 merge_using . $@88 sort_output $default reduce using rule 739 ($@88) $@88 go to state 1504 state 1380 757 sort_keys_names: sort_keys_names name . $default reduce using rule 757 (sort_keys_names) state 1381 809 multiply_body: gname BY gname GIVING var_list_name on_size_error_opt . $default reduce using rule 809 (multiply_body) state 1382 1151 perform_options: with_test_opt UNTIL @131 condition @132 perform_statements . $@133 END_PERFORM $default reduce using rule 1150 ($@133) $@133 go to state 1505 state 1383 1155 perform_options: with_test_opt VARYING name FROM gname by_opt . gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1506 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1384 1147 perform_options: gname TIMES @129 perform_statements $@130 END_PERFORM . $default reduce using rule 1147 (perform_options) state 1385 1158 perform_options: label perform_thru_opt with_test_opt UNTIL @137 condition . 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition OR shift, and go to state 611 AND shift, and go to state 612 $default reduce using rule 1158 (perform_options) state 1386 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM . gname by_opt gname UNTIL @138 condition @139 perform_after_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1507 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1387 910 read_at_end_opt: NOT at_opt on_end . $default reduce using rule 910 (read_at_end_opt) state 1388 914 read_at_end_opt: AT on_end NOT . at_opt $@96 on_end AT shift, and go to state 1054 $default reduce using rule 1225 (at_opt) at_opt go to state 1508 state 1389 918 on_end: END @98 statement_list . $default reduce using rule 918 (on_end) state 1390 916 read_at_end_opt: on_end NOT at_opt . $@97 on_end $default reduce using rule 915 ($@97) $@97 go to state 1509 state 1391 718 search_all_when: WHEN . $@83 search_all_when_conditional @84 search_all_when_statement $default reduce using rule 716 ($@83) $@83 go to state 1510 state 1392 701 search_all: variable_indexed @79 search_at_end $@80 search_all_when_list . 715 search_all_when_list: search_all_when_list . search_all_when WHEN shift, and go to state 1391 WHEN [reduce using rule 701 (search_all)] $default reduce using rule 701 (search_all) search_all_when go to state 1511 state 1393 714 search_all_when_list: search_all_when . $default reduce using rule 714 (search_all_when_list) state 1394 705 search_at_end: at_opt END @81 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1512 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1395 698 search: variable_indexed @76 search_varying_opt @77 search_at_end @78 . search_when_list WHEN shift, and go to state 1513 search_when_list go to state 1514 search_when go to state 1515 state 1396 1228 in_opt: IN . $default reduce using rule 1228 (in_opt) state 1397 761 sort_duplicates_opt: with_opt DUPLICATES in_opt . order_opt ORDER shift, and go to state 1516 $default reduce using rule 549 (order_opt) order_opt go to state 1517 state 1398 759 sort_keys_names_idx: sort_keys_names_idx variable_indexed . $default reduce using rule 759 (sort_keys_names_idx) state 1399 747 sort_file: SORT name sort_keys $@89 sort_duplicates_opt sort_collating_opt $@90 . sort_input $@91 sort_output INPUT shift, and go to state 1518 USING shift, and go to state 1519 sort_input go to state 1520 state 1400 1068 not_invalid_key_sentence: not_excep INVALID key_opt @125 statement_list . $default reduce using rule 1068 (not_invalid_key_sentence) state 1401 1027 string_statement: STRINGCMD string_from_list INTO name string_with_pointer $@117 on_overflow_opt . end_stringcmd_opt END_STRINGCMD shift, and go to state 1521 END_STRINGCMD [reduce using rule 1081 (end_stringcmd_opt)] $default reduce using rule 1081 (end_stringcmd_opt) end_stringcmd_opt go to state 1522 state 1402 1046 on_overflow_opt: $@119 . on_overflow on_not_overflow ON shift, and go to state 620 OVERFLOW_TOK reduce using rule 1235 (on_opt) $default reduce using rule 1057 (on_overflow) on_overflow go to state 1523 on_opt go to state 1524 state 1403 1071 string_with_pointer: with_opt POINTER name . $default reduce using rule 1071 (string_with_pointer) state 1404 804 subtract_body: CORRESPONDING var_list_gname FROM var_list_name rounded_opt on_size_error_opt . $default reduce using rule 804 (subtract_body) state 1405 803 subtract_body: var_list_gname FROM gname GIVING var_list_name on_size_error_opt . $default reduce using rule 803 (subtract_body) state 1406 1033 unstring_delimited_vars: unstring_delimited_vars OR all_opt . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1525 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1407 1042 unstring_tallying: TALLYING . in_opt name IN shift, and go to state 1396 $default reduce using rule 1227 (in_opt) in_opt go to state 1526 state 1408 1029 unstring_statement: UNSTRING name unstring_delimited INTO unstring_destinations string_with_pointer unstring_tallying . $@118 on_overflow_opt end_unstring_opt $default reduce using rule 1028 ($@118) $@118 go to state 1527 state 1409 1035 unstring_destinations: unstring_destinations sep_opt unstring_dest_var . $default reduce using rule 1035 (unstring_destinations) state 1410 1038 unstring_delim_opt: DELIMITER in_opt . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1528 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1411 1040 unstring_count_opt: COUNT . in_opt name IN shift, and go to state 1396 $default reduce using rule 1227 (in_opt) in_opt go to state 1529 state 1412 1036 unstring_dest_var: name unstring_delim_opt unstring_count_opt . $default reduce using rule 1036 (unstring_dest_var) state 1413 75 switch_on_opt: ON status_opt is_opt STRING . $default reduce using rule 75 (switch_on_opt) state 1414 77 switch_off_opt: OFF status_opt is_opt . STRING STRING shift, and go to state 1530 state 1415 143 access_options: DYNAMIC . $default reduce using rule 143 (access_options) state 1416 144 access_options: RANDOM . $default reduce using rule 144 (access_options) state 1417 142 access_options: SEQUENTIAL . $default reduce using rule 142 (access_options) state 1418 108 select_clause: ACCESS mode_opt is_opt access_options . $default reduce using rule 108 (select_clause) state 1419 145 access_options: anystring . $default reduce using rule 145 (access_options) state 1420 112 select_clause: ALTERNATE RECORD key_opt is_opt . STRING with_duplicates STRING shift, and go to state 1531 state 1421 121 assign_clause: PORTNUM filename . $default reduce using rule 121 (assign_clause) state 1422 122 assign_clause: EXTERNAL filename . $default reduce using rule 122 (assign_clause) state 1423 110 select_clause: RECORD key_opt is_opt STRING . $default reduce using rule 110 (select_clause) state 1424 111 select_clause: RELATIVE key_opt is_opt STRING . $default reduce using rule 111 (select_clause) state 1425 109 select_clause: file_opt STATUS is_opt STRING . $default reduce using rule 109 (select_clause) state 1426 140 organization_options: LINE SEQUENTIAL . $default reduce using rule 140 (organization_options) state 1427 526 to_integer_opt: TO . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1532 state 1428 499 file_description_clause_block: BLOCK contains_opt integer to_integer_opt . chars_or_recs_opt CHARACTERS shift, and go to state 1533 RECORDS shift, and go to state 1534 $default reduce using rule 522 (chars_or_recs_opt) chars_or_recs_opt go to state 1535 state 1429 521 var_strings: var_strings STRING . $default reduce using rule 521 (var_strings) state 1430 507 file_description_clause_linage: LINAGE is_opt data_name lines_opt . file_description_clause_linage_footing file_description_clause_linage_top file_description_clause_linage_bottom WITH shift, and go to state 358 FOOTING reduce using rule 1233 (with_opt) $default reduce using rule 508 (file_description_clause_linage_footing) file_description_clause_linage_footing go to state 1536 with_opt go to state 1537 state 1431 501 file_description_clause_record: RECORD is_opt VARYING in_opt . size_opt from_rec_varying to_rec_varying character_opts depend_rec_varying SIZE shift, and go to state 1538 $default reduce using rule 1004 (size_opt) size_opt go to state 1539 state 1432 534 to_rec_varying: TO . nliteral NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 nliteral go to state 1540 signed_nliteral go to state 1069 state 1433 500 file_description_clause_record: RECORD contains_opt integer to_rec_varying . character_opts CHARACTERS shift, and go to state 1541 $default reduce using rule 547 (character_opts) character_opts go to state 1542 state 1434 503 file_description_clause_value: VALUE OF FILE_ID is_opt . filename STRING shift, and go to state 1268 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1272 signed_nliteral go to state 77 filename go to state 1543 state 1435 427 file_description: file_description field_description . $default reduce using rule 427 (file_description) state 1436 458 array_options: OCCURS integer TO integer . times_opt DEPENDING $@48 on_opt gname $@49 indexed_by_opt TIMES shift, and go to state 1309 $default reduce using rule 541 (times_opt) times_opt go to state 1544 state 1437 455 array_options: OCCURS integer times_opt $@47 . indexed_by_opt DIRECTION shift, and go to state 1545 INDEXED reduce using rule 460 (key_is_opt) $default reduce using rule 462 (indexed_by_opt) key_is_opt go to state 1546 indexed_by_opt go to state 1547 state 1438 477 pictures: PICTURE $@50 is_opt picture . 479 picture: picture . pic_elem CHAR shift, and go to state 1548 $default reduce using rule 477 (pictures) pic_elem go to state 1549 state 1439 453 thru_gname_opt: THRU . variable VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 variable go to state 1550 qualified_var go to state 80 unqualified_var go to state 81 state 1440 448 data_clause: RENAMES $@46 variable thru_gname_opt . $default reduce using rule 448 (data_clause) state 1441 405 character_opt: CHARACTER . $default reduce using rule 405 (character_opt) state 1442 403 separate_opt: SEPARATE character_opt . $default reduce using rule 403 (separate_opt) state 1443 473 value_list: value_list comma_opt value . $default reduce using rule 473 (value_list) state 1444 475 value: gliteral THRU gliteral . $default reduce using rule 475 (value) state 1445 198 report_control: CODE gliteral . $default reduce using rule 198 (report_control) state 1446 209 control_is_are: CONTROL is_opt . $default reduce using rule 209 (control_is_are) state 1447 210 control_is_are: CONTROLS are_opt . $default reduce using rule 210 (control_is_are) state 1448 212 limit_is_are_opt: LIMIT . IS IS shift, and go to state 1551 state 1449 213 limit_is_are_opt: LIMITS . ARE ARE shift, and go to state 1552 state 1450 202 report_controls_page: PAGE limit_is_are_opt . integer line_lines_opt heading_opt first_detail_opt last_detail_opt footing_opt NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1553 state 1451 194 report_section: RD $@15 STRING $@16 report_controls PERIOD_TOK $@17 . report_description NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 report_description go to state 1554 report_item go to state 1555 signed_nliteral go to state 234 integer go to state 1556 state 1452 197 report_control: is_opt GLOBAL . $default reduce using rule 197 (report_control) state 1453 221 final_opt: FINAL . $default reduce using rule 221 (final_opt) state 1454 201 report_controls_control: control_is_are final_opt . report_break_list $default reduce using rule 222 (report_break_list) report_break_list go to state 1557 state 1455 348 screen_source_destination: TO . $@37 name $default reduce using rule 347 ($@37) $@37 go to state 1558 state 1456 329 screen_clauses: screen_clauses COLUMN . $@30 number_is_opt plus_minus_opt name_or_lit $default reduce using rule 328 ($@30) $@30 go to state 1559 state 1457 346 screen_source_destination: FROM . $@36 name_or_lit screen_to_name $default reduce using rule 345 ($@36) $@36 go to state 1560 state 1458 327 screen_clauses: screen_clauses LINE . $@29 number_is_opt plus_minus_opt name_or_lit $default reduce using rule 326 ($@29) $@29 go to state 1561 state 1459 341 screen_clauses: screen_clauses SIZE . $@34 name_or_lit $default reduce using rule 340 ($@34) $@34 go to state 1562 state 1460 344 screen_source_destination: USING . $@35 name_or_lit $default reduce using rule 343 ($@35) $@35 go to state 1563 state 1461 325 screen_item: integer def_name_opt $@28 screen_clauses PERIOD_TOK . $default reduce using rule 325 (screen_item) state 1462 337 screen_clauses: screen_clauses screen_source_destination . $default reduce using rule 337 (screen_clauses) state 1463 338 screen_clauses: screen_clauses value_is_are . gliteral NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gliteral go to state 1564 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 state 1464 339 screen_clauses: screen_clauses pictures . $default reduce using rule 339 (screen_clauses) state 1465 330 screen_clauses: screen_clauses with_opt . screen_attrib 332 | screen_clauses with_opt . FOREGROUNDCOLOR $@31 name_or_lit 334 | screen_clauses with_opt . BACKGROUNDCOLOR $@32 name_or_lit 336 | screen_clauses with_opt . COLOR $@33 name_or_lit IS shift, and go to state 84 AUTO shift, and go to state 1565 BACKGROUNDCOLOR shift, and go to state 1566 BLANK shift, and go to state 1567 BLINK shift, and go to state 1568 COLOR shift, and go to state 1569 ERASE shift, and go to state 1570 FOREGROUNDCOLOR shift, and go to state 1571 FULL shift, and go to state 1572 HIGHLIGHT shift, and go to state 1573 JUSTIFIED shift, and go to state 1574 LOWER shift, and go to state 1575 LOWLIGHT shift, and go to state 1576 REQUIRED shift, and go to state 1577 REVERSEVIDEO shift, and go to state 1578 SECURE shift, and go to state 1579 SIGN shift, and go to state 921 UNDERLINE shift, and go to state 1580 UPPER shift, and go to state 1581 WITH shift, and go to state 358 LEADING reduce using rule 132 (is_opt) TRAILING reduce using rule 132 (is_opt) $default reduce using rule 1233 (with_opt) is_opt go to state 979 screen_attrib go to state 1582 sign_clause go to state 1583 sign_is_opt go to state 929 with_opt go to state 1584 state 1466 584 use_phrase: USE AFTER use_phrase_exception_error PROCEDURE on_opt use_phrase_option . PERIOD_TOK PERIOD_TOK shift, and go to state 1585 state 1467 591 use_phrase_option: open_mode . $default reduce using rule 591 (use_phrase_option) state 1468 590 use_phrase_option: gname_list . 1244 gname_list: gname_list . sep_opt gname LISTSEP shift, and go to state 98 PERIOD_TOK reduce using rule 590 (use_phrase_option) $default reduce using rule 1214 (sep_opt) sep_opt go to state 99 state 1469 909 read_key_opt: KEY is_opt . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1586 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1470 910 read_at_end_opt: NOT . at_opt on_end 925 read_not_invalid_key: NOT . INVALID key_opt @100 statement_list AT shift, and go to state 1054 INVALID shift, and go to state 1587 $default reduce using rule 1225 (at_opt) at_opt go to state 1231 state 1471 923 read_invalid_key: INVALID . key_opt @99 statement_list KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1588 state 1472 901 read_body: name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt read_at_end_opt . $default reduce using rule 901 (read_body) state 1473 902 read_body: name read_next_opt record_opt read_into_opt with_lock_opt read_key_opt read_invalid_key_opt . $default reduce using rule 902 (read_body) state 1474 919 read_invalid_key_opt: read_invalid_key . 921 | read_invalid_key . read_not_invalid_key NOT shift, and go to state 1589 NOT [reduce using rule 919 (read_invalid_key_opt)] $default reduce using rule 919 (read_invalid_key_opt) read_not_invalid_key go to state 1590 state 1475 920 read_invalid_key_opt: read_not_invalid_key . $default reduce using rule 920 (read_invalid_key_opt) state 1476 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION $@93 variable @94 . statement_list $@95 end_accept_opt READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1591 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1477 998 on_size_error_opt: NOT on_opt SIZE on_size_error . $default reduce using rule 998 (on_size_error_opt) state 1478 1003 on_size_error: ERROR_TOK @116 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1592 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1479 1001 on_size_error_opt: on_opt SIZE on_size_error NOT . on_opt SIZE $@115 on_size_error ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1593 state 1480 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 @107 . @108 on_exception_or_overflow on_not_exception $@109 end_call_opt $default reduce using rule 965 (@108) @108 go to state 1594 state 1481 1125 using_options: USING @127 dummy @128 parm_list . 1133 parm_list: parm_list . sep_opt parameter LISTSEP shift, and go to state 98 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) NLITERAL reduce using rule 1214 (sep_opt) CLITERAL reduce using rule 1214 (sep_opt) '+' reduce using rule 1214 (sep_opt) '-' reduce using rule 1214 (sep_opt) ALL reduce using rule 1214 (sep_opt) BY reduce using rule 1214 (sep_opt) CONTENT reduce using rule 1214 (sep_opt) FUNCTION reduce using rule 1214 (sep_opt) HIGHVALUES reduce using rule 1214 (sep_opt) LOWVALUES reduce using rule 1214 (sep_opt) QUOTES reduce using rule 1214 (sep_opt) REFERENCE reduce using rule 1214 (sep_opt) SPACES reduce using rule 1214 (sep_opt) VALUE reduce using rule 1214 (sep_opt) ZERO reduce using rule 1214 (sep_opt) $default reduce using rule 1125 (using_options) sep_opt go to state 1595 state 1482 1134 parm_list: parameter . $default reduce using rule 1134 (parm_list) state 1483 1136 parameter: by_opt . parm_type gname CONTENT shift, and go to state 1596 REFERENCE shift, and go to state 1597 VALUE shift, and go to state 1598 parm_type go to state 1599 state 1484 1135 parameter: gname . $default reduce using rule 1135 (parameter) state 1485 981 chain_statement: CHAIN $@111 gname using_options @112 @113 on_exception_or_overflow $@114 . end_chain_opt END_CHAIN shift, and go to state 1600 END_CHAIN [reduce using rule 1008 (end_chain_opt)] $default reduce using rule 1008 (end_chain_opt) end_chain_opt go to state 1601 state 1486 1050 exception_or_overflow: EXCEPTION . $default reduce using rule 1050 (exception_or_overflow) state 1487 1051 exception_or_overflow: OVERFLOW_TOK . $default reduce using rule 1051 (exception_or_overflow) state 1488 1048 on_exception_or_overflow: on_opt exception_or_overflow . @120 statement_list $default reduce using rule 1047 (@120) @120 go to state 1602 state 1489 816 divide_body: gname BY gname GIVING name rounded_opt REMAINDER . name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1603 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1490 817 divide_body: gname INTO gname GIVING name rounded_opt REMAINDER . name on_size_error_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1604 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1491 674 when_case: OTHER . $default reduce using rule 674 (when_case) state 1492 665 when_case_list: WHEN @66 @67 when_case . sentence_or_nothing 673 when_case: when_case . ALSO @72 selection_object ALSO shift, and go to state 1605 END_EVALUATE reduce using rule 681 (sentence_or_nothing) NEXT reduce using rule 687 ($@75) WHEN reduce using rule 681 (sentence_or_nothing) PERIOD_TOK reduce using rule 681 (sentence_or_nothing) $default reduce using rule 685 ($@74) sentence_or_nothing go to state 1606 conditional_statement go to state 1607 $@74 go to state 862 $@75 go to state 863 state 1493 671 when_case: @71 . selection_object NOT shift, and go to state 1608 ANY shift, and go to state 1609 FALSE_TOK shift, and go to state 1610 TRUE_TOK shift, and go to state 1611 $default reduce using rule 689 (not_opt) selection_object go to state 1612 not_opt go to state 1613 state 1494 669 when_case_list: when_case_list WHEN @68 @69 . when_case $@70 sentence_or_nothing OTHER shift, and go to state 1491 $default reduce using rule 670 (@71) when_case go to state 1614 @71 go to state 1493 state 1495 1109 inspect_before_after: inspect_before_after AFTER . initial_opt noallname INITIAL_TOK shift, and go to state 1615 $default reduce using rule 1112 (initial_opt) initial_opt go to state 1616 state 1496 1108 inspect_before_after: inspect_before_after BEFORE . initial_opt noallname INITIAL_TOK shift, and go to state 1615 $default reduce using rule 1112 (initial_opt) initial_opt go to state 1617 state 1497 1094 tallying_for_list: tallying_for_list ALL . noallname inspect_before_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 1618 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1498 1093 tallying_for_list: tallying_for_list CHARACTERS . inspect_before_after $default reduce using rule 1110 (inspect_before_after) inspect_before_after go to state 1619 state 1499 1095 tallying_for_list: tallying_for_list LEADING . noallname inspect_before_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 1620 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1500 1099 replacing_list: replacing_list CHARACTERS BY . noallname inspect_before_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 1621 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1501 1100 replacing_list: replacing_list replacing_kind replacing_by_list . 1102 replacing_by_list: replacing_by_list . noallname BY noallname inspect_before_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 1100 (replacing_list) noallname go to state 1622 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1502 741 merge_using: USING sort_file_list . 769 sort_file_list: sort_file_list . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 741 (merge_using) name go to state 1623 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1503 768 sort_file_list: name . $default reduce using rule 768 (sort_file_list) state 1504 740 merge_statement: MERGE name sort_keys $@86 sort_collating_opt $@87 merge_using $@88 . sort_output GIVING shift, and go to state 1624 OUTPUT shift, and go to state 1625 sort_output go to state 1626 state 1505 1151 perform_options: with_test_opt UNTIL @131 condition @132 perform_statements $@133 . END_PERFORM END_PERFORM shift, and go to state 1627 state 1506 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname . UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM UNTIL shift, and go to state 1628 state 1507 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname . by_opt gname UNTIL @138 condition @139 perform_after_opt BY shift, and go to state 854 $default reduce using rule 1231 (by_opt) by_opt go to state 1629 state 1508 914 read_at_end_opt: AT on_end NOT at_opt . $@96 on_end $default reduce using rule 913 ($@96) $@96 go to state 1630 state 1509 916 read_at_end_opt: on_end NOT at_opt $@97 . on_end END shift, and go to state 1050 on_end go to state 1631 state 1510 718 search_all_when: WHEN $@83 . search_all_when_conditional @84 search_all_when_statement VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 search_all_when_conditional go to state 1632 variable go to state 1633 qualified_var go to state 80 unqualified_var go to state 81 state 1511 715 search_all_when_list: search_all_when_list search_all_when . $default reduce using rule 715 (search_all_when_list) state 1512 705 search_at_end: at_opt END @81 statement_list . $default reduce using rule 705 (search_at_end) state 1513 710 search_when: WHEN . search_when_conditional @82 search_when_statement VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 search_when_conditional go to state 1634 name_or_lit go to state 1635 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1514 698 search: variable_indexed @76 search_varying_opt @77 search_at_end @78 search_when_list . 708 search_when_list: search_when_list . search_when WHEN shift, and go to state 1513 WHEN [reduce using rule 698 (search)] $default reduce using rule 698 (search) search_when go to state 1636 state 1515 707 search_when_list: search_when . $default reduce using rule 707 (search_when_list) state 1516 550 order_opt: ORDER . $default reduce using rule 550 (order_opt) state 1517 761 sort_duplicates_opt: with_opt DUPLICATES in_opt order_opt . $default reduce using rule 761 (sort_duplicates_opt) state 1518 764 sort_input: INPUT . PROCEDURE is_opt perform_range PROCEDURE shift, and go to state 1637 state 1519 765 sort_input: USING . sort_file_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 sort_file_list go to state 1638 name go to state 1503 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1520 747 sort_file: SORT name sort_keys $@89 sort_duplicates_opt sort_collating_opt $@90 sort_input . $@91 sort_output $default reduce using rule 746 ($@91) $@91 go to state 1639 state 1521 1082 end_stringcmd_opt: END_STRINGCMD . $default reduce using rule 1082 (end_stringcmd_opt) state 1522 1027 string_statement: STRINGCMD string_from_list INTO name string_with_pointer $@117 on_overflow_opt end_stringcmd_opt . $default reduce using rule 1027 (string_statement) state 1523 1046 on_overflow_opt: $@119 on_overflow . on_not_overflow NOT shift, and go to state 665 NOTEXCEP shift, and go to state 667 NOT [reduce using rule 1060 (on_not_overflow)] NOTEXCEP [reduce using rule 1060 (on_not_overflow)] $default reduce using rule 1060 (on_not_overflow) on_not_overflow go to state 1640 not_excep go to state 1641 state 1524 1056 on_overflow: on_opt . OVERFLOW_TOK @122 statement_list OVERFLOW_TOK shift, and go to state 1642 state 1525 1033 unstring_delimited_vars: unstring_delimited_vars OR all_opt gname . $default reduce using rule 1033 (unstring_delimited_vars) state 1526 1042 unstring_tallying: TALLYING in_opt . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1643 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1527 1029 unstring_statement: UNSTRING name unstring_delimited INTO unstring_destinations string_with_pointer unstring_tallying $@118 . on_overflow_opt end_unstring_opt $default reduce using rule 1045 ($@119) on_overflow_opt go to state 1644 $@119 go to state 1402 state 1528 1038 unstring_delim_opt: DELIMITER in_opt name . $default reduce using rule 1038 (unstring_delim_opt) state 1529 1040 unstring_count_opt: COUNT in_opt . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1645 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1530 77 switch_off_opt: OFF status_opt is_opt STRING . $default reduce using rule 77 (switch_off_opt) state 1531 112 select_clause: ALTERNATE RECORD key_opt is_opt STRING . with_duplicates WITH shift, and go to state 358 DUPLICATES reduce using rule 1233 (with_opt) $default reduce using rule 125 (with_duplicates) with_duplicates go to state 1646 with_opt go to state 1647 state 1532 526 to_integer_opt: TO integer . $default reduce using rule 526 (to_integer_opt) state 1533 523 chars_or_recs_opt: CHARACTERS . $default reduce using rule 523 (chars_or_recs_opt) state 1534 524 chars_or_recs_opt: RECORDS . $default reduce using rule 524 (chars_or_recs_opt) state 1535 499 file_description_clause_block: BLOCK contains_opt integer to_integer_opt chars_or_recs_opt . $default reduce using rule 499 (file_description_clause_block) state 1536 507 file_description_clause_linage: LINAGE is_opt data_name lines_opt file_description_clause_linage_footing . file_description_clause_linage_top file_description_clause_linage_bottom AT shift, and go to state 1648 LINES shift, and go to state 1649 AT [reduce using rule 510 (file_description_clause_linage_top)] LINES [reduce using rule 510 (file_description_clause_linage_top)] TOP reduce using rule 514 (lines_at_opt) $default reduce using rule 510 (file_description_clause_linage_top) file_description_clause_linage_top go to state 1650 lines_at_opt go to state 1651 state 1537 509 file_description_clause_linage_footing: with_opt . FOOTING at_opt data_name FOOTING shift, and go to state 1652 state 1538 1005 size_opt: SIZE . $default reduce using rule 1005 (size_opt) state 1539 501 file_description_clause_record: RECORD is_opt VARYING in_opt size_opt . from_rec_varying to_rec_varying character_opts depend_rec_varying FROM shift, and go to state 1653 NLITERAL reduce using rule 532 (from_opt) '+' reduce using rule 532 (from_opt) '-' reduce using rule 532 (from_opt) $default reduce using rule 529 (from_rec_varying) from_rec_varying go to state 1654 from_opt go to state 1655 state 1540 534 to_rec_varying: TO nliteral . $default reduce using rule 534 (to_rec_varying) state 1541 548 character_opts: CHARACTERS . $default reduce using rule 548 (character_opts) state 1542 500 file_description_clause_record: RECORD contains_opt integer to_rec_varying character_opts . $default reduce using rule 500 (file_description_clause_record) state 1543 503 file_description_clause_value: VALUE OF FILE_ID is_opt filename . $default reduce using rule 503 (file_description_clause_value) state 1544 458 array_options: OCCURS integer TO integer times_opt . DEPENDING $@48 on_opt gname $@49 indexed_by_opt DEPENDING shift, and go to state 1656 state 1545 459 key_is_opt: DIRECTION . key_opt is_opt STRING KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1657 state 1546 461 indexed_by_opt: key_is_opt . INDEXED by_opt index_name_list INDEXED shift, and go to state 1658 state 1547 455 array_options: OCCURS integer times_opt $@47 indexed_by_opt . $default reduce using rule 455 (array_options) state 1548 480 pic_elem: CHAR . multiplier_opt MULTIPLIER shift, and go to state 1659 $default reduce using rule 481 (multiplier_opt) multiplier_opt go to state 1660 state 1549 479 picture: picture pic_elem . $default reduce using rule 479 (picture) state 1550 453 thru_gname_opt: THRU variable . $default reduce using rule 453 (thru_gname_opt) state 1551 212 limit_is_are_opt: LIMIT IS . $default reduce using rule 212 (limit_is_are_opt) state 1552 213 limit_is_are_opt: LIMITS ARE . $default reduce using rule 213 (limit_is_are_opt) state 1553 202 report_controls_page: PAGE limit_is_are_opt integer . line_lines_opt heading_opt first_detail_opt last_detail_opt footing_opt LINE shift, and go to state 1341 LINES shift, and go to state 1342 $default reduce using rule 207 (lines_opt) line_lines_opt go to state 1661 lines_opt go to state 1344 state 1554 194 report_section: RD $@15 STRING $@16 report_controls PERIOD_TOK $@17 report_description . 225 report_description: report_description . report_item NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 $default reduce using rule 194 (report_section) report_item go to state 1662 signed_nliteral go to state 234 integer go to state 1556 state 1555 224 report_description: report_item . $default reduce using rule 224 (report_description) state 1556 227 report_item: integer . def_name_opt $@18 report_clauses PERIOD_TOK STRING shift, and go to state 368 FILLER shift, and go to state 369 $default reduce using rule 1274 (def_name_opt) def_name_opt go to state 1663 def_name go to state 381 state 1557 201 report_controls_control: control_is_are final_opt report_break_list . 223 report_break_list: report_break_list . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 201 (report_controls_control) name go to state 1664 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1558 348 screen_source_destination: TO $@37 . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1665 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1559 329 screen_clauses: screen_clauses COLUMN $@30 . number_is_opt plus_minus_opt name_or_lit NUMBER shift, and go to state 1666 $default reduce using rule 415 (number_is_opt) number_is_opt go to state 1667 state 1560 346 screen_source_destination: FROM $@36 . name_or_lit screen_to_name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1668 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1561 327 screen_clauses: screen_clauses LINE $@29 . number_is_opt plus_minus_opt name_or_lit NUMBER shift, and go to state 1666 $default reduce using rule 415 (number_is_opt) number_is_opt go to state 1669 state 1562 341 screen_clauses: screen_clauses SIZE $@34 . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1670 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1563 344 screen_source_destination: USING $@35 . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1671 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1564 338 screen_clauses: screen_clauses value_is_are gliteral . $default reduce using rule 338 (screen_clauses) state 1565 361 screen_attrib: AUTO . $default reduce using rule 361 (screen_attrib) state 1566 334 screen_clauses: screen_clauses with_opt BACKGROUNDCOLOR . $@32 name_or_lit $default reduce using rule 333 ($@32) $@32 go to state 1672 state 1567 351 screen_attrib: BLANK . SCREEN 352 | BLANK . LINE 369 | BLANK . when_opt ZERO LINE shift, and go to state 1673 SCREEN shift, and go to state 1674 WHEN shift, and go to state 1138 $default reduce using rule 543 (when_opt) when_opt go to state 1675 state 1568 364 screen_attrib: BLINK . $default reduce using rule 364 (screen_attrib) state 1569 336 screen_clauses: screen_clauses with_opt COLOR . $@33 name_or_lit $default reduce using rule 335 ($@33) $@33 go to state 1676 state 1570 353 screen_attrib: ERASE . EOL 354 | ERASE . EOS 355 | ERASE . EOL shift, and go to state 1677 EOS shift, and go to state 1678 $default reduce using rule 355 (screen_attrib) state 1571 332 screen_clauses: screen_clauses with_opt FOREGROUNDCOLOR . $@31 name_or_lit $default reduce using rule 331 ($@31) $@31 go to state 1679 state 1572 358 screen_attrib: FULL . $default reduce using rule 358 (screen_attrib) state 1573 368 screen_attrib: HIGHLIGHT . $default reduce using rule 368 (screen_attrib) state 1574 362 screen_attrib: JUSTIFIED . RIGHT 363 | JUSTIFIED . LEFT LEFT shift, and go to state 1680 RIGHT shift, and go to state 1681 state 1575 374 screen_attrib: LOWER . $default reduce using rule 374 (screen_attrib) state 1576 367 screen_attrib: LOWLIGHT . $default reduce using rule 367 (screen_attrib) state 1577 359 screen_attrib: REQUIRED . $default reduce using rule 359 (screen_attrib) state 1578 365 screen_attrib: REVERSEVIDEO . $default reduce using rule 365 (screen_attrib) state 1579 360 screen_attrib: SECURE . $default reduce using rule 360 (screen_attrib) state 1580 366 screen_attrib: UNDERLINE . $default reduce using rule 366 (screen_attrib) state 1581 373 screen_attrib: UPPER . $default reduce using rule 373 (screen_attrib) state 1582 330 screen_clauses: screen_clauses with_opt screen_attrib . $default reduce using rule 330 (screen_clauses) state 1583 357 screen_attrib: sign_clause . $default reduce using rule 357 (screen_attrib) state 1584 356 screen_attrib: with_opt . BELL 370 | with_opt . NOECHO 371 | with_opt . UPDATE 372 | with_opt . NO ADVANCING NO shift, and go to state 1682 BELL shift, and go to state 1683 NOECHO shift, and go to state 1684 UPDATE shift, and go to state 1685 state 1585 584 use_phrase: USE AFTER use_phrase_exception_error PROCEDURE on_opt use_phrase_option PERIOD_TOK . $default reduce using rule 584 (use_phrase) state 1586 909 read_key_opt: KEY is_opt name . $default reduce using rule 909 (read_key_opt) state 1587 925 read_not_invalid_key: NOT INVALID . key_opt @100 statement_list KEY shift, and go to state 846 $default reduce using rule 1216 (key_opt) key_opt go to state 1686 state 1588 923 read_invalid_key: INVALID key_opt . @99 statement_list $default reduce using rule 922 (@99) @99 go to state 1687 state 1589 925 read_not_invalid_key: NOT . INVALID key_opt @100 statement_list INVALID shift, and go to state 1587 state 1590 921 read_invalid_key_opt: read_invalid_key read_not_invalid_key . $default reduce using rule 921 (read_invalid_key_opt) state 1591 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION $@93 variable @94 statement_list . $@95 end_accept_opt $default reduce using rule 835 ($@95) $@95 go to state 1688 state 1592 1003 on_size_error: ERROR_TOK @116 statement_list . $default reduce using rule 1003 (on_size_error) state 1593 1001 on_size_error_opt: on_opt SIZE on_size_error NOT on_opt . SIZE $@115 on_size_error SIZE shift, and go to state 1689 state 1594 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 @107 @108 . on_exception_or_overflow on_not_exception $@109 end_call_opt ON shift, and go to state 620 EXCEPTION reduce using rule 1235 (on_opt) OVERFLOW_TOK reduce using rule 1235 (on_opt) $default reduce using rule 1049 (on_exception_or_overflow) on_exception_or_overflow go to state 1690 on_opt go to state 1357 state 1595 1133 parm_list: parm_list sep_opt . parameter VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 BY shift, and go to state 854 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 $default reduce using rule 1231 (by_opt) parameter go to state 1691 by_opt go to state 1483 gname go to state 1484 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1596 1139 parm_type: CONTENT . $default reduce using rule 1139 (parm_type) state 1597 1137 parm_type: REFERENCE . $default reduce using rule 1137 (parm_type) state 1598 1138 parm_type: VALUE . $default reduce using rule 1138 (parm_type) state 1599 1136 parameter: by_opt parm_type . gname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1692 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1600 1009 end_chain_opt: END_CHAIN . $default reduce using rule 1009 (end_chain_opt) state 1601 981 chain_statement: CHAIN $@111 gname using_options @112 @113 on_exception_or_overflow $@114 end_chain_opt . $default reduce using rule 981 (chain_statement) state 1602 1048 on_exception_or_overflow: on_opt exception_or_overflow @120 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1693 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1603 816 divide_body: gname BY gname GIVING name rounded_opt REMAINDER name . on_size_error_opt NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1694 on_opt go to state 987 state 1604 817 divide_body: gname INTO gname GIVING name rounded_opt REMAINDER name . on_size_error_opt NOT shift, and go to state 985 ON shift, and go to state 620 NOT [reduce using rule 997 (on_size_error_opt)] SIZE reduce using rule 1235 (on_opt) $default reduce using rule 997 (on_size_error_opt) on_size_error_opt go to state 1695 on_opt go to state 987 state 1605 673 when_case: when_case ALSO . @72 selection_object $default reduce using rule 672 (@72) @72 go to state 1696 state 1606 665 when_case_list: WHEN @66 @67 when_case sentence_or_nothing . $default reduce using rule 665 (when_case_list) state 1607 682 sentence_or_nothing: conditional_statement . $default reduce using rule 682 (sentence_or_nothing) state 1608 690 not_opt: NOT . $default reduce using rule 690 (not_opt) state 1609 675 selection_object: ANY . $default reduce using rule 675 (selection_object) state 1610 677 selection_object: FALSE_TOK . $default reduce using rule 677 (selection_object) state 1611 676 selection_object: TRUE_TOK . $default reduce using rule 676 (selection_object) state 1612 671 when_case: @71 selection_object . $default reduce using rule 671 (when_case) state 1613 678 selection_object: not_opt . expr 679 | not_opt . expr THRU expr 680 | not_opt . cond_name VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 1697 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 1698 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1614 669 when_case_list: when_case_list WHEN @68 @69 when_case . $@70 sentence_or_nothing 673 when_case: when_case . ALSO @72 selection_object ALSO shift, and go to state 1605 $default reduce using rule 668 ($@70) $@70 go to state 1699 state 1615 1111 initial_opt: INITIAL_TOK . $default reduce using rule 1111 (initial_opt) state 1616 1109 inspect_before_after: inspect_before_after AFTER initial_opt . noallname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 1700 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1617 1108 inspect_before_after: inspect_before_after BEFORE initial_opt . noallname VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 1701 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1618 1094 tallying_for_list: tallying_for_list ALL noallname . inspect_before_after $default reduce using rule 1110 (inspect_before_after) inspect_before_after go to state 1702 state 1619 1093 tallying_for_list: tallying_for_list CHARACTERS inspect_before_after . 1108 inspect_before_after: inspect_before_after . BEFORE initial_opt noallname 1109 | inspect_before_after . AFTER initial_opt noallname AFTER shift, and go to state 1495 BEFORE shift, and go to state 1496 $default reduce using rule 1093 (tallying_for_list) state 1620 1095 tallying_for_list: tallying_for_list LEADING noallname . inspect_before_after $default reduce using rule 1110 (inspect_before_after) inspect_before_after go to state 1703 state 1621 1099 replacing_list: replacing_list CHARACTERS BY noallname . inspect_before_after $default reduce using rule 1110 (inspect_before_after) inspect_before_after go to state 1704 state 1622 1102 replacing_by_list: replacing_by_list noallname . BY noallname inspect_before_after BY shift, and go to state 1705 state 1623 769 sort_file_list: sort_file_list name . $default reduce using rule 769 (sort_file_list) state 1624 767 sort_output: GIVING . sort_file_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 sort_file_list go to state 1706 name go to state 1503 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1625 766 sort_output: OUTPUT . PROCEDURE is_opt perform_range PROCEDURE shift, and go to state 1707 state 1626 740 merge_statement: MERGE name sort_keys $@86 sort_collating_opt $@87 merge_using $@88 sort_output . $default reduce using rule 740 (merge_statement) state 1627 1151 perform_options: with_test_opt UNTIL @131 condition @132 perform_statements $@133 END_PERFORM . $default reduce using rule 1151 (perform_options) state 1628 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL . @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM $default reduce using rule 1152 (@134) @134 go to state 1708 state 1629 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt . gname UNTIL @138 condition @139 perform_after_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1709 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1630 914 read_at_end_opt: AT on_end NOT at_opt $@96 . on_end END shift, and go to state 1050 on_end go to state 1710 state 1631 916 read_at_end_opt: on_end NOT at_opt $@97 on_end . $default reduce using rule 916 (read_at_end_opt) state 1632 718 search_all_when: WHEN $@83 search_all_when_conditional . @84 search_all_when_statement 724 search_all_when_conditional: search_all_when_conditional . AND @85 search_all_when_conditional AND shift, and go to state 1711 $default reduce using rule 717 (@84) @84 go to state 1712 state 1633 721 search_all_when_conditional: variable . is_opt CONDITIONAL to_opt variable 722 | variable . is_opt CONDITIONAL to_opt literal IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1713 state 1634 710 search_when: WHEN search_when_conditional . @82 search_when_statement $default reduce using rule 709 (@82) @82 go to state 1714 state 1635 713 search_when_conditional: name_or_lit . extended_cond_op name_or_lit CONDITIONAL shift, and go to state 591 IS shift, and go to state 592 NOT shift, and go to state 598 ALPHABETIC shift, and go to state 599 ALPHABETIC_LOWER shift, and go to state 600 ALPHABETIC_UPPER shift, and go to state 601 NEGATIVE shift, and go to state 602 NUMERIC shift, and go to state 603 POSITIVE shift, and go to state 604 ZERO shift, and go to state 605 sign_condition go to state 606 class_condition go to state 607 extended_cond_op go to state 1715 ext_cond go to state 609 conditional go to state 610 state 1636 708 search_when_list: search_when_list search_when . $default reduce using rule 708 (search_when_list) state 1637 764 sort_input: INPUT PROCEDURE . is_opt perform_range IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1716 state 1638 765 sort_input: USING sort_file_list . 769 sort_file_list: sort_file_list . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 765 (sort_input) name go to state 1623 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1639 747 sort_file: SORT name sort_keys $@89 sort_duplicates_opt sort_collating_opt $@90 sort_input $@91 . sort_output GIVING shift, and go to state 1624 OUTPUT shift, and go to state 1625 sort_output go to state 1717 state 1640 1046 on_overflow_opt: $@119 on_overflow on_not_overflow . $default reduce using rule 1046 (on_overflow_opt) state 1641 1059 on_not_overflow: not_excep . on_opt OVERFLOW_TOK @123 statement_list ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1718 state 1642 1056 on_overflow: on_opt OVERFLOW_TOK . @122 statement_list $default reduce using rule 1055 (@122) @122 go to state 1719 state 1643 1042 unstring_tallying: TALLYING in_opt name . $default reduce using rule 1042 (unstring_tallying) state 1644 1029 unstring_statement: UNSTRING name unstring_delimited INTO unstring_destinations string_with_pointer unstring_tallying $@118 on_overflow_opt . end_unstring_opt END_UNSTRING shift, and go to state 1720 END_UNSTRING [reduce using rule 1083 (end_unstring_opt)] $default reduce using rule 1083 (end_unstring_opt) end_unstring_opt go to state 1721 state 1645 1040 unstring_count_opt: COUNT in_opt name . $default reduce using rule 1040 (unstring_count_opt) state 1646 112 select_clause: ALTERNATE RECORD key_opt is_opt STRING with_duplicates . $default reduce using rule 112 (select_clause) state 1647 124 with_duplicates: with_opt . DUPLICATES DUPLICATES shift, and go to state 1722 state 1648 517 lines_at_opt: AT . $default reduce using rule 517 (lines_at_opt) state 1649 515 lines_at_opt: LINES . 516 | LINES . AT AT shift, and go to state 1723 $default reduce using rule 515 (lines_at_opt) state 1650 507 file_description_clause_linage: LINAGE is_opt data_name lines_opt file_description_clause_linage_footing file_description_clause_linage_top . file_description_clause_linage_bottom AT shift, and go to state 1648 LINES shift, and go to state 1649 BOTTOM reduce using rule 514 (lines_at_opt) $default reduce using rule 512 (file_description_clause_linage_bottom) file_description_clause_linage_bottom go to state 1724 lines_at_opt go to state 1725 state 1651 511 file_description_clause_linage_top: lines_at_opt . TOP data_name TOP shift, and go to state 1726 state 1652 509 file_description_clause_linage_footing: with_opt FOOTING . at_opt data_name AT shift, and go to state 1054 $default reduce using rule 1225 (at_opt) at_opt go to state 1727 state 1653 531 from_opt: FROM . $default reduce using rule 531 (from_opt) state 1654 501 file_description_clause_record: RECORD is_opt VARYING in_opt size_opt from_rec_varying . to_rec_varying character_opts depend_rec_varying TO shift, and go to state 1432 $default reduce using rule 533 (to_rec_varying) to_rec_varying go to state 1728 state 1655 530 from_rec_varying: from_opt . nliteral NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 nliteral go to state 1729 signed_nliteral go to state 1069 state 1656 458 array_options: OCCURS integer TO integer times_opt DEPENDING . $@48 on_opt gname $@49 indexed_by_opt $default reduce using rule 456 ($@48) $@48 go to state 1730 state 1657 459 key_is_opt: DIRECTION key_opt . is_opt STRING IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1731 state 1658 461 indexed_by_opt: key_is_opt INDEXED . by_opt index_name_list BY shift, and go to state 854 $default reduce using rule 1231 (by_opt) by_opt go to state 1732 state 1659 482 multiplier_opt: MULTIPLIER . $default reduce using rule 482 (multiplier_opt) state 1660 480 pic_elem: CHAR multiplier_opt . $default reduce using rule 480 (pic_elem) state 1661 202 report_controls_page: PAGE limit_is_are_opt integer line_lines_opt . heading_opt first_detail_opt last_detail_opt footing_opt HEADING shift, and go to state 1733 $default reduce using rule 203 (heading_opt) heading_opt go to state 1734 state 1662 225 report_description: report_description report_item . $default reduce using rule 225 (report_description) state 1663 227 report_item: integer def_name_opt . $@18 report_clauses PERIOD_TOK $default reduce using rule 226 ($@18) $@18 go to state 1735 state 1664 223 report_break_list: report_break_list name . $default reduce using rule 223 (report_break_list) state 1665 348 screen_source_destination: TO $@37 name . $default reduce using rule 348 (screen_source_destination) state 1666 414 number_is_opt: NUMBER . is_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1736 state 1667 329 screen_clauses: screen_clauses COLUMN $@30 number_is_opt . plus_minus_opt name_or_lit '+' shift, and go to state 1737 '-' shift, and go to state 1738 MINUS shift, and go to state 1739 PLUS shift, and go to state 1740 '+' [reduce using rule 413 (plus_minus_opt)] '-' [reduce using rule 413 (plus_minus_opt)] $default reduce using rule 413 (plus_minus_opt) plus_minus_opt go to state 1741 state 1668 346 screen_source_destination: FROM $@36 name_or_lit . screen_to_name TO shift, and go to state 1742 TO [reduce using rule 349 (screen_to_name)] $default reduce using rule 349 (screen_to_name) screen_to_name go to state 1743 state 1669 327 screen_clauses: screen_clauses LINE $@29 number_is_opt . plus_minus_opt name_or_lit '+' shift, and go to state 1737 '-' shift, and go to state 1738 MINUS shift, and go to state 1739 PLUS shift, and go to state 1740 '+' [reduce using rule 413 (plus_minus_opt)] '-' [reduce using rule 413 (plus_minus_opt)] $default reduce using rule 413 (plus_minus_opt) plus_minus_opt go to state 1744 state 1670 341 screen_clauses: screen_clauses SIZE $@34 name_or_lit . $default reduce using rule 341 (screen_clauses) state 1671 344 screen_source_destination: USING $@35 name_or_lit . $default reduce using rule 344 (screen_source_destination) state 1672 334 screen_clauses: screen_clauses with_opt BACKGROUNDCOLOR $@32 . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1745 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1673 352 screen_attrib: BLANK LINE . $default reduce using rule 352 (screen_attrib) state 1674 351 screen_attrib: BLANK SCREEN . $default reduce using rule 351 (screen_attrib) state 1675 369 screen_attrib: BLANK when_opt . ZERO ZERO shift, and go to state 1746 state 1676 336 screen_clauses: screen_clauses with_opt COLOR $@33 . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1747 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1677 353 screen_attrib: ERASE EOL . $default reduce using rule 353 (screen_attrib) state 1678 354 screen_attrib: ERASE EOS . $default reduce using rule 354 (screen_attrib) state 1679 332 screen_clauses: screen_clauses with_opt FOREGROUNDCOLOR $@31 . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1748 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1680 363 screen_attrib: JUSTIFIED LEFT . $default reduce using rule 363 (screen_attrib) state 1681 362 screen_attrib: JUSTIFIED RIGHT . $default reduce using rule 362 (screen_attrib) state 1682 372 screen_attrib: with_opt NO . ADVANCING ADVANCING shift, and go to state 1749 state 1683 356 screen_attrib: with_opt BELL . $default reduce using rule 356 (screen_attrib) state 1684 370 screen_attrib: with_opt NOECHO . $default reduce using rule 370 (screen_attrib) state 1685 371 screen_attrib: with_opt UPDATE . $default reduce using rule 371 (screen_attrib) state 1686 925 read_not_invalid_key: NOT INVALID key_opt . @100 statement_list $default reduce using rule 924 (@100) @100 go to state 1750 state 1687 923 read_invalid_key: INVALID key_opt @99 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1751 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1688 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION $@93 variable @94 statement_list $@95 . end_accept_opt END_ACCEPT shift, and go to state 725 END_ACCEPT [reduce using rule 837 (end_accept_opt)] $default reduce using rule 837 (end_accept_opt) end_accept_opt go to state 1752 state 1689 1001 on_size_error_opt: on_opt SIZE on_size_error NOT on_opt SIZE . $@115 on_size_error $default reduce using rule 1000 ($@115) $@115 go to state 1753 state 1690 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 @107 @108 on_exception_or_overflow . on_not_exception $@109 end_call_opt NOT shift, and go to state 1754 NOT [reduce using rule 1054 (on_not_exception)] $default reduce using rule 1054 (on_not_exception) on_not_exception go to state 1755 state 1691 1133 parm_list: parm_list sep_opt parameter . $default reduce using rule 1133 (parm_list) state 1692 1136 parameter: by_opt parm_type gname . $default reduce using rule 1136 (parameter) state 1693 1048 on_exception_or_overflow: on_opt exception_or_overflow @120 statement_list . $default reduce using rule 1048 (on_exception_or_overflow) state 1694 816 divide_body: gname BY gname GIVING name rounded_opt REMAINDER name on_size_error_opt . $default reduce using rule 816 (divide_body) state 1695 817 divide_body: gname INTO gname GIVING name rounded_opt REMAINDER name on_size_error_opt . $default reduce using rule 817 (divide_body) state 1696 673 when_case: when_case ALSO @72 . selection_object NOT shift, and go to state 1608 ANY shift, and go to state 1609 FALSE_TOK shift, and go to state 1610 TRUE_TOK shift, and go to state 1611 $default reduce using rule 689 (not_opt) selection_object go to state 1756 not_opt go to state 1613 state 1697 678 selection_object: not_opt expr . 679 | not_opt expr . THRU expr 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr THRU shift, and go to state 1757 '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 678 (selection_object) state 1698 680 selection_object: not_opt cond_name . $default reduce using rule 680 (selection_object) state 1699 669 when_case_list: when_case_list WHEN @68 @69 when_case $@70 . sentence_or_nothing END_EVALUATE reduce using rule 681 (sentence_or_nothing) NEXT reduce using rule 687 ($@75) WHEN reduce using rule 681 (sentence_or_nothing) PERIOD_TOK reduce using rule 681 (sentence_or_nothing) $default reduce using rule 685 ($@74) sentence_or_nothing go to state 1758 conditional_statement go to state 1607 $@74 go to state 862 $@75 go to state 863 state 1700 1109 inspect_before_after: inspect_before_after AFTER initial_opt noallname . $default reduce using rule 1109 (inspect_before_after) state 1701 1108 inspect_before_after: inspect_before_after BEFORE initial_opt noallname . $default reduce using rule 1108 (inspect_before_after) state 1702 1094 tallying_for_list: tallying_for_list ALL noallname inspect_before_after . 1108 inspect_before_after: inspect_before_after . BEFORE initial_opt noallname 1109 | inspect_before_after . AFTER initial_opt noallname AFTER shift, and go to state 1495 BEFORE shift, and go to state 1496 $default reduce using rule 1094 (tallying_for_list) state 1703 1095 tallying_for_list: tallying_for_list LEADING noallname inspect_before_after . 1108 inspect_before_after: inspect_before_after . BEFORE initial_opt noallname 1109 | inspect_before_after . AFTER initial_opt noallname AFTER shift, and go to state 1495 BEFORE shift, and go to state 1496 $default reduce using rule 1095 (tallying_for_list) state 1704 1099 replacing_list: replacing_list CHARACTERS BY noallname inspect_before_after . 1108 inspect_before_after: inspect_before_after . BEFORE initial_opt noallname 1109 | inspect_before_after . AFTER initial_opt noallname AFTER shift, and go to state 1495 BEFORE shift, and go to state 1496 $default reduce using rule 1099 (replacing_list) state 1705 1102 replacing_by_list: replacing_by_list noallname BY . noallname inspect_before_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 noallname go to state 1759 without_all_literal go to state 806 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 807 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1706 767 sort_output: GIVING sort_file_list . 769 sort_file_list: sort_file_list . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 $default reduce using rule 767 (sort_output) name go to state 1623 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1707 766 sort_output: OUTPUT PROCEDURE . is_opt perform_range IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1760 state 1708 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 . condition @135 perform_after_opt perform_statements $@136 END_PERFORM VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 1761 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1709 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname . UNTIL @138 condition @139 perform_after_opt UNTIL shift, and go to state 1762 state 1710 914 read_at_end_opt: AT on_end NOT at_opt $@96 on_end . $default reduce using rule 914 (read_at_end_opt) state 1711 724 search_all_when_conditional: search_all_when_conditional AND . @85 search_all_when_conditional $default reduce using rule 723 (@85) @85 go to state 1763 state 1712 718 search_all_when: WHEN $@83 search_all_when_conditional @84 . search_all_when_statement READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 NEXT shift, and go to state 1764 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1765 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 search_all_when_statement go to state 1766 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1713 721 search_all_when_conditional: variable is_opt . CONDITIONAL to_opt variable 722 | variable is_opt . CONDITIONAL to_opt literal CONDITIONAL shift, and go to state 1767 state 1714 710 search_when: WHEN search_when_conditional @82 . search_when_statement READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 NEXT shift, and go to state 1768 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1769 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 search_when_statement go to state 1770 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1715 713 search_when_conditional: name_or_lit extended_cond_op . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1771 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1716 764 sort_input: INPUT PROCEDURE is_opt . perform_range LABELSTR shift, and go to state 582 NLITERAL shift, and go to state 583 perform_range go to state 1772 label go to state 1773 state 1717 747 sort_file: SORT name sort_keys $@89 sort_duplicates_opt sort_collating_opt $@90 sort_input $@91 sort_output . $default reduce using rule 747 (sort_file) state 1718 1059 on_not_overflow: not_excep on_opt . OVERFLOW_TOK @123 statement_list OVERFLOW_TOK shift, and go to state 1774 state 1719 1056 on_overflow: on_opt OVERFLOW_TOK @122 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1775 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1720 1084 end_unstring_opt: END_UNSTRING . $default reduce using rule 1084 (end_unstring_opt) state 1721 1029 unstring_statement: UNSTRING name unstring_delimited INTO unstring_destinations string_with_pointer unstring_tallying $@118 on_overflow_opt end_unstring_opt . $default reduce using rule 1029 (unstring_statement) state 1722 124 with_duplicates: with_opt DUPLICATES . $default reduce using rule 124 (with_duplicates) state 1723 516 lines_at_opt: LINES AT . $default reduce using rule 516 (lines_at_opt) state 1724 507 file_description_clause_linage: LINAGE is_opt data_name lines_opt file_description_clause_linage_footing file_description_clause_linage_top file_description_clause_linage_bottom . $default reduce using rule 507 (file_description_clause_linage) state 1725 513 file_description_clause_linage_bottom: lines_at_opt . BOTTOM data_name BOTTOM shift, and go to state 1776 state 1726 511 file_description_clause_linage_top: lines_at_opt TOP . data_name STRING shift, and go to state 1298 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1299 signed_nliteral go to state 77 data_name go to state 1777 state 1727 509 file_description_clause_linage_footing: with_opt FOOTING at_opt . data_name STRING shift, and go to state 1298 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1299 signed_nliteral go to state 77 data_name go to state 1778 state 1728 501 file_description_clause_record: RECORD is_opt VARYING in_opt size_opt from_rec_varying to_rec_varying . character_opts depend_rec_varying CHARACTERS shift, and go to state 1541 $default reduce using rule 547 (character_opts) character_opts go to state 1779 state 1729 530 from_rec_varying: from_opt nliteral . $default reduce using rule 530 (from_rec_varying) state 1730 458 array_options: OCCURS integer TO integer times_opt DEPENDING $@48 . on_opt gname $@49 indexed_by_opt ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1780 state 1731 459 key_is_opt: DIRECTION key_opt is_opt . STRING STRING shift, and go to state 1781 state 1732 461 indexed_by_opt: key_is_opt INDEXED by_opt . index_name_list STRING shift, and go to state 368 FILLER shift, and go to state 369 index_name_list go to state 1782 def_name go to state 1783 state 1733 204 heading_opt: HEADING . is_opt integer IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1784 state 1734 202 report_controls_page: PAGE limit_is_are_opt integer line_lines_opt heading_opt . first_detail_opt last_detail_opt footing_opt FIRST shift, and go to state 1785 $default reduce using rule 218 (first_detail_opt) first_detail_opt go to state 1786 state 1735 227 report_item: integer def_name_opt $@18 . report_clauses PERIOD_TOK BLANK shift, and go to state 1787 COLUMN shift, and go to state 1788 COLUMNS shift, and go to state 1789 DISPLAY shift, and go to state 1790 GROUP shift, and go to state 1791 JUSTIFIED shift, and go to state 1792 LEADING shift, and go to state 1793 LINE shift, and go to state 1794 LINES shift, and go to state 1795 NEXT shift, and go to state 1796 PICTURE shift, and go to state 1797 SIGN shift, and go to state 1798 SOURCE shift, and go to state 1799 SUM shift, and go to state 1800 TRAILING shift, and go to state 1801 TYPE shift, and go to state 1802 USAGE shift, and go to state 1803 VALUE shift, and go to state 1804 BLANK [reduce using rule 296 (report_clause_group_indicate)] COLUMN [reduce using rule 296 (report_clause_group_indicate)] COLUMNS [reduce using rule 296 (report_clause_group_indicate)] DISPLAY [reduce using rule 296 (report_clause_group_indicate)] GROUP [reduce using rule 296 (report_clause_group_indicate)] JUSTIFIED [reduce using rule 296 (report_clause_group_indicate)] LEADING [reduce using rule 296 (report_clause_group_indicate)] LINE [reduce using rule 296 (report_clause_group_indicate)] LINES [reduce using rule 296 (report_clause_group_indicate)] NEXT [reduce using rule 296 (report_clause_group_indicate)] PICTURE [reduce using rule 296 (report_clause_group_indicate)] SIGN [reduce using rule 296 (report_clause_group_indicate)] SOURCE [reduce using rule 296 (report_clause_group_indicate)] SUM [reduce using rule 296 (report_clause_group_indicate)] TRAILING [reduce using rule 296 (report_clause_group_indicate)] TYPE [reduce using rule 296 (report_clause_group_indicate)] USAGE [reduce using rule 296 (report_clause_group_indicate)] VALUE [reduce using rule 296 (report_clause_group_indicate)] $default reduce using rule 296 (report_clause_group_indicate) report_clauses go to state 1805 report_clause go to state 1806 report_clause_type go to state 1807 report_clause_sign_is go to state 1808 report_clause_picture go to state 1809 report_clause_usage_display go to state 1810 report_clause_justified go to state 1811 report_clause_next_group go to state 1812 report_clause_line go to state 1813 report_clause_line_is go to state 1814 report_clause_column go to state 1815 report_clause_column_is go to state 1816 report_clause_svs go to state 1817 report_clause_group_indicate go to state 1818 report_clause_blank_zero go to state 1819 leading_trailing go to state 1820 state 1736 414 number_is_opt: NUMBER is_opt . $default reduce using rule 414 (number_is_opt) state 1737 410 plus_minus_opt: '+' . $default reduce using rule 410 (plus_minus_opt) state 1738 412 plus_minus_opt: '-' . $default reduce using rule 412 (plus_minus_opt) state 1739 411 plus_minus_opt: MINUS . $default reduce using rule 411 (plus_minus_opt) state 1740 409 plus_minus_opt: PLUS . $default reduce using rule 409 (plus_minus_opt) state 1741 329 screen_clauses: screen_clauses COLUMN $@30 number_is_opt plus_minus_opt . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1821 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1742 350 screen_to_name: TO . name VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 name go to state 1822 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1743 346 screen_source_destination: FROM $@36 name_or_lit screen_to_name . $default reduce using rule 346 (screen_source_destination) state 1744 327 screen_clauses: screen_clauses LINE $@29 number_is_opt plus_minus_opt . name_or_lit VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 name_or_lit go to state 1823 literal go to state 1065 signed_nliteral go to state 77 name go to state 1066 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1745 334 screen_clauses: screen_clauses with_opt BACKGROUNDCOLOR $@32 name_or_lit . $default reduce using rule 334 (screen_clauses) state 1746 369 screen_attrib: BLANK when_opt ZERO . $default reduce using rule 369 (screen_attrib) state 1747 336 screen_clauses: screen_clauses with_opt COLOR $@33 name_or_lit . $default reduce using rule 336 (screen_clauses) state 1748 332 screen_clauses: screen_clauses with_opt FOREGROUNDCOLOR $@31 name_or_lit . $default reduce using rule 332 (screen_clauses) state 1749 372 screen_attrib: with_opt NO ADVANCING . $default reduce using rule 372 (screen_attrib) state 1750 925 read_not_invalid_key: NOT INVALID key_opt @100 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1824 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1751 923 read_invalid_key: INVALID key_opt @99 statement_list . $default reduce using rule 923 (read_invalid_key) state 1752 836 accept_screen: ACCEPT name accept_display_options on_opt EXCEPTION $@93 variable @94 statement_list $@95 end_accept_opt . $default reduce using rule 836 (accept_screen) state 1753 1001 on_size_error_opt: on_opt SIZE on_size_error NOT on_opt SIZE $@115 . on_size_error ERROR_TOK shift, and go to state 1350 on_size_error go to state 1825 state 1754 1053 on_not_exception: NOT . on_opt EXCEPTION @121 statement_list ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1826 state 1755 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception . $@109 end_call_opt $default reduce using rule 966 ($@109) $@109 go to state 1827 state 1756 673 when_case: when_case ALSO @72 selection_object . $default reduce using rule 673 (when_case) state 1757 679 selection_object: not_opt expr THRU . expr VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 752 expr go to state 1828 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1758 669 when_case_list: when_case_list WHEN @68 @69 when_case $@70 sentence_or_nothing . $default reduce using rule 669 (when_case_list) state 1759 1102 replacing_by_list: replacing_by_list noallname BY noallname . inspect_before_after $default reduce using rule 1110 (inspect_before_after) inspect_before_after go to state 1829 state 1760 766 sort_output: OUTPUT PROCEDURE is_opt . perform_range LABELSTR shift, and go to state 582 NLITERAL shift, and go to state 583 perform_range go to state 1830 label go to state 1773 state 1761 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 condition . @135 perform_after_opt perform_statements $@136 END_PERFORM 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition OR shift, and go to state 611 AND shift, and go to state 612 $default reduce using rule 1153 (@135) @135 go to state 1831 state 1762 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname UNTIL . @138 condition @139 perform_after_opt $default reduce using rule 1160 (@138) @138 go to state 1832 state 1763 724 search_all_when_conditional: search_all_when_conditional AND @85 . search_all_when_conditional VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 search_all_when_conditional go to state 1833 variable go to state 1633 qualified_var go to state 80 unqualified_var go to state 81 state 1764 720 search_all_when_statement: NEXT . SENTENCE SENTENCE shift, and go to state 1834 state 1765 719 search_all_when_statement: statement_list . $default reduce using rule 719 (search_all_when_statement) state 1766 718 search_all_when: WHEN $@83 search_all_when_conditional @84 search_all_when_statement . $default reduce using rule 718 (search_all_when) state 1767 721 search_all_when_conditional: variable is_opt CONDITIONAL . to_opt variable 722 | variable is_opt CONDITIONAL . to_opt literal TO shift, and go to state 420 $default reduce using rule 1239 (to_opt) to_opt go to state 1835 state 1768 712 search_when_statement: NEXT . SENTENCE SENTENCE shift, and go to state 1836 state 1769 711 search_when_statement: statement_list . $default reduce using rule 711 (search_when_statement) state 1770 710 search_when: WHEN search_when_conditional @82 search_when_statement . $default reduce using rule 710 (search_when) state 1771 713 search_when_conditional: name_or_lit extended_cond_op name_or_lit . $default reduce using rule 713 (search_when_conditional) state 1772 764 sort_input: INPUT PROCEDURE is_opt perform_range . $default reduce using rule 764 (sort_input) state 1773 1143 perform_range: label . perform_thru_opt THRU shift, and go to state 643 $default reduce using rule 1163 (perform_thru_opt) perform_thru_opt go to state 1837 state 1774 1059 on_not_overflow: not_excep on_opt OVERFLOW_TOK . @123 statement_list $default reduce using rule 1058 (@123) @123 go to state 1838 state 1775 1056 on_overflow: on_opt OVERFLOW_TOK @122 statement_list . $default reduce using rule 1056 (on_overflow) state 1776 513 file_description_clause_linage_bottom: lines_at_opt BOTTOM . data_name STRING shift, and go to state 1298 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1299 signed_nliteral go to state 77 data_name go to state 1839 state 1777 511 file_description_clause_linage_top: lines_at_opt TOP data_name . $default reduce using rule 511 (file_description_clause_linage_top) state 1778 509 file_description_clause_linage_footing: with_opt FOOTING at_opt data_name . $default reduce using rule 509 (file_description_clause_linage_footing) state 1779 501 file_description_clause_record: RECORD is_opt VARYING in_opt size_opt from_rec_varying to_rec_varying character_opts . depend_rec_varying DEPENDING shift, and go to state 1840 $default reduce using rule 527 (depend_rec_varying) depend_rec_varying go to state 1841 state 1780 458 array_options: OCCURS integer TO integer times_opt DEPENDING $@48 on_opt . gname $@49 indexed_by_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1842 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1781 459 key_is_opt: DIRECTION key_opt is_opt STRING . $default reduce using rule 459 (key_is_opt) state 1782 461 indexed_by_opt: key_is_opt INDEXED by_opt index_name_list . 464 index_name_list: index_name_list . def_name STRING shift, and go to state 368 FILLER shift, and go to state 369 $default reduce using rule 461 (indexed_by_opt) def_name go to state 1843 state 1783 463 index_name_list: def_name . $default reduce using rule 463 (index_name_list) state 1784 204 heading_opt: HEADING is_opt . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1844 state 1785 219 first_detail_opt: FIRST . DETAIL is_opt integer DETAIL shift, and go to state 1845 state 1786 202 report_controls_page: PAGE limit_is_are_opt integer line_lines_opt heading_opt first_detail_opt . last_detail_opt footing_opt LAST shift, and go to state 1846 $default reduce using rule 216 (last_detail_opt) last_detail_opt go to state 1847 state 1787 298 report_clause_blank_zero: BLANK . when_opt ZERO WHEN shift, and go to state 1138 $default reduce using rule 543 (when_opt) when_opt go to state 1848 state 1788 277 report_clause_column_is: COLUMN . report_clause_column_orientation is_are_opt 278 | COLUMN . NUMBER report_clause_column_orientation is_opt 279 | COLUMN . NUMBERS report_clause_column_orientation are_opt CENTER shift, and go to state 1849 LEFT shift, and go to state 1850 NUMBER shift, and go to state 1851 NUMBERS shift, and go to state 1852 RIGHT shift, and go to state 1853 $default reduce using rule 281 (report_clause_column_orientation) report_clause_column_orientation go to state 1854 state 1789 280 report_clause_column_is: COLUMNS . report_clause_column_orientation are_opt CENTER shift, and go to state 1849 LEFT shift, and go to state 1850 RIGHT shift, and go to state 1853 $default reduce using rule 281 (report_clause_column_orientation) report_clause_column_orientation go to state 1855 state 1790 265 report_clause_usage_display: DISPLAY . $default reduce using rule 265 (report_clause_usage_display) state 1791 297 report_clause_group_indicate: GROUP . indicate_opt INDICATE shift, and go to state 1856 $default reduce using rule 299 (indicate_opt) indicate_opt go to state 1857 state 1792 266 report_clause_justified: JUSTIFIED . right_opt RIGHT shift, and go to state 1858 $default reduce using rule 310 (right_opt) right_opt go to state 1859 state 1793 308 leading_trailing: LEADING . $default reduce using rule 308 (leading_trailing) state 1794 272 report_clause_line_is: LINE . is_are_opt 273 | LINE . NUMBER is_opt 274 | LINE . NUMBERS are_opt IS shift, and go to state 1860 ARE shift, and go to state 1861 NUMBER shift, and go to state 1862 NUMBERS shift, and go to state 1863 $default reduce using rule 285 (is_are_opt) is_are_opt go to state 1864 state 1795 275 report_clause_line_is: LINES . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1865 state 1796 267 report_clause_next_group: NEXT . GROUP is_opt integer_on_next_page GROUP shift, and go to state 1866 state 1797 263 report_clause_picture: PICTURE . $@23 is_opt picture $default reduce using rule 262 ($@23) $@23 go to state 1867 state 1798 260 report_clause_sign_is: SIGN . is_opt leading_trailing SEPARATE character_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1868 state 1799 289 report_clause_svs: SOURCE . $@24 is_opt gname_page_counter $default reduce using rule 288 ($@24) $@24 go to state 1869 state 1800 293 report_clause_svs: SUM . $@25 gname_list $@26 upon_opt reset_opt $default reduce using rule 291 ($@25) $@25 go to state 1870 state 1801 309 leading_trailing: TRAILING . $default reduce using rule 309 (leading_trailing) state 1802 241 report_clause_type: TYPE . is_opt report_clause_type2 IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1871 state 1803 264 report_clause_usage_display: USAGE . is_opt DISPLAY IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1872 state 1804 290 report_clause_svs: VALUE . is_opt literal IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1873 state 1805 227 report_item: integer def_name_opt $@18 report_clauses . PERIOD_TOK 229 report_clauses: report_clauses . report_clause BLANK shift, and go to state 1787 COLUMN shift, and go to state 1788 COLUMNS shift, and go to state 1789 DISPLAY shift, and go to state 1790 GROUP shift, and go to state 1791 JUSTIFIED shift, and go to state 1792 LEADING shift, and go to state 1793 LINE shift, and go to state 1794 LINES shift, and go to state 1795 NEXT shift, and go to state 1796 PICTURE shift, and go to state 1797 SIGN shift, and go to state 1798 SOURCE shift, and go to state 1799 SUM shift, and go to state 1800 TRAILING shift, and go to state 1801 TYPE shift, and go to state 1802 USAGE shift, and go to state 1803 VALUE shift, and go to state 1804 PERIOD_TOK shift, and go to state 1874 BLANK [reduce using rule 296 (report_clause_group_indicate)] COLUMN [reduce using rule 296 (report_clause_group_indicate)] COLUMNS [reduce using rule 296 (report_clause_group_indicate)] DISPLAY [reduce using rule 296 (report_clause_group_indicate)] GROUP [reduce using rule 296 (report_clause_group_indicate)] JUSTIFIED [reduce using rule 296 (report_clause_group_indicate)] LEADING [reduce using rule 296 (report_clause_group_indicate)] LINE [reduce using rule 296 (report_clause_group_indicate)] LINES [reduce using rule 296 (report_clause_group_indicate)] NEXT [reduce using rule 296 (report_clause_group_indicate)] PICTURE [reduce using rule 296 (report_clause_group_indicate)] SIGN [reduce using rule 296 (report_clause_group_indicate)] SOURCE [reduce using rule 296 (report_clause_group_indicate)] SUM [reduce using rule 296 (report_clause_group_indicate)] TRAILING [reduce using rule 296 (report_clause_group_indicate)] TYPE [reduce using rule 296 (report_clause_group_indicate)] USAGE [reduce using rule 296 (report_clause_group_indicate)] VALUE [reduce using rule 296 (report_clause_group_indicate)] PERIOD_TOK [reduce using rule 296 (report_clause_group_indicate)] report_clause go to state 1875 report_clause_type go to state 1807 report_clause_sign_is go to state 1808 report_clause_picture go to state 1809 report_clause_usage_display go to state 1810 report_clause_justified go to state 1811 report_clause_next_group go to state 1812 report_clause_line go to state 1813 report_clause_line_is go to state 1814 report_clause_column go to state 1815 report_clause_column_is go to state 1816 report_clause_svs go to state 1817 report_clause_group_indicate go to state 1818 report_clause_blank_zero go to state 1819 leading_trailing go to state 1820 state 1806 228 report_clauses: report_clause . $default reduce using rule 228 (report_clauses) state 1807 232 report_clause: report_clause_type . $default reduce using rule 232 (report_clause) state 1808 235 report_clause: report_clause_sign_is . $default reduce using rule 235 (report_clause) state 1809 234 report_clause: report_clause_picture . $default reduce using rule 234 (report_clause) state 1810 233 report_clause: report_clause_usage_display . $default reduce using rule 233 (report_clause) state 1811 236 report_clause: report_clause_justified . $default reduce using rule 236 (report_clause) state 1812 231 report_clause: report_clause_next_group . $default reduce using rule 231 (report_clause) state 1813 230 report_clause: report_clause_line . $default reduce using rule 230 (report_clause) state 1814 268 report_clause_line: report_clause_line_is . integer ON NEXT PAGE 269 | report_clause_line_is . integer NEXT PAGE 270 | report_clause_line_is . integer 271 | report_clause_line_is . PLUS integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 PLUS shift, and go to state 1876 signed_nliteral go to state 234 integer go to state 1877 state 1815 238 report_clause: report_clause_column . $default reduce using rule 238 (report_clause) state 1816 276 report_clause_column: report_clause_column_is . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1878 state 1817 239 report_clause: report_clause_svs . $default reduce using rule 239 (report_clause) state 1818 240 report_clause: report_clause_group_indicate . $default reduce using rule 240 (report_clause) state 1819 237 report_clause: report_clause_blank_zero . $default reduce using rule 237 (report_clause) state 1820 261 report_clause_sign_is: leading_trailing . SEPARATE character_opt SEPARATE shift, and go to state 1879 state 1821 329 screen_clauses: screen_clauses COLUMN $@30 number_is_opt plus_minus_opt name_or_lit . $default reduce using rule 329 (screen_clauses) state 1822 350 screen_to_name: TO name . $default reduce using rule 350 (screen_to_name) state 1823 327 screen_clauses: screen_clauses LINE $@29 number_is_opt plus_minus_opt name_or_lit . $default reduce using rule 327 (screen_clauses) state 1824 925 read_not_invalid_key: NOT INVALID key_opt @100 statement_list . $default reduce using rule 925 (read_not_invalid_key) state 1825 1001 on_size_error_opt: on_opt SIZE on_size_error NOT on_opt SIZE $@115 on_size_error . $default reduce using rule 1001 (on_size_error_opt) state 1826 1053 on_not_exception: NOT on_opt . EXCEPTION @121 statement_list EXCEPTION shift, and go to state 1880 state 1827 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 . end_call_opt END_CALL shift, and go to state 1881 END_CALL [reduce using rule 1006 (end_call_opt)] $default reduce using rule 1006 (end_call_opt) end_call_opt go to state 1882 state 1828 679 selection_object: not_opt expr THRU expr . 1114 expr: expr . '*' expr 1115 | expr . '/' expr 1116 | expr . '+' expr 1117 | expr . '-' expr 1118 | expr . POW_OP expr '+' shift, and go to state 593 '-' shift, and go to state 594 '*' shift, and go to state 595 '/' shift, and go to state 596 POW_OP shift, and go to state 597 $default reduce using rule 679 (selection_object) state 1829 1102 replacing_by_list: replacing_by_list noallname BY noallname inspect_before_after . 1108 inspect_before_after: inspect_before_after . BEFORE initial_opt noallname 1109 | inspect_before_after . AFTER initial_opt noallname AFTER shift, and go to state 1495 BEFORE shift, and go to state 1496 $default reduce using rule 1102 (replacing_by_list) state 1830 766 sort_output: OUTPUT PROCEDURE is_opt perform_range . $default reduce using rule 766 (sort_output) state 1831 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 condition @135 . perform_after_opt perform_statements $@136 END_PERFORM AFTER shift, and go to state 1883 $default reduce using rule 1167 (perform_after_opt) perform_after_opt go to state 1884 state 1832 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname UNTIL @138 . condition @139 perform_after_opt VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 1885 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1833 724 search_all_when_conditional: search_all_when_conditional . AND @85 search_all_when_conditional 724 | search_all_when_conditional AND @85 search_all_when_conditional . $default reduce using rule 724 (search_all_when_conditional) state 1834 720 search_all_when_statement: NEXT SENTENCE . $default reduce using rule 720 (search_all_when_statement) state 1835 721 search_all_when_conditional: variable is_opt CONDITIONAL to_opt . variable 722 | variable is_opt CONDITIONAL to_opt . literal VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1886 signed_nliteral go to state 77 variable go to state 1887 qualified_var go to state 80 unqualified_var go to state 81 state 1836 712 search_when_statement: NEXT SENTENCE . $default reduce using rule 712 (search_when_statement) state 1837 1143 perform_range: label perform_thru_opt . $default reduce using rule 1143 (perform_range) state 1838 1059 on_not_overflow: not_excep on_opt OVERFLOW_TOK @123 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1888 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1839 513 file_description_clause_linage_bottom: lines_at_opt BOTTOM data_name . $default reduce using rule 513 (file_description_clause_linage_bottom) state 1840 528 depend_rec_varying: DEPENDING . on_opt STRING ON shift, and go to state 620 $default reduce using rule 1235 (on_opt) on_opt go to state 1889 state 1841 501 file_description_clause_record: RECORD is_opt VARYING in_opt size_opt from_rec_varying to_rec_varying character_opts depend_rec_varying . $default reduce using rule 501 (file_description_clause_record) state 1842 458 array_options: OCCURS integer TO integer times_opt DEPENDING $@48 on_opt gname . $@49 indexed_by_opt $default reduce using rule 457 ($@49) $@49 go to state 1890 state 1843 464 index_name_list: index_name_list def_name . $default reduce using rule 464 (index_name_list) state 1844 204 heading_opt: HEADING is_opt integer . $default reduce using rule 204 (heading_opt) state 1845 219 first_detail_opt: FIRST DETAIL . is_opt integer IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1891 state 1846 217 last_detail_opt: LAST . DETAIL is_opt integer DETAIL shift, and go to state 1892 state 1847 202 report_controls_page: PAGE limit_is_are_opt integer line_lines_opt heading_opt first_detail_opt last_detail_opt . footing_opt FOOTING shift, and go to state 1893 $default reduce using rule 214 (footing_opt) footing_opt go to state 1894 state 1848 298 report_clause_blank_zero: BLANK when_opt . ZERO ZERO shift, and go to state 1895 state 1849 283 report_clause_column_orientation: CENTER . $default reduce using rule 283 (report_clause_column_orientation) state 1850 282 report_clause_column_orientation: LEFT . $default reduce using rule 282 (report_clause_column_orientation) state 1851 278 report_clause_column_is: COLUMN NUMBER . report_clause_column_orientation is_opt CENTER shift, and go to state 1849 LEFT shift, and go to state 1850 RIGHT shift, and go to state 1853 $default reduce using rule 281 (report_clause_column_orientation) report_clause_column_orientation go to state 1896 state 1852 279 report_clause_column_is: COLUMN NUMBERS . report_clause_column_orientation are_opt CENTER shift, and go to state 1849 LEFT shift, and go to state 1850 RIGHT shift, and go to state 1853 $default reduce using rule 281 (report_clause_column_orientation) report_clause_column_orientation go to state 1897 state 1853 284 report_clause_column_orientation: RIGHT . $default reduce using rule 284 (report_clause_column_orientation) state 1854 277 report_clause_column_is: COLUMN report_clause_column_orientation . is_are_opt IS shift, and go to state 1860 ARE shift, and go to state 1861 $default reduce using rule 285 (is_are_opt) is_are_opt go to state 1898 state 1855 280 report_clause_column_is: COLUMNS report_clause_column_orientation . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1899 state 1856 300 indicate_opt: INDICATE . $default reduce using rule 300 (indicate_opt) state 1857 297 report_clause_group_indicate: GROUP indicate_opt . $default reduce using rule 297 (report_clause_group_indicate) state 1858 311 right_opt: RIGHT . $default reduce using rule 311 (right_opt) state 1859 266 report_clause_justified: JUSTIFIED right_opt . $default reduce using rule 266 (report_clause_justified) state 1860 286 is_are_opt: IS . $default reduce using rule 286 (is_are_opt) state 1861 287 is_are_opt: ARE . $default reduce using rule 287 (is_are_opt) state 1862 273 report_clause_line_is: LINE NUMBER . is_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1900 state 1863 274 report_clause_line_is: LINE NUMBERS . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1901 state 1864 272 report_clause_line_is: LINE is_are_opt . $default reduce using rule 272 (report_clause_line_is) state 1865 275 report_clause_line_is: LINES are_opt . $default reduce using rule 275 (report_clause_line_is) state 1866 267 report_clause_next_group: NEXT GROUP . is_opt integer_on_next_page IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1902 state 1867 263 report_clause_picture: PICTURE $@23 . is_opt picture IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1903 state 1868 260 report_clause_sign_is: SIGN is_opt . leading_trailing SEPARATE character_opt LEADING shift, and go to state 1793 TRAILING shift, and go to state 1801 leading_trailing go to state 1904 state 1869 289 report_clause_svs: SOURCE $@24 . is_opt gname_page_counter IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1905 state 1870 293 report_clause_svs: SUM $@25 . gname_list $@26 upon_opt reset_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname_list go to state 1906 gname go to state 71 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1871 241 report_clause_type: TYPE is_opt . report_clause_type2 CF shift, and go to state 1907 CH shift, and go to state 1908 CONTROL shift, and go to state 1909 DE shift, and go to state 1910 DETAIL shift, and go to state 1911 PAGE shift, and go to state 1912 PF shift, and go to state 1913 PH shift, and go to state 1914 REPORT shift, and go to state 1915 RF shift, and go to state 1916 RH shift, and go to state 1917 report_clause_type2 go to state 1918 state 1872 264 report_clause_usage_display: USAGE is_opt . DISPLAY DISPLAY shift, and go to state 1919 state 1873 290 report_clause_svs: VALUE is_opt . literal NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 literal go to state 1920 signed_nliteral go to state 77 state 1874 227 report_item: integer def_name_opt $@18 report_clauses PERIOD_TOK . $default reduce using rule 227 (report_item) state 1875 229 report_clauses: report_clauses report_clause . $default reduce using rule 229 (report_clauses) state 1876 271 report_clause_line: report_clause_line_is PLUS . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1921 state 1877 268 report_clause_line: report_clause_line_is integer . ON NEXT PAGE 269 | report_clause_line_is integer . NEXT PAGE 270 | report_clause_line_is integer . NEXT shift, and go to state 1922 ON shift, and go to state 1923 NEXT [reduce using rule 270 (report_clause_line)] $default reduce using rule 270 (report_clause_line) state 1878 276 report_clause_column: report_clause_column_is integer . $default reduce using rule 276 (report_clause_column) state 1879 261 report_clause_sign_is: leading_trailing SEPARATE . character_opt CHARACTER shift, and go to state 1441 $default reduce using rule 406 (character_opt) character_opt go to state 1924 state 1880 1053 on_not_exception: NOT on_opt EXCEPTION . @121 statement_list $default reduce using rule 1052 (@121) @121 go to state 1925 state 1881 1007 end_call_opt: END_CALL . $default reduce using rule 1007 (end_call_opt) state 1882 967 call_statement: CALL $@105 call_convention_opt gname using_options returning_options @106 @107 @108 on_exception_or_overflow on_not_exception $@109 end_call_opt . $default reduce using rule 967 (call_statement) state 1883 1168 perform_after_opt: AFTER . perform_after 1169 | AFTER . perform_after AFTER perform_after 1170 | AFTER . perform_after AFTER perform_after AFTER perform_after 1171 | AFTER . perform_after AFTER perform_after AFTER perform_after AFTER perform_after 1172 | AFTER . perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after 1173 | AFTER . perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 perform_after go to state 1926 name go to state 1927 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1884 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt . perform_statements $@136 END_PERFORM $default reduce using rule 1176 ($@141) perform_statements go to state 1928 $@141 go to state 450 state 1885 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname UNTIL @138 condition . @139 perform_after_opt 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition OR shift, and go to state 611 AND shift, and go to state 612 $default reduce using rule 1161 (@139) @139 go to state 1929 state 1886 722 search_all_when_conditional: variable is_opt CONDITIONAL to_opt literal . $default reduce using rule 722 (search_all_when_conditional) state 1887 721 search_all_when_conditional: variable is_opt CONDITIONAL to_opt variable . $default reduce using rule 721 (search_all_when_conditional) state 1888 1059 on_not_overflow: not_excep on_opt OVERFLOW_TOK @123 statement_list . $default reduce using rule 1059 (on_not_overflow) state 1889 528 depend_rec_varying: DEPENDING on_opt . STRING STRING shift, and go to state 1930 state 1890 458 array_options: OCCURS integer TO integer times_opt DEPENDING $@48 on_opt gname $@49 . indexed_by_opt DIRECTION shift, and go to state 1545 INDEXED reduce using rule 460 (key_is_opt) $default reduce using rule 462 (indexed_by_opt) key_is_opt go to state 1546 indexed_by_opt go to state 1931 state 1891 219 first_detail_opt: FIRST DETAIL is_opt . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1932 state 1892 217 last_detail_opt: LAST DETAIL . is_opt integer IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1933 state 1893 215 footing_opt: FOOTING . is_opt integer IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1934 state 1894 202 report_controls_page: PAGE limit_is_are_opt integer line_lines_opt heading_opt first_detail_opt last_detail_opt footing_opt . $default reduce using rule 202 (report_controls_page) state 1895 298 report_clause_blank_zero: BLANK when_opt ZERO . $default reduce using rule 298 (report_clause_blank_zero) state 1896 278 report_clause_column_is: COLUMN NUMBER report_clause_column_orientation . is_opt IS shift, and go to state 84 $default reduce using rule 132 (is_opt) is_opt go to state 1935 state 1897 279 report_clause_column_is: COLUMN NUMBERS report_clause_column_orientation . are_opt ARE shift, and go to state 1130 $default reduce using rule 134 (are_opt) are_opt go to state 1936 state 1898 277 report_clause_column_is: COLUMN report_clause_column_orientation is_are_opt . $default reduce using rule 277 (report_clause_column_is) state 1899 280 report_clause_column_is: COLUMNS report_clause_column_orientation are_opt . $default reduce using rule 280 (report_clause_column_is) state 1900 273 report_clause_line_is: LINE NUMBER is_opt . $default reduce using rule 273 (report_clause_line_is) state 1901 274 report_clause_line_is: LINE NUMBERS are_opt . $default reduce using rule 274 (report_clause_line_is) state 1902 267 report_clause_next_group: NEXT GROUP is_opt . integer_on_next_page NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 NEXT shift, and go to state 1937 PLUS shift, and go to state 1938 integer_on_next_page go to state 1939 signed_nliteral go to state 234 integer go to state 1940 state 1903 263 report_clause_picture: PICTURE $@23 is_opt . picture $default reduce using rule 478 (picture) picture go to state 1941 state 1904 260 report_clause_sign_is: SIGN is_opt leading_trailing . SEPARATE character_opt SEPARATE shift, and go to state 1942 state 1905 289 report_clause_svs: SOURCE $@24 is_opt . gname_page_counter VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 PAGE_COUNTER shift, and go to state 1943 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname_page_counter go to state 1944 gname go to state 1945 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1906 293 report_clause_svs: SUM $@25 gname_list . $@26 upon_opt reset_opt 1244 gname_list: gname_list . sep_opt gname LISTSEP shift, and go to state 98 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) NLITERAL reduce using rule 1214 (sep_opt) CLITERAL reduce using rule 1214 (sep_opt) '+' reduce using rule 1214 (sep_opt) '-' reduce using rule 1214 (sep_opt) ALL reduce using rule 1214 (sep_opt) FUNCTION reduce using rule 1214 (sep_opt) HIGHVALUES reduce using rule 1214 (sep_opt) LOWVALUES reduce using rule 1214 (sep_opt) QUOTES reduce using rule 1214 (sep_opt) SPACES reduce using rule 1214 (sep_opt) ZERO reduce using rule 1214 (sep_opt) $default reduce using rule 292 ($@26) $@26 go to state 1946 sep_opt go to state 99 state 1907 257 report_clause_type2: CF . $@22 name_final_opt $default reduce using rule 256 ($@22) $@22 go to state 1947 state 1908 254 report_clause_type2: CH . $@21 name_final_opt $default reduce using rule 253 ($@21) $@21 go to state 1948 state 1909 245 report_clause_type2: CONTROL . HEADING $@19 name_final_opt 248 | CONTROL . FOOTING $@20 name_final_opt FOOTING shift, and go to state 1949 HEADING shift, and go to state 1950 state 1910 255 report_clause_type2: DE . $default reduce using rule 255 (report_clause_type2) state 1911 246 report_clause_type2: DETAIL . $default reduce using rule 246 (report_clause_type2) state 1912 243 report_clause_type2: PAGE . HEADING 249 | PAGE . FOOTING FOOTING shift, and go to state 1951 HEADING shift, and go to state 1952 state 1913 258 report_clause_type2: PF . $default reduce using rule 258 (report_clause_type2) state 1914 252 report_clause_type2: PH . $default reduce using rule 252 (report_clause_type2) state 1915 242 report_clause_type2: REPORT . HEADING 250 | REPORT . FOOTING FOOTING shift, and go to state 1953 HEADING shift, and go to state 1954 state 1916 259 report_clause_type2: RF . $default reduce using rule 259 (report_clause_type2) state 1917 251 report_clause_type2: RH . $default reduce using rule 251 (report_clause_type2) state 1918 241 report_clause_type: TYPE is_opt report_clause_type2 . $default reduce using rule 241 (report_clause_type) state 1919 264 report_clause_usage_display: USAGE is_opt DISPLAY . $default reduce using rule 264 (report_clause_usage_display) state 1920 290 report_clause_svs: VALUE is_opt literal . $default reduce using rule 290 (report_clause_svs) state 1921 271 report_clause_line: report_clause_line_is PLUS integer . $default reduce using rule 271 (report_clause_line) state 1922 269 report_clause_line: report_clause_line_is integer NEXT . PAGE PAGE shift, and go to state 1955 state 1923 268 report_clause_line: report_clause_line_is integer ON . NEXT PAGE NEXT shift, and go to state 1956 state 1924 261 report_clause_sign_is: leading_trailing SEPARATE character_opt . $default reduce using rule 261 (report_clause_sign_is) state 1925 1053 on_not_exception: NOT on_opt EXCEPTION @121 . statement_list READ shift, and go to state 254 WRITE shift, and go to state 255 RELEASE shift, and go to state 256 ACCEPT shift, and go to state 257 ADD shift, and go to state 258 CALL shift, and go to state 259 CALL_LOADLIB shift, and go to state 260 CANCEL shift, and go to state 261 CHAIN shift, and go to state 262 CLOSE shift, and go to state 263 COMPUTE shift, and go to state 264 CONTINUE shift, and go to state 265 DELETE shift, and go to state 266 DISPLAY shift, and go to state 267 DIVIDE shift, and go to state 268 EVALUATE shift, and go to state 269 EXIT shift, and go to state 270 GENERATE shift, and go to state 271 GO shift, and go to state 272 GOBACK shift, and go to state 273 IF shift, and go to state 274 INITIALIZE shift, and go to state 275 INITIATE shift, and go to state 276 INSPECT shift, and go to state 277 MERGE shift, and go to state 278 MOVE shift, and go to state 279 MULTIPLY shift, and go to state 280 OPEN shift, and go to state 281 PERFORM shift, and go to state 282 READY shift, and go to state 283 RESET shift, and go to state 284 RETURN shift, and go to state 285 REWRITE shift, and go to state 286 SEARCH shift, and go to state 287 SET shift, and go to state 288 SORT shift, and go to state 289 START shift, and go to state 290 STOP shift, and go to state 291 STRINGCMD shift, and go to state 292 SUBTRACT shift, and go to state 293 TCOBPROTO1 shift, and go to state 294 TCOBPROTO2 shift, and go to state 295 TERMINATE shift, and go to state 296 UNLOCK shift, and go to state 297 UNSTRING shift, and go to state 298 statement_list go to state 1957 statements go to state 640 statement go to state 300 perform_statement go to state 301 if_statement go to state 302 search_statement go to state 303 evaluate_statement go to state 304 if_part go to state 305 unlock_statement go to state 306 proto_statement go to state 307 trace_statement go to state 308 initiate_statement go to state 309 generate_statement go to state 310 terminate_statement go to state 311 cancel_statement go to state 312 merge_statement go to state 313 sort_statement go to state 314 sort_file go to state 315 sort_variable_indexed go to state 316 move_statement go to state 317 initialize_statement go to state 318 compute_statement go to state 319 add_statement go to state 320 subtract_statement go to state 321 multiply_statement go to state 322 divide_statement go to state 323 accept_statement go to state 324 accept_hardware go to state 325 accept_chronological go to state 326 accept_screen go to state 327 display_statement go to state 328 display_line go to state 329 display_screen go to state 330 open_statement go to state 331 close_statement go to state 332 return_statement go to state 333 read_statement go to state 334 release_statement go to state 335 write_statement go to state 336 rewrite_statement go to state 337 delete_statement go to state 338 start_statement go to state 339 goto_statement go to state 340 call_statement go to state 341 call_loadlib_statement go to state 342 chain_statement go to state 343 exit_statement go to state 344 stop_statement go to state 345 goback_statement go to state 346 set_statement go to state 347 string_statement go to state 348 unstring_statement go to state 349 inspect_statement go to state 350 state 1926 1168 perform_after_opt: AFTER perform_after . 1169 | AFTER perform_after . AFTER perform_after 1170 | AFTER perform_after . AFTER perform_after AFTER perform_after 1171 | AFTER perform_after . AFTER perform_after AFTER perform_after AFTER perform_after 1172 | AFTER perform_after . AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after 1173 | AFTER perform_after . AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER shift, and go to state 1958 $default reduce using rule 1168 (perform_after_opt) state 1927 1175 perform_after: name . FROM gname by_opt gname UNTIL @140 condition FROM shift, and go to state 1959 state 1928 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements . $@136 END_PERFORM $default reduce using rule 1154 ($@136) $@136 go to state 1960 state 1929 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname UNTIL @138 condition @139 . perform_after_opt AFTER shift, and go to state 1883 $default reduce using rule 1167 (perform_after_opt) perform_after_opt go to state 1961 state 1930 528 depend_rec_varying: DEPENDING on_opt STRING . $default reduce using rule 528 (depend_rec_varying) state 1931 458 array_options: OCCURS integer TO integer times_opt DEPENDING $@48 on_opt gname $@49 indexed_by_opt . $default reduce using rule 458 (array_options) state 1932 219 first_detail_opt: FIRST DETAIL is_opt integer . $default reduce using rule 219 (first_detail_opt) state 1933 217 last_detail_opt: LAST DETAIL is_opt . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1962 state 1934 215 footing_opt: FOOTING is_opt . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1963 state 1935 278 report_clause_column_is: COLUMN NUMBER report_clause_column_orientation is_opt . $default reduce using rule 278 (report_clause_column_is) state 1936 279 report_clause_column_is: COLUMN NUMBERS report_clause_column_orientation are_opt . $default reduce using rule 279 (report_clause_column_is) state 1937 316 integer_on_next_page: NEXT . PAGE PAGE shift, and go to state 1964 state 1938 315 integer_on_next_page: PLUS . integer NLITERAL shift, and go to state 59 '+' shift, and go to state 61 '-' shift, and go to state 62 signed_nliteral go to state 234 integer go to state 1965 state 1939 267 report_clause_next_group: NEXT GROUP is_opt integer_on_next_page . $default reduce using rule 267 (report_clause_next_group) state 1940 314 integer_on_next_page: integer . $default reduce using rule 314 (integer_on_next_page) state 1941 263 report_clause_picture: PICTURE $@23 is_opt picture . 479 picture: picture . pic_elem CHAR shift, and go to state 1548 $default reduce using rule 263 (report_clause_picture) pic_elem go to state 1549 state 1942 260 report_clause_sign_is: SIGN is_opt leading_trailing SEPARATE . character_opt CHARACTER shift, and go to state 1441 $default reduce using rule 406 (character_opt) character_opt go to state 1966 state 1943 295 gname_page_counter: PAGE_COUNTER . $default reduce using rule 295 (gname_page_counter) state 1944 289 report_clause_svs: SOURCE $@24 is_opt gname_page_counter . $default reduce using rule 289 (report_clause_svs) state 1945 294 gname_page_counter: gname . $default reduce using rule 294 (gname_page_counter) state 1946 293 report_clause_svs: SUM $@25 gname_list $@26 . upon_opt reset_opt UPON shift, and go to state 1967 $default reduce using rule 301 (upon_opt) upon_opt go to state 1968 state 1947 257 report_clause_type2: CF $@22 . name_final_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FINAL shift, and go to state 1969 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 name_final_opt go to state 1970 gname go to state 1971 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1948 254 report_clause_type2: CH $@21 . name_final_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FINAL shift, and go to state 1969 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 name_final_opt go to state 1972 gname go to state 1971 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1949 248 report_clause_type2: CONTROL FOOTING . $@20 name_final_opt $default reduce using rule 247 ($@20) $@20 go to state 1973 state 1950 245 report_clause_type2: CONTROL HEADING . $@19 name_final_opt $default reduce using rule 244 ($@19) $@19 go to state 1974 state 1951 249 report_clause_type2: PAGE FOOTING . $default reduce using rule 249 (report_clause_type2) state 1952 243 report_clause_type2: PAGE HEADING . $default reduce using rule 243 (report_clause_type2) state 1953 250 report_clause_type2: REPORT FOOTING . $default reduce using rule 250 (report_clause_type2) state 1954 242 report_clause_type2: REPORT HEADING . $default reduce using rule 242 (report_clause_type2) state 1955 269 report_clause_line: report_clause_line_is integer NEXT PAGE . $default reduce using rule 269 (report_clause_line) state 1956 268 report_clause_line: report_clause_line_is integer ON NEXT . PAGE PAGE shift, and go to state 1975 state 1957 1053 on_not_exception: NOT on_opt EXCEPTION @121 statement_list . $default reduce using rule 1053 (on_not_exception) state 1958 1169 perform_after_opt: AFTER perform_after AFTER . perform_after 1170 | AFTER perform_after AFTER . perform_after AFTER perform_after 1171 | AFTER perform_after AFTER . perform_after AFTER perform_after AFTER perform_after 1172 | AFTER perform_after AFTER . perform_after AFTER perform_after AFTER perform_after AFTER perform_after 1173 | AFTER perform_after AFTER . perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 perform_after go to state 1976 name go to state 1927 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1959 1175 perform_after: name FROM . gname by_opt gname UNTIL @140 condition VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1977 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1960 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 . END_PERFORM END_PERFORM shift, and go to state 1978 state 1961 1162 perform_options: label perform_thru_opt with_test_opt VARYING name FROM gname by_opt gname UNTIL @138 condition @139 perform_after_opt . $default reduce using rule 1162 (perform_options) state 1962 217 last_detail_opt: LAST DETAIL is_opt integer . $default reduce using rule 217 (last_detail_opt) state 1963 215 footing_opt: FOOTING is_opt integer . $default reduce using rule 215 (footing_opt) state 1964 316 integer_on_next_page: NEXT PAGE . $default reduce using rule 316 (integer_on_next_page) state 1965 315 integer_on_next_page: PLUS integer . $default reduce using rule 315 (integer_on_next_page) state 1966 260 report_clause_sign_is: SIGN is_opt leading_trailing SEPARATE character_opt . $default reduce using rule 260 (report_clause_sign_is) state 1967 302 upon_opt: UPON . gname_list VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname_list go to state 1979 gname go to state 71 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1968 293 report_clause_svs: SUM $@25 gname_list $@26 upon_opt . reset_opt RESET shift, and go to state 1980 $default reduce using rule 303 (reset_opt) reset_opt go to state 1981 state 1969 313 name_final_opt: FINAL . $default reduce using rule 313 (name_final_opt) state 1970 257 report_clause_type2: CF $@22 name_final_opt . $default reduce using rule 257 (report_clause_type2) state 1971 312 name_final_opt: gname . $default reduce using rule 312 (name_final_opt) state 1972 254 report_clause_type2: CH $@21 name_final_opt . $default reduce using rule 254 (report_clause_type2) state 1973 248 report_clause_type2: CONTROL FOOTING $@20 . name_final_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FINAL shift, and go to state 1969 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 name_final_opt go to state 1982 gname go to state 1971 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1974 245 report_clause_type2: CONTROL HEADING $@19 . name_final_opt VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FINAL shift, and go to state 1969 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 name_final_opt go to state 1983 gname go to state 1971 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1975 268 report_clause_line: report_clause_line_is integer ON NEXT PAGE . $default reduce using rule 268 (report_clause_line) state 1976 1169 perform_after_opt: AFTER perform_after AFTER perform_after . 1170 | AFTER perform_after AFTER perform_after . AFTER perform_after 1171 | AFTER perform_after AFTER perform_after . AFTER perform_after AFTER perform_after 1172 | AFTER perform_after AFTER perform_after . AFTER perform_after AFTER perform_after AFTER perform_after 1173 | AFTER perform_after AFTER perform_after . AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER shift, and go to state 1984 $default reduce using rule 1169 (perform_after_opt) state 1977 1175 perform_after: name FROM gname . by_opt gname UNTIL @140 condition BY shift, and go to state 854 $default reduce using rule 1231 (by_opt) by_opt go to state 1985 state 1978 1155 perform_options: with_test_opt VARYING name FROM gname by_opt gname UNTIL @134 condition @135 perform_after_opt perform_statements $@136 END_PERFORM . $default reduce using rule 1155 (perform_options) state 1979 302 upon_opt: UPON gname_list . 1244 gname_list: gname_list . sep_opt gname LISTSEP shift, and go to state 98 VARIABLE reduce using rule 1214 (sep_opt) SUBSCVAR reduce using rule 1214 (sep_opt) LABELSTR reduce using rule 1214 (sep_opt) NLITERAL reduce using rule 1214 (sep_opt) CLITERAL reduce using rule 1214 (sep_opt) '+' reduce using rule 1214 (sep_opt) '-' reduce using rule 1214 (sep_opt) ALL reduce using rule 1214 (sep_opt) FUNCTION reduce using rule 1214 (sep_opt) HIGHVALUES reduce using rule 1214 (sep_opt) LOWVALUES reduce using rule 1214 (sep_opt) QUOTES reduce using rule 1214 (sep_opt) SPACES reduce using rule 1214 (sep_opt) ZERO reduce using rule 1214 (sep_opt) $default reduce using rule 302 (upon_opt) sep_opt go to state 99 state 1980 304 reset_opt: RESET . gname 305 | RESET . FINAL VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FINAL shift, and go to state 1986 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1987 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1981 293 report_clause_svs: SUM $@25 gname_list $@26 upon_opt reset_opt . $default reduce using rule 293 (report_clause_svs) state 1982 248 report_clause_type2: CONTROL FOOTING $@20 name_final_opt . $default reduce using rule 248 (report_clause_type2) state 1983 245 report_clause_type2: CONTROL HEADING $@19 name_final_opt . $default reduce using rule 245 (report_clause_type2) state 1984 1170 perform_after_opt: AFTER perform_after AFTER perform_after AFTER . perform_after 1171 | AFTER perform_after AFTER perform_after AFTER . perform_after AFTER perform_after 1172 | AFTER perform_after AFTER perform_after AFTER . perform_after AFTER perform_after AFTER perform_after 1173 | AFTER perform_after AFTER perform_after AFTER . perform_after AFTER perform_after AFTER perform_after AFTER perform_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 perform_after go to state 1988 name go to state 1927 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1985 1175 perform_after: name FROM gname by_opt . gname UNTIL @140 condition VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 gname go to state 1989 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1986 305 reset_opt: RESET FINAL . $default reduce using rule 305 (reset_opt) state 1987 304 reset_opt: RESET gname . $default reduce using rule 304 (reset_opt) state 1988 1170 perform_after_opt: AFTER perform_after AFTER perform_after AFTER perform_after . 1171 | AFTER perform_after AFTER perform_after AFTER perform_after . AFTER perform_after 1172 | AFTER perform_after AFTER perform_after AFTER perform_after . AFTER perform_after AFTER perform_after 1173 | AFTER perform_after AFTER perform_after AFTER perform_after . AFTER perform_after AFTER perform_after AFTER perform_after AFTER shift, and go to state 1990 $default reduce using rule 1170 (perform_after_opt) state 1989 1175 perform_after: name FROM gname by_opt gname . UNTIL @140 condition UNTIL shift, and go to state 1991 state 1990 1171 perform_after_opt: AFTER perform_after AFTER perform_after AFTER perform_after AFTER . perform_after 1172 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER . perform_after AFTER perform_after 1173 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER . perform_after AFTER perform_after AFTER perform_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 perform_after go to state 1992 name go to state 1927 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1991 1175 perform_after: name FROM gname by_opt gname UNTIL . @140 condition $default reduce using rule 1174 (@140) @140 go to state 1993 state 1992 1171 perform_after_opt: AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after . 1172 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after . AFTER perform_after 1173 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after . AFTER perform_after AFTER perform_after AFTER shift, and go to state 1994 $default reduce using rule 1171 (perform_after_opt) state 1993 1175 perform_after: name FROM gname by_opt gname UNTIL @140 . condition VARIABLE shift, and go to state 56 VARCOND shift, and go to state 422 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 NLITERAL shift, and go to state 59 CLITERAL shift, and go to state 60 '+' shift, and go to state 61 '-' shift, and go to state 62 NOT shift, and go to state 423 ALL shift, and go to state 63 FUNCTION shift, and go to state 64 HIGHVALUES shift, and go to state 65 LOWVALUES shift, and go to state 66 QUOTES shift, and go to state 67 SPACES shift, and go to state 68 ZERO shift, and go to state 69 '(' shift, and go to state 424 expr go to state 425 condition go to state 1995 gname go to state 427 gliteral go to state 72 without_all_literal go to state 73 all_literal go to state 74 special_literal go to state 75 literal go to state 76 signed_nliteral go to state 77 cond_name go to state 428 name go to state 78 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1994 1172 perform_after_opt: AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER . perform_after 1173 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER . perform_after AFTER perform_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 perform_after go to state 1996 name go to state 1927 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1995 1175 perform_after: name FROM gname by_opt gname UNTIL @140 condition . 1184 condition: condition . AND @143 implied_op_condition 1186 | condition . OR @144 implied_op_condition OR shift, and go to state 611 AND shift, and go to state 612 $default reduce using rule 1175 (perform_after) state 1996 1172 perform_after_opt: AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after . 1173 | AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after . AFTER perform_after AFTER shift, and go to state 1997 $default reduce using rule 1172 (perform_after_opt) state 1997 1173 perform_after_opt: AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER . perform_after VARIABLE shift, and go to state 56 SUBSCVAR shift, and go to state 57 LABELSTR shift, and go to state 58 perform_after go to state 1998 name go to state 1927 variable go to state 79 qualified_var go to state 80 unqualified_var go to state 81 state 1998 1173 perform_after_opt: AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after AFTER perform_after . $default reduce using rule 1173 (perform_after_opt)