UNIX for Beginners Questions & Answers

$ cat mline.awk

BEGIN {
        L=split("MSISDN IMSI NAM TS11 TS21 TS22 BAIC APNID1 APNID2 OBO OBI", C);
        for(X in C) COL[ C[X] ":"]= 1
}

function data() {
        S=P=""
        for(N=1; N<=L; N++) { S=S P D[C[N]":"]; delete D[C[N]":"]; P=OFS; }
        print S;
}

NR==1 {
        S=P=""
        for(N=1; N<=L; N++) { S=S P C[N]; P=OFS;        }
        print S;
}

$1 && $1 in COL { D[$1]=$2 ; next }

/^[ \t]*$/ { data() }
END { data() }


$ awk -f mline.awk mline.dat

MSISDN,IMSI,NAM,TS11,TS21,TS22,BAIC,APNID1,APNID2,OBO,OBI
242064493944,629100113334650,1,1,1,1,1,2,1,1,1
242068626345,629100114187228,0,1,1,1,1,2,1,,

$