REGISTRE ENTIER erreur_780042462
############################################################################
# TRAITEMENT Twhapi_trt.src
#	Article DC Twha en entree de Platine
#	Pcode de traitement
#	Creation le 28/09/2005
# Historique
# 19/04/06 FO 180 dump article
# 21/01/11 - G3R1 lot4 Verification/Correction des variables (constantes, entiers, pointeurs) 
# 
############################################################################


trace("=========== debut Pcode TRAITEMENT  =============")

# ALLOCATION DES POINTEURS
# neant

#erreur = i_fdump_art(g_iartin)

################################################################
#       Test syntaxique
################################################################
# neant

################################################################
#       Tests semantiques
################################################################


################################################################
#       Tests croises
################################################################


########################################################

# Cpt applicatifs
########################################################

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

RETOUR TRAIT_OK

########################################################
#       Stockage en errone
########################################################

POINT   STOCKE_ERRONE

trace2("Stockage en ERRONE %s", "", "")
erreur_780042462 = i_make_art_rej(g_iartin, g_iartout5, 0)
erreur_780042462 = i_stocke_art(g_iartout5, 0, PT_ERRONE, 0)

RETOUR TRAIT_OK

########################################################
# Stockage en Elimine Divers
########################################################

POINT STOCKE_DIV

trace( "Pcode de traitement   Stockage en DIVERS" )

erreur_780042462 = i_stocke_art( g_iartin, 0, PT_DIVERS, 0 )

RETOUR TRAIT_OK
#___________________________ FIN Twhapi_trt.src_________________________________
