Création article à gammes [RESOLU]

Forum consacré aux développements d'applications interfacées avec les logiciels Sage

Modérateurs: Super Modérateur, Modérateurs

Règles du forum
Merci de prendre connaissance des règles d'utilisation du forum

Avant de poster un nouveau message, utilisez la fonction RECHERCHER. Indiquez la VERSION de votre logiciel et toutes informations utiles à la résolution de votre question. Ne rédigez pas vos messages en MAJUSCULES. Soyez courtois et pensez aux formules de POLITESSE d'usage. Les messages à vocation COMMERCIALE ou PUBLICITAIRE seront supprimés.

*** LORSQU'UN SUJET EST RESOLU, SON AUTEUR DOIT EDITER LE 1ER MESSAGE DU SUJET EN HAUT DE PAGE ET COCHER "SUJET RESOLU" ***

Création article à gammes [RESOLU]

Messagede jeremie » Mer 20 Avr 2011 10:58

Bonjour,

Je cherche à créer des articles à gammes via les objets métiers.
La création d'articles "standards" fonctionne ; pour les articles à gamme, j'ai voulu rajouter "AR_TYPE = ArticleType.ArticleTypeGamme", mais j'ai ensuite une "erreur de cohérence".

Quelqu'un aurait une idée concernant mon problème ?
Merci bien !
Dernière édition par jeremie le Jeu 21 Avr 2011 17:48, édité 1 fois.
jeremie
Posteur néophyte
Posteur néophyte
 
Messages: 5
Inscription: Mer 30 Mar 2011 09:24

Re: Création article à gammes

Messagede jeremie » Mer 20 Avr 2011 12:16

Je vous mets le bout de code, des fois que quelqu'un voit ce qu'il manque/pose problème.

Code: Tout sélectionner
With product
    .AR_Ref = sku
    .AR_Type = ArticleType.ArticleTypeGamme
    .AR_Design = name
    .AR_PrixTTC = True
    .AR_PrixVen = Val(price)
    .AR_PrixAchat = Val(cost)
    .Famille = baseCom.FactoryFamille.ReadCode(FamilleType.FamilleTypeDetail, famille)
    .SetDefault()
    .AR_SuiviStock = SuiviStockType.SuiviStockTypeSerie
    .AR_PoidsNet = Val(weight)
    .WriteDefault()
End With
jeremie
Posteur néophyte
Posteur néophyte
 
Messages: 5
Inscription: Mer 30 Mar 2011 09:24

Re: Création article à gammes [RESOLU]

Messagede jeremie » Jeu 21 Avr 2011 16:44

Bon bah grâce à moi même, j'ai réussi à trouver comment créer des articles à gammes ! \o/

Pour ceux intéressés, en gros il faut :

Définir la gamme 1 (et 2 si besoin)
Code: Tout sélectionner
Dim ga As IBPGamme = baseCom.FactoryGamme.ReadIntitule("Pierres")

Ensuite, on créé le produit en lui passant cette gamme :

Code: Tout sélectionner
With product
    .AR_Ref = sku
    .AR_Type = ArticleType.ArticleTypeGamme
    .AR_Design = name
    .Gamme1 = ga
    .Famille = baseCom.FactoryFamille.ReadCode(FamilleType.FamilleTypeDetail, famille)
    .WriteDefault()
End With


Ensuite, si vous voulez affecter des valeurs/produitsAgammes :

Code: Tout sélectionner
Dim p1 As IBOArticleGammeEnum3 = product.FactoryArticleGammeEnum1.Create()
p1.EG_Enumere = "plop"
p1.WriteDefault()

Et zouuu :lol:
jeremie
Posteur néophyte
Posteur néophyte
 
Messages: 5
Inscription: Mer 30 Mar 2011 09:24


Retourner vers Développements ODBC, Objets métiers, SQL

Qui est en ligne

Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 0 invités