Quintiq file version 2.0
|
#parent: PanelMaterialPurchase613/btn_Issuing
|
Response OnClick () id:Response_PanelMaterialPurchase613_btn_Issuing_OnClick
|
{
|
#keys: '[414724.0.32883517]'
|
CanBindMultiple: false
|
DefinitionID: 'Responsedef_WebButton_OnClick'
|
Precondition:
|
[*
|
return not isnull( MacroPlan);
|
*]
|
QuillAction
|
{
|
Body:
|
[*
|
nExecute := WebMessageBox::Question("确认要发布当前的所有采购订单吗？");
|
|
if( nExecute = 0)
|
{
|
OutMsg :="";
|
bResult := H_FunctionClass::SM_MaterialPurchaseIssuer(OutMsg,MacroPlan,"-",ApplicationMacroPlanner.GetUserName());
|
if( OutMsg.Length()>0)
|
{
|
if(bResult)
|
{
|
WebMessageBox::Success( OutMsg);
|
}
|
else
|
{
|
WebMessageBox::Warning( OutMsg);
|
}
|
}
|
}
|
*]
|
GroupServerCalls: false
|
}
|
}
|
