Do if (nserial='630002V').
Compute changed=2.
Compute key40(1)=1.
Compute key40(6)=6.
Compute key40(11)=11.
Compute key40(16)=16.
Compute keypreg(1)=1.
Compute keypreg(2)=2.
Compute keypreg(3)=3.
Compute keypreg(4)=4.
End if.
Do if (nserial='730049F').
Compute changed=2.
Compute key40(1)=6.
Compute key40(6)=1.
Compute key40(11)=11.
Compute key40(16)=16.
Compute keypreg(1)=2.
Compute keypreg(2)=1.
Compute keypreg(3)=3.
Compute keypreg(4)=4.
End if.
Do if (nserial='730130N').
Compute changed=2.
Compute key40(1)=1.
Compute key40(6)=6.
Compute key40(7)=7.
Compute keypreg(1)=1.
Compute keypreg(2)=2.
End if.
Do if (nserial='987100P').
Compute changed=2.
Compute key40(1)=1.
Compute key40(2)=11.
Compute key40(6)=6.
Compute keypreg(1)=1.
Compute keypreg(2)=2.
End if.
Do if (nserial='989011A').
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 (nserial='X25101F').
Compute changed=2.
Compute key40(1)=3.
Compute key40(2)=2.
Compute key40(6)=1.
Compute keypreg(1)=1.
Compute keypreg(6)=1.
End if.
More intriguing information
1. Female Empowerment: Impact of a Commitment Savings Product in the Philippines2. Staying on the Dole
3. The constitution and evolution of the stars
4. Dynamiques des Entreprises Agroalimentaires (EAA) du Languedoc-Roussillon : évolutions 1998-2003. Programme de recherche PSDR 2001-2006 financé par l'Inra et la Région Languedoc-Roussillon
5. The Veblen-Gerschenkron Effect of FDI in Mezzogiorno and East Germany
6. Washington Irving and the Knickerbocker Group
7. The name is absent
8. Industrial districts, innovation and I-district effect: territory or industrial specialization?
9. Banking Supervision in Integrated Financial Markets: Implications for the EU
10. Om Økonomi, matematik og videnskabelighed - et bud på provokation