Créer alerte - erreur correction usure

[dodochef]

Bonjour et merci pour l'aide


Je voudrais créer un message d'alerte msg:(" correction excessif ")
quand une correction d'usure est trop importante sur X ou z

Exemple: j'ai un collègue qui a taper une usure en X de 0.9 sans vérifier qu'il a mal taper sa correction. Il devait taper 0.09 de correction donc piece HS!!
Pour éviter les erreurs, je recherche une solution sous prog qui alerte quand dépassement sup a 0.3 sur X ou Z En positif ou négatif

Avez vous la solution prog

Merci....

 

[Menfred77]

Bonjour Dodochef,

De quelle commande numérique parlons-nous ? Est-ce du Siemens 840D ?

 

[dodochef]

Bonjour

Oui c'est bien 840D...

 

[laurent12100]

c'est sûrement pas le plus simple mais si c'est que pour 1 outil ,

tu dois pouvoir attribuer la valeur de correction au paramètre correction de cet outil,

en début de programme tu créé une variable que le collègue modifiera,
cette variable sera soumis à 2 conditions , mini est maxi
Si ok, la valeur sera ensuite copié dans le paramètre de l'outil
Si non fin de programme

Pas contre elle va écraser la valeur dans ta page outils, donc il ne faut pas se tromper

 

[dodochef]

Ok. Je vais voir cela sur manuel siemens possibilité sur $TC_DP12 et DP13 usure: . Si quelqu'un a un exemple a me donner. Je prends

Et Merci

 

[laurent12100]

genre sur NUM :

les paramètres sont des E..... chez d'autre se sera ??
les variables des L... chez d'autre se sera #...
G79 N... est un saut la ligne N.. sans retour chez d'autre se sera du GOTO...


%
------
(correcteur Outil T... a modifier - initialement à zéro)
L1=0




(Limite basse)
L2 = ....
(Limite haute)
L3 =.....
------
(Controle correcteur minimum)
G79 N9000 L1<L2 (si L1 inférieur L2 saut a la ligne N9000)

(Controle correcteur maximum)
G79 N9000 L1>L3 (si L1 supérieur L3 saut a la ligne N9000)


E.... =L1 (le paramaètre E.... sera égale a la valeur de la variable L1)

---------------------
Programme
---------------------

N100
......
......
......

N9000
M2





pour les limites tu peux aussi les écrires directement et ne pas utiliser les 2 variables L2 et L3 comme dans mon exemple

 

[laurent12100]

je ne sais pas comment cela fonctionne sur siemens, si tu fais un redémarrage il faut bien que la CN lise ces lignes

 

[bernard-odile]

genre sur NUM :

les paramètres sont des E..... chez d'autre se sera ??
les variables des L... chez d'autre se sera #...
G79 N... est un saut la ligne N.. sans retour chez d'autre se sera du GOTO...


%
------
(correcteur Outil T... a modifier - initialement à zéro)
L1=0




(Limite basse)
L2 = ....
(Limite haute)
L3 =.....
------
(Controle correcteur minimum)
G79 N9000 L1<L2 (si L1 inférieur L2 saut a la ligne N9000)

(Controle correcteur maximum)
G79 N9000 L1>L3 (si L1 supérieur L3 saut a la ligne N9000)


E.... =L1 (le paramaètre E.... sera égale a la valeur de la variable L1)

---------------------
Programme
---------------------

N100
......
......
......

N9000
M2





pour les limites tu peux aussi les écrires directement et ne pas utiliser les 2 variables L2 et L3 comme dans mon exemple

Impec .
C'est ce que j'avais fais quand je bossais ( en maintenance et j'en avais marre de redresser des tourelles, mors .... etc... ) . Sur 760 et 1060 sur le même principe . Ça permettait aussi de voir si qq chose dérivait sur la machine ( très grande série. 1000 pièces/équipe. 24/24 et 7/7 )
Il me semble que j'avais aussi fais sur les 840 mais je me rappele plus . .
Tout ça est loin et c'est tant mieux .

 

[Menfred77]

Voici une petite séquence que tu peux inscrire dans un sous-programme. Comme tu le vois sur les images suivantes, j'ai inscrit 0.31 dans l'usure de l'outil courant. Cette séquence doit être lu après l'appel de l'outil, sinon c'est un peu plus compliqué à réaliser mais pas impossible.

En claire, SI la valeur absolue de l'usure X de l'outil appelé est supérieure à 0.3, on tombe dans une boucle sans fin LOOP. Le seul moyen de s'en sortir est un RESET du programme et de corriger le problème. Une boucle LOOP est par définition une boucle sans fin !

ATTENTION, les trois apostrophes du mot "l'usure" dans le message doivent être conservées, sinon cela ne fonctionne pas !

En haut de la seconde image, on voit le message écrit en vert. Tu peux faire la même chose avec l'usure en Z ($TC_DP13).

IF ABS($TC_DP12[$P_TOOLNO,$P_TOOL])>0.3
LOOP
MSG("Valeur de l'''usure X="<<$TC_DP12[$P_TOOLNO,$P_TOOL]<<" pour + ou - 0.3 maxi. Reset ")
M0
STOPRE
ENDLOOP
ENDIF
M17

 

[MegaHertz]

Et s'il se trompe de numéro d'outil ?

 

[Menfred77]

Si on veut contrôler un autre outil de la listes, il faut écrire le nom de l'outil entre les guillemets. De cette façon, on peut contrôler tous les outils avant le démarrage du programme.

IF ABS($TC_DP12[GETT("DRILL_32",1),1])>0.3
LOOP
MSG("Valeur de l'''usure X="<<$TC_DP12[gett("DRILL_32",1),1]<<" pour + ou - 0.3 maxi. Reset ")
M0
STOPRE
ENDLOOP
ENDIF
M17

 

[dodochef]

Merci beaucoup , je vais voir cela...

 

[Menfred77]

Pas de souci, avec plaisir ! Dis moi si le bout de code tourne bien sur ta bécane. Si jamais tu as besoin de pousser le truc un peu plus loin , fais-moi signe, on pourra encore l'améliorer ensemble.