Changeset 3324


Ignore:
Timestamp:
Nov 16, 2013, 9:41:57 PM (7 years ago)
Author:
nosdeputes
Message:

handle amdmts comm speciales

File:
1 edited

Legend:

Unmodified
Added
Removed
  • cpc/trunk/project/batch/amendements/cut_amdmt.pl

    r3309 r3324  
    2626    $amdmt{'numero'} = (10000*$lettre+$num);
    2727  }
    28 } elsif ($source =~ /(\d{2})\/amendements\/(TA\d{1,3}|\d{4})([A-Z])?\/?(AN|[A-Z_-]+)?\/([A-Z]+)?(\d+)\./i) {
     28} elsif ($source =~ /(\d{2})\/amendements\/(TA\d{1,3}|\d{4})([A-Z])?\/?(AN|[A-Z_-]+\d*)?\/([A-Z]+)?(\d+)\./i) {
    2929  $amdmt{'legislature'} = $1;
    3030  $amdmt{'loi'} = $2;
    3131  $lettre = $3;
    3232  $num = $6+0;
    33   if ($4 ne "AN" && $5) {
     33  if ($4 ne "AN") {
    3434    $commission = $4;
    35     $tetenum = $5;
     35    if ($5) {
     36      $tetenum = $5;
     37    } else {
     38      $tetenum = $4;
     39      $tetenum =~ s/[^A-Z]//g;
     40    }
    3641    $num = $tetenum.$num;
    3742  }
Note: See TracChangeset for help on using the changeset viewer.