/*************************************************************************************************************************************/
/* */
/* S I M P L E C O P I E : */
/* */
/* */
/* Definition : */
/* */
/* Cette commande genere une image */
/* dont le nom est le premier argument */
/* d'appel ; elle est le resultat de */
/* la copie de l'image Argument. */
/* */
/* */
/* Author of '$xci/neutre$K' : */
/* */
/* Jean-Francois COLONNA (LACTAMME, 1997??????????). */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* I N T E R F A C E ' listG ' : */
/* */
/* */
/* :Debut_listG: */
/* :Fin_listG: */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* D I R E C T I V E S S P E C I F I Q U E S D E C O M P I L A T I O N : */
/* */
/*************************************************************************************************************************************/
/* Le 20200411102012, j'ai teste ici : */
/* */
/* @define PRAGMA_CPP_____NE_PAS_INCLURE__NO_PARAMETRES_GENERAUX */
/* @define PRAGMA_CPP_____NE_PAS_INCLURE__NO_PARAMETRES_IMAGES__ */
/* */
/* et voici les changements provoques dans le fichier 'v $xci/neutre$PARAM' (les */
/* suppressions sont reperees par "--------------- ") : */
/* */
/* */
/* Parametre.2. : Parametres= */
/* Parametre.2. : --------------- ForcerExecution= */
/* Parametre.2. : ecr= */
/* ............ : editer_compteurs_de_reference= */
/* Parametre.2. : PNG= */
/* ............ : ParametresNonGeneres= */
/* Parametre.2. : --------------- LPNPR= */
/* ............ : --------------- ListerParametresNonParfaitementReconnus= */
/* Parametre.2. : All= */
/* Parametre.2. : TabulationParametres= */
/* Parametre.2. : SautParametres= */
/* Parametre.2. : PS= */
/* ............ : ParametresSynonymes= */
/* Parametre.2. : PSG= */
/* ............ : ParametresSynonymesGrouper= */
/* Parametre.2. : --------------- ParametresLongueurMaximale= */
/* Parametre.2. : CHAI= */
/* ............ : FORMAT_CHAI= */
/* Parametre.2. : CHAR= */
/* ............ : FORMAT_CHAR= */
/* Parametre.2. : AlternerParametres= */
/* Parametre.2. : TypeAlternanceParametres= */
/* Parametre.2. : NomParametres= */
/* Parametre.2. : --------------- PFP= */
/* ............ : --------------- PreFixeParametres= */
/* Parametre.2. : --------------- PIA= */
/* ............ : --------------- ParametresInteractifsActivation= */
/* Parametre.2. : PII= */
/* ............ : ParametresInteractifsIntroduction= */
/* Parametre.2. : ChC= */
/* ............ : ChronometrerCommande= */
/* Parametre.2. : NRF= */
/* ............ : NeRienFaire= */
/* Parametre.2. : IBP= */
/* ............ : IdentifiantBrancheParallele= */
/* ............ : IdentifiantBranchesParalleles= */
/* Parametre.2. : --------------- FIJXYvf= */
/* ............ : --------------- FconversionIJXY_vide_forcee= */
/* Parametre.2. : --------------- FFvf= */
/* ............ : --------------- FconversionF_vide_forcee= */
/* Parametre.2. : --------------- FKvf= */
/* ............ : --------------- FconversionK_vide_forcee= */
/* Parametre.2. : --------------- FCCLCNvf= */
/* ............ : --------------- FconversionCCLCN_vide_forcee= */
/* Parametre.2. : --------------- UNDEF= */
/* ............ : --------------- avertir_UNDEF= */
/* Parametre.2. : --------------- FLOT__UNDEF= */
/* ............ : --------------- FUNDEF= */
/* ............ : --------------- avertir_FLOT__UNDEF= */
/* Parametre.2. : --------------- IJXY= */
/* ............ : --------------- cIJXY= */
/* ............ : --------------- cJXYI= */
/* ............ : --------------- confondre_J_X_Y_avec_I= */
/* Parametre.2. : B1010= */
/* ............ : B1016= */
/* ............ : Base_10_10= */
/* ............ : Base_10_16= */
/* ............ : IB1010= */
/* ............ : IB1016= */
/* ............ : IBase_10_10= */
/* ............ : IBase_10_16= */
/* Parametre.2. : --------------- B1610= */
/* ............ : --------------- B1616= */
/* ............ : --------------- Base_16_10= */
/* ............ : --------------- Base_16_16= */
/* ............ : --------------- IB1610= */
/* ............ : --------------- IB1616= */
/* ............ : --------------- IBase_16_10= */
/* ............ : --------------- IBase_16_16= */
/* Parametre.2. : --------------- XB1010= */
/* ............ : --------------- XB1016= */
/* ............ : --------------- XBase_10_10= */
/* ............ : --------------- XBase_10_16= */
/* Parametre.2. : --------------- XB1610= */
/* ............ : --------------- XB1616= */
/* ............ : --------------- XBase_16_10= */
/* ............ : --------------- XBase_16_16= */
/* Parametre.2. : --------------- Gmajuscules= */
/* Parametre.2. : --------------- Gminuscules= */
/* Parametre.2. : --------------- Gcarret= */
/* Parametre.3. : --------------- FormatEditerCaracteresNonReconnus= */
/* ............ : --------------- fecnr= */
/* Parametre.3. : --------------- SupprimerBlancDeuxPoints= */
/* ............ : --------------- sbdp= */
/* Parametre.3. : --------------- SupprimerBlancEgal= */
/* ............ : --------------- sbe= */
/* Parametre.3. : --------------- SupprimerBlancRedondant= */
/* ............ : --------------- sbr= */
/* Parametre.3. : --------------- Pmajuscules= */
/* Parametre.3. : --------------- Pminuscules= */
/* Parametre.3. : --------------- Pcarret= */
/* Parametre.2. : cpp= */
/* Parametre.2. : SigneInt= */
/* Parametre.2. : SigneFlot= */
/* Parametre.2. : ModeFlot= */
/* Parametre.2. : ChiffresFlot= */
/* Parametre.2. : --------------- Nchiffres= */
/* ............ : --------------- NombreMaximalChiffresNumeros= */
/* ............ : --------------- nmcn= */
/* Parametre.2. : DoubleDefinition= */
/* Parametre.2. : EditerCommandes= */
/* Parametre.2. : NomSynthetique= */
/* Parametre.2. : ListerMessages= */
/* Parametre.2. : Environnement= */
/* ............ : SETENV= */
/* ............ : setenv= */
/* Parametre.2. : --------------- SourceProgramme= */
/* Parametre.2. : ListeFonctions= */
/* Parametre.2. : --------------- SeUn= */
/* ............ : --------------- SetenvUniverselles= */
/* Parametre.2. : Setenv= */
/* Parametre.2. : SetenvSO= */
/* Parametre.2. : Versions= */
/* Parametre.2. : VersionsSO= */
/* Parametre.2. : Bugs= */
/* Parametre.2. : Includes= */
/* Parametre.2. : --------------- Prin= */
/* Parametre.2. : Prer= */
/* Parametre.2. : Prme= */
/* Parametre.2. : CAL1= */
/* Parametre.2. : CAL2= */
/* Parametre.2. : CAL3= */
/* Parametre.2. : CAL4= */
/* Parametre.2. : --------------- AccFoncs= */
/* ............ : --------------- AccelerateurFonctions= */
/* Parametre.2. : --------------- EV= */
/* ............ : --------------- EditerVerrou= */
/* ............ : --------------- EditionVerrou= */
/* Parametre.2. : Bloquer= */
/* Parametre.2. : Valider_noms_absolus= */
/* ............ : Vna= */
/* Parametre.2. : --------------- Forcer_validation_noms_absolus= */
/* ............ : --------------- Fvna= */
/* Parametre.2. : Valider_noms_relatifs= */
/* ............ : Vnr= */
/* Parametre.2. : --------------- Forcer_validation_noms_relatifs= */
/* ............ : --------------- Fvnr= */
/* Parametre.2. : --------------- NomsConvertissables= */
/* Parametre.2. : Verifier= */
/* Parametre.2. : --------------- UDT= */
/* ............ : --------------- UtiliserDirectoryTemporaire= */
/* Parametre.2. : --------------- NDT= */
/* ............ : --------------- NumeroDirectoryTemporaire= */
/* Parametre.2. : CTFE= */
/* ............ : ConserverTemporairementFichierExistant= */
/* Parametre.2. : NFNC= */
/* ............ : NomFicherNomCache= */
/* Parametre.2. : --------------- SSP= */
/* ............ : --------------- SubstitutSeparateurPath= */
/* Parametre.2. : --------------- IHIFS= */
/* ............ : --------------- IndexHeuristiqueIdentiteFileSystems= */
/* Parametre.2. : Attendre= */
/* Parametre.2. : --------------- Alleger= */
/* Parametre.2. : ATTENTION= */
/* Parametre.2. : --------------- AVERTISSEMENT= */
/* Parametre.2. : --------------- DEBUG= */
/* Parametre.2. : --------------- DEFAUT= */
/* Parametre.2. : --------------- ERREUR= */
/* Parametre.2. : --------------- MESSAGE= */
/* Parametre.2. : EnTetePrin= */
/* Parametre.2. : EnTetePrer= */
/* Parametre.2. : EnTetePrme= */
/* Parametre.2. : sK_LFet= */
/* ............ : suppression_K_LF_en_tete= */
/* Parametre.2. : --------------- DoQu= */
/* ............ : --------------- DoQu_infinie= */
/* Parametre.2. : --------------- ECE= */
/* ............ : --------------- EditerCodesErreurs= */
/* Parametre.2. : SLF= */
/* ............ : SeuilLectureFichier= */
/* Parametre.2. : --------------- SEF= */
/* ............ : --------------- SeuilEcritureFichier= */
/* Parametre.2. : compacter_1= */
/* Parametre.2. : --------------- taux_compactage_1= */
/* Parametre.2. : decompacter_1= */
/* Parametre.2. : --------------- compatibilite_20061226= */
/* ............ : --------------- \ */
/* generation_d_un_nom_relatif_temporaire_____compatibilite_20061226= */
/* Parametre.2. : ValidMalo= */
/* Parametre.2. : --------------- AMargeMalo= */
/* Parametre.2. : --------------- BMargeMalo= */
/* Parametre.2. : --------------- CheckMalo= */
/* Parametre.2. : --------------- FffDIVZ_a_peu_pres_____epsilon= */
/* Parametre.2. : --------------- Int_indefini= */
/* Parametre.2. : --------------- Float_indefini= */
/* Parametre.1. : ValiderAxes= */
/* Parametre.1. : --------------- CFETD= */
/* ............ : --------------- CoefficientFormeEspaceTriDimensionnel= */
/* Parametre.1. : Xmin= */
/* Parametre.1. : Xmax= */
/* Parametre.1. : Ymin= */
/* Parametre.1. : Ymax= */
/* Parametre.1. : Zmin= */
/* Parametre.1. : Zmax= */
/* Parametre.1. : --------------- Ccompatibilite_20120210= */
/* ............ : --------------- cHOMOTHETIE_Std_____compatibilite_20120210= */
/* Parametre.1. : --------------- Lcompatibilite_20120210= */
/* ............ : --------------- lHOMOTHETIE_Std_____compatibilite_20120210= */
/* Parametre.1. : px= */
/* Parametre.1. : py= */
/* Parametre.1. : pz= */
/* Parametre.1. : tx= */
/* Parametre.1. : ty= */
/* Parametre.1. : tz= */
/* Parametre.1. : UniquementSubstitutions= */
/* ............ : us= */
/* Parametre.1. : EtatFiltrageNiveaux= */
/* ............ : efn= */
/* Parametre.1. : CodeCombinaisonNiveaux= */
/* ............ : ccn= */
/* Parametre.1. : PonderationCombinaisonNiveaux= */
/* ............ : pcn= */
/* Parametre.1. : --------------- EpsilonAxes= */
/* Parametre.1. : --------------- EpsilonNiveaux= */
/* Parametre.1. : EpsilonLissageSubstitution= */
/* Parametre.2. : --------------- cXmin= */
/* ............ : --------------- lXmin= */
/* Parametre.2. : --------------- cXmax= */
/* ............ : --------------- lXmax= */
/* Parametre.2. : --------------- cYmin= */
/* ............ : --------------- lYmin= */
/* Parametre.2. : --------------- cYmax= */
/* ............ : --------------- lYmax= */
/* Parametre.2. : --------------- cZmin= */
/* ............ : --------------- lZmin= */
/* Parametre.2. : --------------- cZmax= */
/* ............ : --------------- lZmax= */
/* Parametre.2. : --------------- carre= */
/* ............ : --------------- carree= */
/* ............ : --------------- rectangulaire= */
/* Parametre.2. : --------------- grand_carre= */
/* ............ : --------------- petit_carre= */
/* Parametre.2. : --------------- carre_X_CHAMP_3D= */
/* Parametre.2. : --------------- carre_Y_CHAMP_3D= */
/* Parametre.2. : --------------- carre_X_CHAMP_3D_____compatibilite_20061128= */
/* Parametre.2. : --------------- carre_Y_CHAMP_3D_____compatibilite_20061128= */
/* Parametre.2. : --------------- carre_X_CHAMP_3D_____compatibilite_20100210= */
/* Parametre.2. : --------------- carre_Y_CHAMP_3D_____compatibilite_20100210= */
/* Parametre.2. : --------------- \ */
/* AXES_COORDONNEES_FERMES_OUVERTS_____compatibilite_20090929= */
/* ............ : --------------- COORDONNEES_____compatibilite_20090929= */
/* Parametre.2. : --------------- \ */
/* AXE_NIVEAUX_OUVERT_FERME_____compatibilite_19951221= */
/* ............ : --------------- compatibilite_19951221= */
/* ............ : --------------- compatibilite_20091015= */
/* Parametre.2. : --------------- X_CHAMP_3D_denormalisee= */
/* ............ : --------------- X_CHAMP_3D_normalisee= */
/* Parametre.2. : --------------- Y_CHAMP_3D_denormalisee= */
/* ............ : --------------- Y_CHAMP_3D_normalisee= */
/* Parametre.1. : Progression= */
/* Parametre.1. : --------------- PasProgression= */
/* Parametre.1. : lnhi= */
/* ............ : load_niveau_hors_image= */
/* Parametre.1. : --------------- lnha= */
/* ............ : --------------- load_niveau_hors_album= */
/* Parametre.1. : --------------- E_SUBSTITUTION= */
/* Parametre.1. : --------------- \ */
/* Fmise_a_jour_du_systeme_de_gestion_de_fichiers_____compatibilite_20121025= */
/* ............ : --------------- compatibilite_20121025= */
/* Parametre.1. : Dpipe_Iload_fichier= */
/* Parametre.1. : --------------- ErreurLecture= */
/* Parametre.1. : --------------- pbIl= */
/* ............ : --------------- permuter_bits_Iload_image= */
/* Parametre.1. : --------------- taille_paquets_bits_Iload_image= */
/* ............ : --------------- tpbIl= */
/* Parametre.1. : --------------- tibIl= */
/* ............ : --------------- translation_index_bits_Iload_image= */
/* Parametre.1. : --------------- enaIl= */
/* ............ : --------------- erreur_nom_absent_Iload_image= */
/* Parametre.1. : --------------- enaIa= */
/* ............ : --------------- erreur_nom_absent_Iacces_image= */
/* Parametre.1. : --------------- enaIlF= */
/* ............ : --------------- erreur_nom_absent_IloadF_image= */
/* Parametre.1. : cIl= */
/* ............ : convert_Iload_image= */
/* Parametre.1. : --------------- cIa= */
/* ............ : --------------- convert_Iacces_image= */
/* Parametre.1. : cIlF= */
/* ............ : convert_IloadF_image= */
/* Parametre.1. : --------------- valeur_erreur_Iload_image= */
/* ............ : --------------- valeur_error_Iload_image= */
/* ............ : --------------- veIl= */
/* Parametre.1. : --------------- valeur_erreur_Iacces_image= */
/* ............ : --------------- valeur_error_Iacces_image= */
/* ............ : --------------- veIa= */
/* Parametre.1. : --------------- valeur_erreur_IloadF_image= */
/* ............ : --------------- valeur_error_IloadF_image= */
/* ............ : --------------- veIlF= */
/* Parametre.1. : --------------- convertir_si_erreur_Iload_image= */
/* ............ : --------------- cseIl= */
/* Parametre.1. : --------------- cbseIl= */
/* ............ : --------------- \ */
/* conversion_avec_renormalisation_si_erreur_Iload_image= */
/* ............ : --------------- \ */
/* conversion_brutale_si_erreur_Iload_image= */
/* ............ : --------------- crseIl= */
/* Parametre.1. : forcer_redimensionnement_Iload_image= */
/* ............ : frIl= */
/* Parametre.1. : redimensionnement_si_erreur_Iload_image= */
/* ............ : rseIl= */
/* Parametre.1. : methode_redimensionnement_si_erreur_Iload_image= */
/* ............ : mrseIl= */
/* Parametre.1. : arseIl= */
/* ............ : avertir_redimensionnement_si_erreur_Iload_image= */
/* Parametre.1. : --------------- convertir_si_erreur_IloadF_image= */
/* ............ : --------------- cseIlF= */
/* Parametre.1. : --------------- niveau_minimal_si_erreur_IloadF_image= */
/* ............ : --------------- nmseIlF= */
/* Parametre.1. : --------------- nMseIlF= */
/* ............ : --------------- niveau_maximal_si_erreur_IloadF_image= */
/* Parametre.1. : forcer_redimensionnement_IloadF_image= */
/* ............ : frIlF= */
/* Parametre.1. : redimensionnement_si_erreur_IloadF_image= */
/* ............ : rseIlF= */
/* Parametre.1. : methode_redimensionnement_si_erreur_IloadF_image= */
/* ............ : mrseIlF= */
/* Parametre.1. : arseIlF= */
/* ............ : avertir_redimensionnement_si_erreur_IloadF_image= */
/* Parametre.1. : vIlF= */
/* ............ : valider_IloadF_image= */
/* Parametre.1. : --------------- seuil_inferieur_IloadF_image= */
/* ............ : --------------- siIlF= */
/* Parametre.1. : --------------- seIlF= */
/* ............ : --------------- seuil_epsilon_IloadF_image= */
/* Parametre.1. : --------------- seuil_superieur_IloadF_image= */
/* ............ : --------------- ssIlF= */
/* Parametre.1. : --------------- editer_niveaux_invalides_IloadF_image= */
/* ............ : --------------- eniIlF= */
/* Parametre.1. : --------------- vIlJ= */
/* ............ : --------------- valider_IloadJ_image= */
/* Parametre.1. : --------------- seuil_inferieur_IloadJ_image= */
/* ............ : --------------- siIlJ= */
/* Parametre.1. : --------------- seIlJ= */
/* ............ : --------------- seuil_epsilon_IloadJ_image= */
/* Parametre.1. : --------------- seuil_superieur_IloadJ_image= */
/* ............ : --------------- ssIlJ= */
/* Parametre.1. : --------------- editer_niveaux_invalides_IloadJ_image= */
/* ............ : --------------- eniIlJ= */
/* Parametre.1. : --------------- vIlFd= */
/* ............ : --------------- valider_IloadF_image_and_delete= */
/* Parametre.1. : --------------- seuil_inferieur_IloadF_image_and_delete= */
/* ............ : --------------- siIlFd= */
/* Parametre.1. : --------------- seIlFd= */
/* ............ : --------------- seuil_epsilon_IloadF_image_and_delete= */
/* Parametre.1. : --------------- seuil_superieur_IloadF_image_and_delete= */
/* ............ : --------------- ssIlFd= */
/* Parametre.1. : --------------- \ */
/* editer_niveaux_invalides_IloadF_image_and_delete= */
/* ............ : --------------- eniIlFd= */
/* Parametre.1. : --------------- vIlJd= */
/* ............ : --------------- valider_IloadJ_image_and_delete= */
/* Parametre.1. : --------------- seuil_inferieur_IloadJ_image_and_delete= */
/* ............ : --------------- siIlJd= */
/* Parametre.1. : --------------- seIlJd= */
/* ............ : --------------- seuil_epsilon_IloadJ_image_and_delete= */
/* Parametre.1. : --------------- seuil_superieur_IloadJ_image_and_delete= */
/* ............ : --------------- ssIlJd= */
/* Parametre.1. : --------------- \ */
/* editer_niveaux_invalides_IloadJ_image_and_delete= */
/* ............ : --------------- eniIlJd= */
/* Parametre.1. : --------------- pbIs= */
/* ............ : --------------- permuter_bits_Istore= */
/* Parametre.1. : --------------- taille_paquets_bits_Istore= */
/* ............ : --------------- tpbIs= */
/* Parametre.1. : --------------- tibIs= */
/* ............ : --------------- translation_index_bits_Istore= */
/* Parametre.1. : rIs= */
/* ............ : renormaliser_Istore= */
/* Parametre.1. : --------------- niveau_minimal_renormalisation_Istore= */
/* ............ : --------------- nmrIs= */
/* Parametre.1. : --------------- nMrIs= */
/* ............ : --------------- niveau_maximal_renormalisation_Istore= */
/* Parametre.1. : --------------- cIs= */
/* ............ : --------------- complementer_Istore= */
/* Parametre.1. : --------------- faciliter_NOM_FICHIER= */
/* Parametre.1. : --------------- tAfs= */
/* ............ : --------------- translation_Afloat_std= */
/* Parametre.1. : --------------- tIfs= */
/* ............ : --------------- translation_Ifloat_std= */
/* Parametre.1. : --------------- INTERPOLATIONS_____compatibilite_20090225= */
/* Parametre.1. : --------------- VOISINAGE_POINT_BILINEAIRE_pasX= */
/* ............ : --------------- VPBL_px= */
/* Parametre.1. : --------------- VOISINAGE_POINT_BILINEAIRE_pasY= */
/* ............ : --------------- VPBL_py= */
/* Parametre.1. : --------------- VOISINAGE_POINT_BICUBIQUE_pasX= */
/* ............ : --------------- VPBC_px= */
/* Parametre.1. : --------------- VOISINAGE_POINT_BICUBIQUE_pasY= */
/* ............ : --------------- VPBC_py= */
/* Parametre.1. : A= */
/* ............ : imageA= */
/* Parametre.1. : R= */
/* ............ : imageR= */
/* Parametre.1. : standard= */
/* */
/* */
/* Le gain est vraiment spectaculaire, le fichier '$xci/neutre$PARAM' passant de 385 a 138 */
/* entrees ! */
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* F I C H I E R S D ' I N C L U D E S : */
/* */
/*************************************************************************************************************************************/
/* Introduit le 20180228172848 a des fins de test de bon fonctionnement : */
/* */
/* #define INCLUDES_TOUS_LES_PARAMETRES_GENERAUX */
/* #define INCLUDES_TOUS_LES_PARAMETRES_IMAGES__ */
/* */
/* puis supprimes le 20180228173050 (evidemment)... */
#include INCLUDES_BASE
#include image_image_IMAGESF_EXT
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* P A R A M E T R E S : */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* M A C R O S U T I L E S : */
/* */
/*************************************************************************************************************************************/
/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/* */
/* S I M P L E C O P I E : */
/* */
/*************************************************************************************************************************************/
BCommande(nombre_d_arguments,arguments)
/*-----------------------------------------------------------------------------------------------------------------------------------*/
Bblock
DEFV(CHAR,INIC(POINTERc(nom_imageR),NOM_PIPE));
DEFV(CHAR,INIC(POINTERc(nom_imageA),NOM_PIPE));
/*..............................................................................................................................*/
GET_ARGUMENTSi(nombre_d_arguments
,BLOC(GET_ARGUMENT_C("imageA=""A=",nom_imageA);
GET_ARGUMENT_C("imageR=""R=",nom_imageR);
GET_ARGUMENT_L("standard=",les_images_sont_standards);
)
);
CALi(gInettoyage(les_images_sont_standards,ImageR,IFmageR));
/* Initialisation de l'image Resultat. */
Test(PAS_D_ERREUR(CODE_ERROR(gIload_image(les_images_sont_standards,ImageA,IFmageA,nom_imageA))))
Bblock
/* Chargement de l'image Argument. */
CALS(gImove(les_images_sont_standards,ImageR,IFmageR,ImageA,IFmageA));
/* Simple copie de l'image Argument. */
CALi(gIupdate_image(les_images_sont_standards,nom_imageR,ImageR,IFmageR));
Eblock
ATes
Bblock
Test__CODE_ERREUR__ERREUR07;
Eblock
ETes
RETU_Commande;
Eblock
ECommande