#######################################################################################################################################
#                                                                                                                                     #
#         A N A L Y S E   D E   L A   B A S E   D E   D O N N E S   { $_____FichierC,$_____FichierT }  :                              #
#                                                                                                                                     #
#                                                                                                                                     #
#         Author of '$xivP/disk.000000008/face.2/.CHUR.5.11.$U' :                                                                                    #
#                                                                                                                                     #
#                     Jean-Francois Colonna (LACTAMME, AAAAMMJJhhmmss).                                                               #
#                                                                                                                                     #
#######################################################################################################################################

$Z                  source    $xrF/files.01$vv$Y

$Z                  set       Fanalyse=`GetXTmp "$K_VIDE" "$K_VIDE" $xTV`

$Z                  alias     genere    'set       ClIeNt="\!*" ; set       ClientC=`(listMN $_____FichierC $ClIeNt $ClIeNt)`     ;    \\
$Z                                       set       Client=`echo "$ClientC" | $SE -e "s/\([^$FTSep][^$FTSep]*\)$FTSep.*/\1/"`      ;    \\
$Z                                       set       ClientT=`$GRE "^$Client$FTSep" $_____FichierT`                                 ;    \\
$Z                                       set       Churn=`echo "$ClientC" | $GRE "$FTSep""RD""$FTSep"` ; set TChurn=$NEXIST       ;    \\
$Z                                       if        ("$Churn" != "$K_VIDE") set       TChurn=$EXIST                                ;    \\
$Z    (FTanalyse $_____FichierT $Client "$FTM_STRAFIC_DUREES6" traiter=FAUX titre="client=$Client+churn=$TChurn") >>! $Fanalyse   ;    \\
$Z                                       unset     ClIeNt ClientC Client ClientT Churn TChurn'

$c        #include  <stdio.h>
$c
$c        extern    int       atoi();
$c        extern    char      *getenv();
$c
$c        #define   N0        1
$c        #define   N         (atoi(getenv("Nclients")))
$c
$c        int       main()
$c                  {
$c                  int       n;
$c
$c                  for       (n=N0 ; n<=N ; n=n+1)
$c                            {
$c                            printf("genere    %d\n"
$c                                  ,n
$c                                   );
$c                            }
$c                  }