1 : C DEBRAN SOURCE CHAT 05/01/12 22:38:41 5004 2 : SUBROUTINE DEBRAN 3 : C======================================================================= 4 : C 5 : C sous routine pour remplacer l'appel dans pilot à un opérateur 6 : C qui a été debranché 7 : C 8 : C======================================================================= 9 : C 10 : IMPLICIT INTEGER(I-N) 11 : -INC CCOPTIO 12 : MOTERR(1:4) = LOCERR 12 : CALL ERREUR (-291) 13 : RETURN 14 : END 15 :
© Cast3M 2003 - All rights reserved.
Disclaimer