Standard Cost in Purchase Order Entry

Create a Foreign Key View into PartCost & display the std cost buckets.

Rob




________________________________
From: glpennington <glpennington@...>
To: vantage@yahoogroups.com
Sent: Friday, June 19, 2009 9:00:46 AM
Subject: [Vantage] Standard Cost in Purchase Order Entry





My users would like to see the Standard Cost when doing Purchase Order Line Entry. Costing errors can, in bulk, cost a company a lot of money. Epicor replied that there are not enough requests to justify the enhancement. If you feel that this is a good idea, please turn in a SCR. Perhap, with enough requests, they will change thier minds.

Has anyone found a way to show Standard Cost on the PO Entry screen without resorting to making people use a dashboard?

Thanks in advance.







[Non-text portions of this message have been removed]
My users would like to see the Standard Cost when doing Purchase Order Line Entry. Costing errors can, in bulk, cost a company a lot of money. Epicor replied that there are not enough requests to justify the enhancement. If you feel that this is a good idea, please turn in a SCR. Perhap, with enough requests, they will change thier minds.

Has anyone found a way to show Standard Cost on the PO Entry screen without resorting to making people use a dashboard?

Thanks in advance.
We have a GUI customization in place that supplies the 'std' cost to the price field if the price field is zero on new PO Lines. I am sure the code could be adapted to just display the price in a textbox - caveat: we only use one cost id - if you have multiple ids then it will be problematic....

Watch code wrapping.....
<br/>
Private Sub PODetail_AfterFieldChange(ByVal sender As object, ByVal args As DataColumnChangeEventArgs) Handles PODetail_Column.ColumnChanged
'// ** Argument Properties and Uses **
'// args.Row("[FieldName]")
'// args.Column, args.ProposedValue, args.Row
'
'Add Event Handler Code
'
Select Case args.Column.ColumnName

Case "PartNum"
If (edvPODetail.dataView(edvPODetail.Row)("UnitCost") = 0)
Dim recordSelected1 As Boolean
Dim showSearch1 As Boolean = False
Dim whereClause1 As String = "partNum = '" & args.Row("PartNum") & "' And costID = '1'"
Dim dsCost As DataSet = SearchFunctions.listLookup(POEntryForm, "PartCostSearchAdapter", recordSelected1, showSearch1, whereClause1)
If (recordSelected1 = True)
edvPODetail.dataView(edvPODetail.Row).BeginEdit
edvPODetail.dataView(edvPODetail.Row)("DocUnitCost") = dsCost.Tables(0).Rows(0)("StdMaterialCost")
edvPODetail.dataView(edvPODetail.Row).EndEdit
edvPODetail.Notify( New EpiNotifyArgs(POEntryForm, edvPODetail.Row, edvPODetail.Column))
End If
End If
Case Else

End Select

End Sub



--- In vantage@yahoogroups.com, "glpennington" <glpennington@...> wrote:
>
> My users would like to see the Standard Cost when doing Purchase Order Line Entry. Costing errors can, in bulk, cost a company a lot of money. Epicor replied that there are not enough requests to justify the enhancement. If you feel that this is a good idea, please turn in a SCR. Perhap, with enough requests, they will change thier minds.
>
> Has anyone found a way to show Standard Cost on the PO Entry screen without resorting to making people use a dashboard?
>
> Thanks in advance.
>
Greatly appreciated.

I'll give it a try.


--- In vantage@yahoogroups.com, "bw2868bond" <bwalker@...> wrote:
>
> We have a GUI customization in place that supplies the 'std' cost to the price field if the price field is zero on new PO Lines. I am sure the code could be adapted to just display the price in a textbox - caveat: we only use one cost id - if you have multiple ids then it will be problematic....
>
> Watch code wrapping.....
> <br/>
> Private Sub PODetail_AfterFieldChange(ByVal sender As object, ByVal args As DataColumnChangeEventArgs) Handles PODetail_Column.ColumnChanged
> '// ** Argument Properties and Uses **
> '// args.Row("[FieldName]")
> '// args.Column, args.ProposedValue, args.Row
> '
> 'Add Event Handler Code
> '
> Select Case args.Column.ColumnName
>
> Case "PartNum"
> If (edvPODetail.dataView(edvPODetail.Row)("UnitCost") = 0)
> Dim recordSelected1 As Boolean
> Dim showSearch1 As Boolean = False
> Dim whereClause1 As String = "partNum = '" & args.Row("PartNum") & "' And costID = '1'"
> Dim dsCost As DataSet = SearchFunctions.listLookup(POEntryForm, "PartCostSearchAdapter", recordSelected1, showSearch1, whereClause1)
> If (recordSelected1 = True)
> edvPODetail.dataView(edvPODetail.Row).BeginEdit
> edvPODetail.dataView(edvPODetail.Row)("DocUnitCost") = dsCost.Tables(0).Rows(0)("StdMaterialCost")
> edvPODetail.dataView(edvPODetail.Row).EndEdit
> edvPODetail.Notify( New EpiNotifyArgs(POEntryForm, edvPODetail.Row, edvPODetail.Column))
> End If
> End If
> Case Else
>
> End Select
>
> End Sub
>
>
>
> --- In vantage@yahoogroups.com, "glpennington" <glpennington@> wrote:
> >
> > My users would like to see the Standard Cost when doing Purchase Order Line Entry. Costing errors can, in bulk, cost a company a lot of money. Epicor replied that there are not enough requests to justify the enhancement. If you feel that this is a good idea, please turn in a SCR. Perhap, with enough requests, they will change thier minds.
> >
> > Has anyone found a way to show Standard Cost on the PO Entry screen without resorting to making people use a dashboard?
> >
> > Thanks in advance.
> >
>