Compute changed=2.
Compute key40(1)=1.
Compute key40(6)=7.
Compute key40(7)=6.
Compute keypreg(1)=1.
Compute keypreg(2)=2.
End if.
Do if (bserial='13930037' or bserial='14137024').
Compute changed=2.
Compute key40(1)=2.
Compute key40(2)=1.
Compute keypreg(1)=1.
End if.
Do if (bserial='14414078').
Compute changed=2.
Compute key40(1)=6.
Compute key40(2)=1.
Compute keypreg(1)=2.
End if.
Do if (bserial='14812036').
Compute changed=2.
Compute key40(1)=2.
Compute key40(2)=1.
Compute key40(6)=6.
Compute key40(11)=11.
Compute keypreg(1)=1.
Compute keypreg(2)=2.
Compute keypreg(3)=3.
End if.
Do if (bserial='15675043').
Compute changed=2.
Compute key40(1)=1.
Compute key40(6)=7.
Compute key40(7)=6.
Compute key40(11)=11.
Compute keypreg(1)=1.
Compute keypreg(2)=2.
Compute keypreg(3)=3.
End if.
Do if (bserial='15838018').
Compute changed=2.
Compute key40(1)=1.
Compute key40(2)=6.
Compute key40(6)=11.
Compute key40(11)=16.
Compute keypreg(1)=1.
Compute keypreg(2)=3.
Compute keypreg(3)=4.
More intriguing information
1. The name is absent2. The name is absent
3. The name is absent
4. Family, social security and social insurance: General remarks and the present discussion in Germany as a case study
5. Citizenship
6. Wirkung einer Feiertagsbereinigung des Länderfinanzausgleichs: eine empirische Analyse des deutschen Finanzausgleichs
7. Imperfect competition and congestion in the City
8. The constitution and evolution of the stars
9. The name is absent
10. AGRICULTURAL TRADE IN THE URUGUAY ROUND: INTO FINAL BATTLE