Il existe un coût étendu incorrect sur une ligne de détail de bon de commande lorsque l’écran De bon de commande (04.250.00) est personnalisé
Cet article fournit une solution à un problème où il existe un coût étendu incorrect sur une ligne de détails de bon de commande lorsque l’écran De bon de commande (04.250.00) est personnalisé.
S’applique à : Microsoft Dynamics SL 2011
Numéro de base de connaissances d’origine : 2953411
Symptômes
Lorsque vous personnalisez la maintenance des bons de commande, vous remarquerez peut-être que le coût étendu sur une ligne de détails de bon de commande est incorrect.
Résolution
Note
Cette solution de contournement ne doit être utilisée que si la base de données est une base de données monétaire unique.
Ajoutez le code personnalisé suivant à l’événement PORef_Chk
et l’événement Spread1_LineGotFocus
pour définir une valeur par défaut sur le champ personnalisé. Cela permet de s’assurer qu’une valeur est placée dans le champ et évite la situation où l’utilisateur est invité à abandonner les modifications apportées à la ligne de détail.
Private Sub cpolineref_Chk(ChkStrg As String, retval As Integer)
Dim CtlVal As String
CtlVal = GetObjectValue("xuser1")
If (Trim$(CtlVal) = "") Then
Call SetObjectValue("xuser1", "new hot")
End If
End Sub
Private Sub Spread1_LineGotFocus(maintflg As Integer, retval As Integer)
Dim CtlVal As String
If (maintflg <> NEWROW) Then
CtlVal = GetObjectValue("xuser1")
If (Trim$(CtlVal) = "") Then
Call SetObjectValue("xuser1", "new hot")
End If
End If
End Sub