Acomba (Forum)
Pourquoi ne pas devenir membre du forum ?

Identifiez-vous ou Inscrivez-vous afin d'accéder à l'inrégralité du forum:
Accès à toutes les catégories du forum,
Entraide entre les 6 500 membres, et ce nombre s'accroît quotidiennement!

Notez que ce forum est indépendant de la société Acceo Solutions, éditrice du logiciel Acomba.
Connexion

Récupérer mon mot de passe


Clé de tri

Aller en bas

Clé de tri

Message  kiid le Mar 16 Aoû 2011 - 16:41

Bonjour,

J'aimerais supprimer toutes les clé de tri de tous mes client en 1 seule opération, Est-ce possible ?

J'aimerais également décocher la case Prélèvement par paiement préautorisé de tous mes client ...

Merci de me donner des astuces.

kiid

Nombre de messages : 1
Date d'inscription : 18/11/2009

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Clé de tri

Message  hench le Jeu 1 Sep 2011 - 17:56

À ma connaissance, il n'existe pas de fonction dans Acomba pour effectuer une telle opération directement.

Par voie programmation, oui, et cela se fait très facilement.

cheers

Si un tel outil vous serait utile et vous intéresse, je pourrais vous le programmer en quelques minutes. Gratuitement!

Le cas échéant, laissez moi un message privé. !



hench

Nombre de messages : 163
Date d'inscription : 30/12/2008

Fiche d'Entreprise
Nom de l'entreprise:

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Clé de tri

Message  maxell2222 le Dim 4 Sep 2011 - 9:39

bien il existe par ODBC qui permet de faire cela cela traite la base de données dans ACCES

maxell2222

Nombre de messages : 7
Age : 42
Ville : Amos (Abitibi)
Date d'inscription : 03/09/2011

Voir le profil de l'utilisateur

Revenir en haut Aller en bas

Re: Clé de tri

Message  Lartis le Jeu 29 Sep 2011 - 0:18

Avec ODBC:
UPDATE Customer SET Customer.CuSortKey = "";

Avec SDK: C:\Fortune\SDK\0C_ACOX.HLP pourra vous aider

Vous pourriez assez facilement modifier l'exemple "Modification du numéro du client" our changer le CuSortKey à la place.

Code:
Sub ChangeCustomerNumber()
'Déclarations
Dim CustomerIndex As New AcoX0125.CustomerKey
Dim CustomerData As New AcoX0125.Customer
Dim Error As Long
Dim CardPos As Long

'Met toutes les propriétés de l'interface multi-index à vide
CustomerIndex.XBlankKey   
'Recherche du client #12345 dans l'index 1 pour obtenir
'son CardPos
CustomerIndex.CuNumber = "12345"
Error = Acomba.FindKey(CustomerIndex, 1)
If Error = 0 Then

CardPos = CustomerIndex.CuCardPos
'Réservation de la fiche
Error = Acomba.ReserveCard(CustomerData, CardPos)
If Error = 0 Then

'Assignation de la nouvelle valeur de numéro de
'client à PK_Number
CustomerData.PK_Number = "2961234"
'Réservation de la nouvelle clé primaire
Error = Acomba.ReserveCardNumber(CustomerData)
If Error = 0 Then

'Assignation de la nouvelle valeur du numéro de client
'à CuNumber
[b]CustomerData.CuNumber = CustomerData.PK_Number[/b]
'Enregistrement des modifications
Error = Acomba.ModifyCard(CustomerData, CardPos, 1)
If Error = 0 Then

MsgBox "Modification complétée avec succès"

Else

MsgBox ("Erreur: " & Acomba.GetErrorMessage(Error))
'Libération de la clé primaire et de la fiche
'si la modification n'est pas complétée
Error = Acomba.FreeCardNumber(CustomerData)
If Error <> 0 Then

MsgBox ("Erreur: " & Acomba.GetErrorMessage(Error))

End If
Error = Acomba.FreeCard(CustomerData, CardPos)
If Error <> 0 Then

MsgBox ("Erreur: " & Acomba.GetErrorMessage(Error))

End If

End If

Else

MsgBox ("Erreur: " & Acomba.GetErrorMessage(Error))
'Libération de la fiche si la réservation de la clé
'primaire n'est pas complété
Error = Acomba.FreeCard(CustomerData, CardPos)
If Error <> 0 Then

MsgBox ("Erreur: " & Acomba.GetErrorMessage(Error))

End If

End If

Else

MsgBox ("Erreur: " & Acomba.GetErrorMessage(Error))

End If

Else

MsgBox ("Erreur: " & Acomba.GetErrorMessage(Error))
End If
End Sub

Sans le SDK ni ODBC: il faut passer les clients un à la fois, il n'y a aucun autre moyen.

_________________
Sylvain Laurence, partenaire, revendeur et développeur Acomba
Groupe Conseil Lartis Inc. www.lartis.com
avatar
Lartis

Nombre de messages : 640
Ville : Laval
Date d'inscription : 03/04/2007

Fiche d'Entreprise
Nom de l'entreprise: Groupe Conseil Lartis Inc.

Voir le profil de l'utilisateur http://www.lartis.com

Revenir en haut Aller en bas

Re: Clé de tri

Message  Contenu sponsorisé


Contenu sponsorisé


Revenir en haut Aller en bas

Revenir en haut


 
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum