[Unix korn shell] Convertir une liste - Page 2

apres plusieurs essai , j'ai réussi a trouver le commande qui a permit la résolution grace a" match" de "awk" ! ouf !

MODULE_LIST="AM AP AR BL"

for MODULE in $MODULE_LIST
do
awk -F " " '
BEGIN{comp=0}

 /^law.*I/ {full="" }  # Inquiry access

 /^law.*F/ {full="1"}  # Full access

 /^lawson.*: [0-9][0-9]*$/{
        x=++comp - 1
        if(x) s=sprintf("%d",x)
        else s=""

        printf("\"%s-%s\",\"%s\",\"%s\",%s,%s,%s,\"    !\",\"~~~~~~~~~~~~~~~\",%s\n",
        ROLE, LEVEL, DB, MODULE, s, $2, $2, full)}

 /^lawson.*: [0-9][0-9]*-[0-9][0-9]*$/{
        x=++comp - 1
        if(x) s=sprintf("%d",x)
        else s=""

        printf("\"%s-%s\",\"%s\",\"%s\",%s,%s,%s,\"    !\",\"~~~~~~~~~~~~~~~\",%s\n",
        ROLE, LEVEL, DB, MODULE, s,substr($2,1,match($2,"-")-1), substr($2,match($2,"-")+1,4), full)}


      ' ROLE=TAXMNG LEVEL=NO DB=LOP1 MODULE=$MODULE  < comp_4.txt
done

faite moi signe il peut y avoir simplification ;)