REGISTRE ENTIER erreur_800003253
# ---------------------------------------------------------------------------
#
# FICHIER     : %name%
#
# VERSION     : %version: %
#
# AUTEUR      : %created_by: %
#
# CREE le     : %date_created%
#
# MODIFIE le  : %date_modified: %
#
# DESCRIPTION : Traitement / Article Evenement Changement Etat
#
# HISTORIQUE  : 
#	PM	01/08/94	Creation
#
#      12/02/2002 - CMI : Mail de P.Favier
#               Supprimer l'appel a i_DEP_EcrireEtatPart
# ---------------------------------------------------------------------------

# ---------------------------------------------------
# VARIABLES
# ---------------------------------------------------

# ---------------------------------------------------
# TRAITEMENT
# ---------------------------------------------------

erreur_800003253 = i_PlvMessEmettre(6215,2,g_iartin,"",0,0,0,0)

# 12/02/2002 - CMI
# erreur=i_DEP_EcrireEtatPart(g_ieec, i_get_art_field(g_iartin, $DATE), 0)

erreur_800003253 = i_stocke_art( g_iartin, 0, PT_ELIMINE, 0 )

RETOUR TRAIT_OK

# fin de fichier
