Posted By

kcorless on 11/02/16


Tagged


Versions (?)

generated java


 / Published in: Java
 

generated java from COBOL

  1. void _000_MAINLINE() {
  2. performThru("_100_INIT", "_900_EXIT");
  3. while (false == (isTrue(WS_FILE_STATUS.WF_INPUT_FILE_STATUS_WF_END_OF_INPUT_FILE) && isTrue(WS_FILE_STATUS.WF_SPECIAL_FILE_STATUS_WF_END_OF_SPECIAL_FILE))) {
  4. performThru("_200_MAIN", "_200_EXIT");
  5. }
  6. performThru("_300_TERM", "_300_EXIT");
  7. goBack();
  8. goToNextSection("_000_EXIT");
  9. }

Report this snippet  

You need to login to post a comment.