Compute key40(16)=11.
Compute key40(21)=16.
Compute key40(26)=26.
Compute keypreg(1)=5.
Compute keypreg(2)=1.
Compute keypreg(3)=2.
Compute keypreg(4)=3.
Compute keypreg(5)=4.
Compute keypreg(6)=6.
End if.
Do if (bserial='06982024').
Compute changed=2.
Compute key40(1)=6.
Compute key40(2)=7.
Compute key40(6)=1.
Compute keypreg(1)=2.
Compute keypreg(2)=1.
End if.
Do if (bserial='07149006').
Compute changed=2.
Compute key40(1)=11.
Compute key40(2)=12.
Compute key40(6)=1.
Compute key40(11)=6.
Compute keypreg(1)=3.
Compute keypreg(2)=1.
Compute keypreg(3)=2.
End if.
Do if (bserial='07339085').
Compute changed=2.
Compute key40(1)=1.
Compute key40(6)=11.
Compute key40(7)=12.
Compute key40(11)=6.
Compute keypreg(1)=1.
Compute keypreg(2)=3.
Compute keypreg(3)=2.
End if.
Do if (bserial='08995083').
Compute changed=2.
Compute key40(1)=1.
Compute key40(2)=2.
Compute key40(6)=3.
Compute key40(11)=4.
Compute keypreg(1)=1.
Compute keypreg(2)=1.
Compute keypreg(3)=1.
End if.
Do if (bserial='11155092').
Compute changed=2.
More intriguing information
1. The name is absent2. Happiness in Eastern Europe
3. WP 48 - Population ageing in the Netherlands: Demographic and financial arguments for a balanced approach
4. The name is absent
5. The problem of anglophone squint
6. Olfactory Neuroblastoma: Diagnostic Difficulty
7. Human Resource Management Practices and Wage Dispersion in U.S. Establishments
8. The name is absent
9. The name is absent
10. Peer Reviewed, Open Access, Free