| | |
|---|
| | | Precondition: |
|---|
| | | [* |
|---|
| | | feedback := Translations::FilllingCapacity_ValidateInput(); |
|---|
| | | checkValue := not Coefficient.Text() = '' and not PriorityFactorName.Text() = ''; |
|---|
| | | |
|---|
| | | checkValue := not Coefficient.Text() = '' |
|---|
| | | if(not checkValue ) |
|---|
| | | { |
|---|
| | | feedback := Translations::PriorityFactor_CheckNameValid(); |
|---|
| | | editData := DataHolderEditPriorityFactor.Data(); |
|---|
| | | checkValue := not PriorityFactor::CheckNameValid( MacroPlan,editData.BusinessType(),[Real]Coefficient.Text(),PriorityFactorName.Text(),Desc.Text()); |
|---|
| | | |
|---|
| | | return checkValue; |
|---|
| | | } |
|---|
| | | |
|---|
| | | return checkValue |
|---|
| | | *] |
|---|
| | | QuillAction |
|---|
| | | { |
|---|
| | | Body: |
|---|
| | | [* |
|---|
| | | Form.ClickBtnOK(); |
|---|
| | | priortyFactor := select( MacroPlan,PriorityFactor,pf,pf.Name() = PriorityFactorName.Text()); |
|---|
| | | if( not isnull( priortyFactor )){ |
|---|
| | | WebMessageBox::Error( "系统内已存在该优先级因子"); |
|---|
| | | }else { |
|---|
| | | Form.ClickBtnOK(); |
|---|
| | | } |
|---|
| | | *] |
|---|
| | | GroupServerCalls: false |
|---|
| | | } |
|---|
