/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        G E S T I O N   D E S   F I C H I E R S  :                                                                                 */
/*                                                                                                                                   */
/*                                                                                                                                   */
/*        Author of '$xrv/particule.11$I' :                                                                                          */
/*                                                                                                                                   */
/*                    Jean-Francois Colonna (LACTAMME, 1997??????????).                                                              */
/*                                                                                                                                   */
/*************************************************************************************************************************************/

/*===================================================================================================================================*/
/*************************************************************************************************************************************/
/*                                                                                                                                   */
/*        R E C U P E R A T I O N   D ' U N   F I C H I E R   " L I S T E "  :                                                       */
/*                                                                                                                                   */
/*************************************************************************************************************************************/
#define   EN_TETE_DANS_FLOAD_FICHIER_FORMATTE_Float                                                                                     \
                    ZERO
#define   SAUT_DANS_FLOAD_FICHIER_FORMATTE_Float                                                                                        \
                    ZERO
DEFV(Local,DEFV(Positive,INIT(en_tete_dans_FLOAD_FICHIER_FORMATTE_Float,EN_TETE_DANS_FLOAD_FICHIER_FORMATTE_Float)));
DEFV(Local,DEFV(Positive,INIT(saut_dans_FLOAD_FICHIER_FORMATTE_Float,SAUT_DANS_FLOAD_FICHIER_FORMATTE_Float)));
                                        /* Arguments introduits le 20021104161517 qui permettent de sauter des elements ("en_tete")  */
                                        /* en tete du fichier, puis de sauter des elements ("saut") entre chaques elements utilises. */

#define   PROCESS_ARGUMENTS_DE_DEFINITION_DES_FICHIERS_12                                                                               \
                                        /* La partie "_12" du nom 'PROCESS_ARGUMENTS_DE_DEFINITION_DES_FICHIERS_12' est choisie      */ \
                                        /* en harmonie avec le nom de la procedure 'lTRANSFORMAT_12(...)' qui lui est associee...    */ \
                    Bblock                                                                                                              \
                                                                                                                                        \
                    DEBUT_D_IMBRICATION_DES_____gPROCESS_PARAMETRE_____SECONDAIRES;                                                     \
                                        /* Introduit le 20060208111939 ('v $xig/fonct$vv$DEF _IMBRICATION_DES__gPROCESS_PARAMETRE'). */ \
                                                                                                                                        \
                    GET_ARGUMENT_I("Ftete=""Ft=""Fen_tete=",en_tete_dans_FLOAD_FICHIER_FORMATTE_Float);                                 \
                    GET_ARGUMENT_I("Fsaut=""Fs=",saut_dans_FLOAD_FICHIER_FORMATTE_Float);                                               \
                                        /* Ces parametres ont ete introduits le 20021104162112 afin de pouvoir etre utilises, si     */ \
                                        /* necessaires, avant chacun des 'PROCESS_ARGUMENT_C(...,BLOC(lTRANSFORMAT_12(...);))' qui   */ \
                                        /* suivent. Par exemple, cela permettra d'utiliser le meme fchier pour 'LISTE_X' et          */ \
                                        /* 'LISTE_Y', mais en les decalant differemment dans 'v $xrv/particule.10$K'.                */ \
                                                                                                                                        \
                    FIN___D_IMBRICATION_DES_____gPROCESS_PARAMETRE_____SECONDAIRES;                                                     \
                                        /* Introduit le 20060208111939 ('v $xig/fonct$vv$DEF _IMBRICATION_DES__gPROCESS_PARAMETRE'). */ \
                                                                                                                                        \
                    Eblock                                                                                                              \
                                        /* Introduit le 20021105092734 pour faciliter la mise a jour de differents '$K' suite        */ \
                                        /* a l'introduction du nouveau parametre 'en_tete_dans_le_fichier_des_valeurs'...            */

#define   FLOAD_FICHIER_FORMATTE_Float(fichier_des_transformations,liste_des_transformations,nombre_d_elements,valeur_par_defaut)       \
                    Bblock                                                                                                              \
                    CALS(Fload_fichier_formatte_Float(fichier_des_transformations                                                       \
                                                     ,liste_des_transformations                                                         \
                                                     ,nombre_d_elements                                                                 \
                                                     ,en_tete_dans_FLOAD_FICHIER_FORMATTE_Float                                         \
                                                     ,saut_dans_FLOAD_FICHIER_FORMATTE_Float                                            \
                                                     ,VRAI                                                                              \
                                                     ,FLOT(valeur_par_defaut)                                                           \
                                                     ,LE_NOM_DU_FICHIER_EST_CONVERTISSABLE_EN_UNE_VALEUR_NUMERIQUE                      \
                                                      )                                                                                 \
                         );                                                                                                             \
                                                                                                                                        \
&define   __ParaVal liste_des_transformations&&&                                                                                        \
&define   __ParaInd PREMIER_ELEMENT_D_UN_FICHIER&&&                                                                                     \
&define   __ParaLon nombre_d_elements&&&                                                                                                \
&define   __ParaTyp TYPE_FORMAT_FLOT&&&                                                                                                 \
&define   __ParaFor FORMAT_FLOT_EDITION&&&                                                                                              \
                                                                                                                                        \
                    Eblock                                                                                                              \
                                        /* Recuperation d'un fichier contenant une liste...                                          */