SoftwareMining - Business Rule Extraction and Documentation 

Business Rule   
MENU.CBL
COBOL Documentation
MENU.html
Persistent Records:
Signature (From Linkage Section) 
Working Storage Section

 

Analyst's Description/Comments
Data Filters Applied to this rule:
Statement Category Filters: The following statement types have been filtererd out

Business Rule Code 
/**
 * mainx_M240
 */
public void mainx_M240 ()
{
}

/**
 * main01_M250
 */
public void main01_M250 ()
{

  while ( true ) {
    // termination condition 
    if (ACMUtil.ACMCheck88Vars(idata.getWsTerminate(), idata.wsTerminateWsYes)) {
      break;
    }
    perform("getOption_M260");
  }
  clearScreen();
  stop();
}

/**
 * getOption_M260
 */
public void getOption_M260 ()
{
}

/**
 * getOption2_M270
 */
public void getOption2_M270 ()
{
  clearScreen();
  perform("displayChoices_M310");
  accept(idata.getWsEntry(), 20, 30);
  if (idata.getWsEntry().getAsInt() == 1) {

    BaseService compSclBS;
    compSclBS = ServicesFactory.create("com.softwaremining.examples.client.CCompScl", this);
    compSclBS.execute();

    ServicesFactory.cancelService("com.softwaremining.examples.client.CCompScl");
  } else if (idata.getWsEntry().getAsInt() == 2) {

      BaseService compVwBS;
      compVwBS = ServicesFactory.create("com.softwaremining.examples.client.CCompVw", this);
      compVwBS.execute();

      ServicesFactory.cancelService("com.softwaremining.examples.client.CCompVw");
    } else if (idata.getWsEntry().getAsInt() == 3) {

        BaseService compCrBS;
        compCrBS = ServicesFactory.create("com.softwaremining.examples.client.CCompCr", this);
        compCrBS.execute();

        ServicesFactory.cancelService("com.softwaremining.examples.client.CCompCr");
      } else if (idata.getWsEntry().getAsInt() == 4) {
          idata.setWsTerminate("y");
        } else {
          perform("invalidOption_M290");
        }
}

/**
 * getOptionExit_M280
 */
public void getOptionExit_M280 ()
{
  goBack();
}

/**
 * invalidOption_M290
 */
public void invalidOption_M290 ()
{
}

/**
 * invalidSect1_M300
 */
public void invalidSect1_M300 ()
{
  idata.setWsErrMess("Invalid Option, Please Try again");
  display(idata.getWsErrMess(), 23, 10);
  accept(idata.getWsAnyKey(), 23, 60);
  idata.getWsErrMess().fill(" ");
  display(idata.getWsErrMess(), 23, 10);
  goBack();
}

/**
 * displayChoices_M310
 */
public void displayChoices_M310 ()
{
}

/**
 * dispSec01_M320
 */
public void dispSec01_M320 ()
{
  display(idata.getWsAcm(), 2, 20);
  display(idata.getWsProgTitle(), 2, 40);
  display("1. View All Companies  ", 10, 10);
  display("2. Companys View/Update", 11, 10);
  display("3. Create New Company  ", 12, 10);
  display("4. Exit.               ", 14, 10);
  display("_______________________", 18, 10);
  display("Enter choice <1-4> [", 20, 10);
  display("]", 20, 31);
}

/**
 * dispSec02_M330
 */
public void dispSec02_M330 ()
{
  goBack();
}