SoftwareMining - Business Rule Extraction and Documentation 

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

 

Analyst's Description/Comments
Data Filters Applied to this rule:
  • None
Statement Category Filters:
  • Screen statements

Business Rule Code 
/**
 * c00Main_M690
 */

public void c00Main_M690 (){
  iData.setWsDiscount1(prdInfo.getProdDiscount(0));
  iData.setWsDiscount2(prdInfo.getProdDiscount(1));
  iData.setWsDiscount3(prdInfo.getProdDiscount(2));
  iData.setWsProdQty1(prdInfo.getProdQty(0));
  iData.setWsProdQty2(prdInfo.getProdQty(1));
  iData.setWsProdQty3(prdInfo.getProdQty(2));
  perform("dispProd_M700");
  goBack();
}


/**
 * dispProd_M700
 */

public void dispProd_M700 (){
  prdInfo.getProdDiscount(0).setValue(iData.getWsDiscount1());
  prdInfo.getProdDiscount(1).setValue(iData.getWsDiscount2());
  prdInfo.getProdDiscount(2).setValue(iData.getWsDiscount3());
  prdInfo.getProdQty(0).setValue(iData.getWsProdQty1());
  prdInfo.getProdQty(1).setValue(iData.getWsProdQty2());
  prdInfo.getProdQty(2).setValue(iData.getWsProdQty3());
}