<?
function cabColis($numColis, $debutCC) {
        $decod=array(
                array("ASCII"=>"0194","CHAR"=>"Â","VALUE"=>"00"),
                array("ASCII"=>"0033","CHAR"=>"!","VALUE"=>"01"),
                array("ASCII"=>"0034","CHAR"=>'"',"VALUE"=>"02"),
                array("ASCII"=>"0035","CHAR"=>"#","VALUE"=>"03"),
                array("ASCII"=>"0036","CHAR"=>"$","VALUE"=>"04"),
                array("ASCII"=>"0037","CHAR"=>"%","VALUE"=>"05"),
                array("ASCII"=>"0038","CHAR"=>"&","VALUE"=>"06"),
                array("ASCII"=>"0039","CHAR"=>"'","VALUE"=>"07"),
                array("ASCII"=>"0040","CHAR"=>"(","VALUE"=>"08"),
                array("ASCII"=>"0041","CHAR"=>")","VALUE"=>"09"),
                array("ASCII"=>"0042","CHAR"=>"*","VALUE"=>"10"),
                array("ASCII"=>"0043","CHAR"=>"+","VALUE"=>"11"),
                array("ASCII"=>"0044","CHAR"=>",","VALUE"=>"12"),
                array("ASCII"=>"0045","CHAR"=>"-","VALUE"=>"13"),
                array("ASCII"=>"0046","CHAR"=>".","VALUE"=>"14"),
                array("ASCII"=>"0047","CHAR"=>"/","VALUE"=>"15"),
                array("ASCII"=>"0048","CHAR"=>"0","VALUE"=>"16"),
                array("ASCII"=>"0049","CHAR"=>"1","VALUE"=>"17"),
                array("ASCII"=>"0050","CHAR"=>"2","VALUE"=>"18"),
                array("ASCII"=>"0051","CHAR"=>"3","VALUE"=>"19"),
                array("ASCII"=>"0052","CHAR"=>"4","VALUE"=>"20"),
                array("ASCII"=>"0053","CHAR"=>"5","VALUE"=>"21"),
                array("ASCII"=>"0054","CHAR"=>"6","VALUE"=>"22"),
                array("ASCII"=>"0055","CHAR"=>"7","VALUE"=>"23"),
                array("ASCII"=>"0056","CHAR"=>"8","VALUE"=>"24"),
                array("ASCII"=>"0057","CHAR"=>"9","VALUE"=>"25"),
                array("ASCII"=>"0058","CHAR"=>":","VALUE"=>"26"),
                array("ASCII"=>"0059","CHAR"=>";","VALUE"=>"27"),
                array("ASCII"=>"0060","CHAR"=>"<","VALUE"=>"28"),
                array("ASCII"=>"0061","CHAR"=>"=","VALUE"=>"29"),
                array("ASCII"=>"0062","CHAR"=>">","VALUE"=>"30"),
                array("ASCII"=>"0063","CHAR"=>"?","VALUE"=>"31"),
                array("ASCII"=>"0064","CHAR"=>"@","VALUE"=>"32"),
                array("ASCII"=>"0065","CHAR"=>"A","VALUE"=>"33"),
                array("ASCII"=>"0066","CHAR"=>"B","VALUE"=>"34"),
                array("ASCII"=>"0067","CHAR"=>"C","VALUE"=>"35"),
                array("ASCII"=>"0068","CHAR"=>"D","VALUE"=>"36"),
                array("ASCII"=>"0069","CHAR"=>"E","VALUE"=>"37"),
                array("ASCII"=>"0070","CHAR"=>"F","VALUE"=>"38"),
                array("ASCII"=>"0071","CHAR"=>"G","VALUE"=>"39"),
                array("ASCII"=>"0072","CHAR"=>"H","VALUE"=>"40"),
                array("ASCII"=>"0073","CHAR"=>"I","VALUE"=>"41"),
                array("ASCII"=>"0074","CHAR"=>"J","VALUE"=>"42"),
                array("ASCII"=>"0075","CHAR"=>"K","VALUE"=>"43"),
                array("ASCII"=>"0076","CHAR"=>"L","VALUE"=>"44"),
                array("ASCII"=>"0077","CHAR"=>"M","VALUE"=>"45"),
                array("ASCII"=>"0078","CHAR"=>"N","VALUE"=>"46"),
                array("ASCII"=>"0079","CHAR"=>"O","VALUE"=>"47"),
                array("ASCII"=>"0080","CHAR"=>"P","VALUE"=>"48"),
                array("ASCII"=>"0081","CHAR"=>"Q","VALUE"=>"49"),
                array("ASCII"=>"0082","CHAR"=>"R","VALUE"=>"50"),
                array("ASCII"=>"0083","CHAR"=>"S","VALUE"=>"51"),
                array("ASCII"=>"0084","CHAR"=>"T","VALUE"=>"52"),
                array("ASCII"=>"0085","CHAR"=>"U","VALUE"=>"53"),
                array("ASCII"=>"0086","CHAR"=>"V","VALUE"=>"54"),
                array("ASCII"=>"0087","CHAR"=>"W","VALUE"=>"55"),
                array("ASCII"=>"0088","CHAR"=>"X","VALUE"=>"56"),
                array("ASCII"=>"0089","CHAR"=>"Y","VALUE"=>"57"),
                array("ASCII"=>"0090","CHAR"=>"Z","VALUE"=>"58"),
                array("ASCII"=>"0091","CHAR"=>"[","VALUE"=>"59"),
                array("ASCII"=>"0092","CHAR"=>"\\","VALUE"=>"60"),
                array("ASCII"=>"0093","CHAR"=>"]","VALUE"=>"61"),
                array("ASCII"=>"0094","CHAR"=>"^","VALUE"=>"62"),
                array("ASCII"=>"0095","CHAR"=>"_","VALUE"=>"63"),
                array("ASCII"=>"0096","CHAR"=>"`","VALUE"=>"64"),
                array("ASCII"=>"0097","CHAR"=>"a","VALUE"=>"65"),
                array("ASCII"=>"0098","CHAR"=>"b","VALUE"=>"66"),
                array("ASCII"=>"0099","CHAR"=>"c","VALUE"=>"67"),
                array("ASCII"=>"0100","CHAR"=>"d","VALUE"=>"68"),
                array("ASCII"=>"0101","CHAR"=>"e","VALUE"=>"69"),
                array("ASCII"=>"0102","CHAR"=>"f","VALUE"=>"70"),
                array("ASCII"=>"0103","CHAR"=>"g","VALUE"=>"71"),
                array("ASCII"=>"0104","CHAR"=>"h","VALUE"=>"72"),
                array("ASCII"=>"0105","CHAR"=>"i","VALUE"=>"73"),
                array("ASCII"=>"0106","CHAR"=>"j","VALUE"=>"74"),
                array("ASCII"=>"0107","CHAR"=>"k","VALUE"=>"75"),
                array("ASCII"=>"0108","CHAR"=>"l","VALUE"=>"76"),
                array("ASCII"=>"0109","CHAR"=>"m","VALUE"=>"77"),
                array("ASCII"=>"0110","CHAR"=>"n","VALUE"=>"78"),
                array("ASCII"=>"0111","CHAR"=>"o","VALUE"=>"79"),
                array("ASCII"=>"0112","CHAR"=>"p","VALUE"=>"80"),
                array("ASCII"=>"0113","CHAR"=>"q","VALUE"=>"81"),
                array("ASCII"=>"0114","CHAR"=>"r","VALUE"=>"82"),
                array("ASCII"=>"0115","CHAR"=>"s","VALUE"=>"83"),
                array("ASCII"=>"0116","CHAR"=>"t","VALUE"=>"84"),
                array("ASCII"=>"0117","CHAR"=>"u","VALUE"=>"85"),
                array("ASCII"=>"0118","CHAR"=>"v","VALUE"=>"86"),
                array("ASCII"=>"0119","CHAR"=>"w","VALUE"=>"87"),
                array("ASCII"=>"0120","CHAR"=>"x","VALUE"=>"88"),
                array("ASCII"=>"0121","CHAR"=>"y","VALUE"=>"89"),
                array("ASCII"=>"0122","CHAR"=>"z","VALUE"=>"90"),
                array("ASCII"=>"0123","CHAR"=>"{","VALUE"=>"91"),
                array("ASCII"=>"0124","CHAR"=>"|","VALUE"=>"92"),
                array("ASCII"=>"0125","CHAR"=>"}","VALUE"=>"93"),
                array("ASCII"=>"0126","CHAR"=>"~","VALUE"=>"94"),
                array("ASCII"=>"0195","CHAR"=>"Ã","VALUE"=>"95"),
                array("ASCII"=>"0196","CHAR"=>"Ä","VALUE"=>"96"),
                array("ASCII"=>"0197","CHAR"=>"Å","VALUE"=>"97"),
                array("ASCII"=>"0198","CHAR"=>"Æ","VALUE"=>"98"),
                array("ASCII"=>"0199","CHAR"=>"Ç","VALUE"=>"99"),
                array("ASCII"=>"0200","CHAR"=>"È","VALUE"=>"100"),
                array("ASCII"=>"0201","CHAR"=>"&eacute;","VALUE"=>"101"),
                array("ASCII"=>"0202","CHAR"=>"Ê","VALUE"=>"102"),
                array("ASCII"=>"0203","CHAR"=>"Ë","VALUE"=>"103"),
                array("ASCII"=>"0204","CHAR"=>"Ì","VALUE"=>"104"),
                array("ASCII"=>"0205","CHAR"=>"Í","VALUE"=>"105")
        );
        $cab="Ì".substr($numColis, 0, $debutCC)."Ç";
        $e=$debutCC;
        while ($e<strlen($numColis)) {
                $cab.=$decod[(int)(substr($numColis, $e, 2))]["CHAR"];
                $e=$e+2;
        }
        $cleVerif=0;
        for ($e=0;$e<strlen($cab);$e++) {
                $trouve="non"; $i=0;
                while ($trouve=="non") {
                        if ($decod[$i]["CHAR"]==$cab{$e}) {
                                if ($e!=0) $cleVerif=$cleVerif+((int)($decod[$i]["VALUE"])*$e);
                                else $cleVerif=$cleVerif+(int)($decod[$i]["VALUE"]);
                                $trouve="oui";
                        }
                $i++;
                }
        }
        $cleVerif=$cleVerif % 103;
        $trouve="non"; $i=0;
        while ($trouve=="non") {
                if ((int)($decod[$i]["VALUE"])==$cleVerif) {
                        $cab.=$decod[$i]["CHAR"];
                        $trouve="oui";
                }
        $i++;
        }
        $cab.="Î";
        return $cab;
}
?>