Affichage indice en chiffre

[iPoilz]

Bonjour à tous,

Dans mon entreprise on différencie les plans de définition des plans de fabrication. On aimerait sur le plan de fab afficher l'indice majeur de ce plan, mais sous forme de chiffre histoire de différencier un peu. Je crois pas que ça soit possible directement, donc je pensais passer un moyen détourné.
Il me semble qu'il est possible de créer un paramètre tableau qui accepte l'indice (A,B,C...) en entrée et renvoie un chiffre en sortie (1,2,3...). Or je n'y arrive pas, comment faire ?

Merci

[SPMag]

Bonjour,

Tu peux, en faisant clic droit sur la mise en plan, Autres > Texte de la révision. A la place de "A", tu entres "1". Ainsi à chaque validation du plan, l'indice s'incrémentera numériquement.

[iPoilz]

Merci,

Effectivement ça fonctionne. Par contre si je le fais sur mon modèle de document, le compteur est ré initialisé et donc reviens à A quand je mets en plan une nouvelle pièce...

[SPMag]

Ah, m**de… Je n'ai pas fait le test sur un modèle de document. Je pensais que ça le garderai en mémoire...

[iPoilz]

Bonjour à tous,

Bon pour régler mon problème, j'ai sorti l'artillerie lourde, j'ai fait un script bien bourrin.
Je le publie pour ceux qui serait intéressé :
- Passer en Etape fond de plan
- Crée un paramètre texte "Revision_lettre" avec comme valeur "=$'Révision majeure'"

Screen indice en chiffre.png

- Crée un paramètre texte "Revision_chiffre" puis cliquer sur le + à coté de valeur pour créer un script.
- Coller ce code :

Code : Tout sélectionner

'Compare l'indice en lettre pour le transformer en chiffre

Dim TexteDeBase As String = Revision_lettre
Dim TexteFinal As String
If TexteDeBase= "A"  Then 
    TexteFinal=1
ElseIf TexteDeBase="B" Then
    TexteFinal=2
ElseIf TexteDeBase="C" Then
    TexteFinal=3
ElseIf TexteDeBase="D" Then
    TexteFinal=4
ElseIf TexteDeBase="E" Then
    TexteFinal=5
ElseIf TexteDeBase="F" Then
    TexteFinal=6
ElseIf TexteDeBase="G" Then
    TexteFinal=7
ElseIf TexteDeBase="H" Then
    TexteFinal=8
ElseIf TexteDeBase="I" Then
    TexteFinal=9
ElseIf TexteDeBase="J" Then
    TexteFinal=10
ElseIf TexteDeBase="K" Then
    TexteFinal=11
ElseIf TexteDeBase="K" Then
    TexteFinal=12
ElseIf TexteDeBase="L" Then
    TexteFinal=13
ElseIf TexteDeBase="M" Then
    TexteFinal=14
ElseIf TexteDeBase="N" Then
    TexteFinal=15
ElseIf TexteDeBase="O" Then
    TexteFinal=16
ElseIf TexteDeBase="P" Then
    TexteFinal=17
ElseIf TexteDeBase="Q" Then
    TexteFinal=18
ElseIf TexteDeBase="R" Then
    TexteFinal=19
ElseIf TexteDeBase="S" Then
    TexteFinal=20
ElseIf TexteDeBase="T" Then
    TexteFinal=21
ElseIf TexteDeBase="U" Then
    TexteFinal=22
ElseIf TexteDeBase="V" Then
    TexteFinal=23
ElseIf TexteDeBase="W" Then
    TexteFinal=24
ElseIf TexteDeBase="X" Then
    TexteFinal=25
ElseIf TexteDeBase="Y" Then
    TexteFinal=26
ElseIf TexteDeBase="Z" Then
    TexteFinal=27
Else
    TexteFinal= "Putain dépassé indice Z, vous vous êtes vraiment vautré sur celle-ci ! Rajouter des lettres au script !"
End If
Return TexteFinal

Utiliser ce paramètre texte dans le cartouche

Bonnes fêtes !

[La loutre]

En VB, si tu récupères le code ASCII d'une lettre via la fonction Asc() tu auras un entier. Pour le A majuscule c'est 65. Si tu soustrait 64, tu auras 1. Le B majuscule c'est 66, 66-64 ça fait 2, etc...
Avec cette approche tu n'aura jamais d'erreur.

[iPoilz]

Effectivement je me doutais qu'il y a des solutions plus propre

[La loutre]

Ça évite d'insulter ton prochain à la fin du script

[iPoilz]

J'espère qu'un jour quelqu'un se tapera une bonne tranche de rire grâce à moi

[JuP]

J'espère qu'un jour quelqu'un se tapera une bonne tranche de rire grâce à moi

C'est fait

[iPoilz]

Je viens de me rendre compte à l'usage que je suis vraiment bête car malgré ma révision en chiffre, le tableau d'indice lui est toujours en lettre ><
J'imagine qu'il n'y a pas moyen de changer ça ?

[JuP]

Question débile, pourquoi ne pas modifier la façon dont TS nomme les majeures? (désolé pour l'anglais):

2022-01-05_08-31-05.png

2022-01-05_08-31-16.png

[iPoilz]

Malheureusement dans clic droit, autres, j'ai que "Textes de la révision" et dedans il n'y a que "Texte de la révision majeure" etc sans aucun "premier" ni emplacement à cocher.

Comme dit plus haut si dans cette interface, je force 1 à la place de A, ça marche mais pas quand je l'utilise en tant que modèle de document, là ça me le ré-initie à la création.

J'imagine que la modif à dû être fait quelque part entre la 7.13 et la 7.15, une raison supplémentaire pour faire la MAJ !

[JuP]

J'imagine que la modif à dû être fait quelque part entre la 7.13 et la 7.15, une raison supplémentaire pour faire la MAJ !

Mince j'avais oublié ça, oui ça a été fait ces dernières années je m'en souviens bien Ca et l'incrément manuel des révisions majeures...