Quintiq file version 2.0 
 | 
#parent: Panel227/btn_OK_FAACM 
 | 
Response OnClick () id:Response_Panel227_btn_OK_FAACM_OnClick 
 | 
{ 
 | 
  #keys: '[414724.0.61672228]' 
 | 
  CanBindMultiple: false 
 | 
  DefinitionID: 'Responsedef_WebButton_OnClick' 
 | 
  Precondition: 
 | 
  [* 
 | 
    return not isnull( MacroPlan); 
 | 
  *] 
 | 
  QuillAction 
 | 
  { 
 | 
    Body: 
 | 
    [* 
 | 
      strQty := np_Qty_FAACM.Number().AsQUILL(); 
 | 
      Qty := 0; 
 | 
      if( strQty.FindString( ".",0)>0) 
 | 
      { 
 | 
        Qty := [Number]strQty.SubString( 0,strQty.FindString( ".",0)); 
 | 
      } 
 | 
      else 
 | 
      { 
 | 
        Qty := [Number]strQty; 
 | 
      } 
 | 
      OperateMsg :=""; 
 | 
      OperateResult := H_FunctionClass::SM_MaterialReverse(   MacroPlan,"-",txt_CustomID_FAACM.Text(),lb_MaterialCode_FAACM.Text(),Qty, 
 | 
                                                            lb_Operator_FAACM.Text(),OperateMsg,ddsl_OperateType_FAACM.Text()); 
 | 
       
 | 
      if( OperateMsg.Length()>0) 
 | 
      { 
 | 
        if( OperateResult) 
 | 
        { 
 | 
          WebMessageBox::Success( OperateMsg); 
 | 
        } 
 | 
        else 
 | 
        { 
 | 
          WebMessageBox::Warning( OperateMsg); 
 | 
        } 
 | 
      } 
 | 
    *] 
 | 
    GroupServerCalls: false 
 | 
  } 
 | 
} 
 |