Compute key40(7)=11.
Compute keypreg(1)=2.
Compute keypreg(2)=1.
End if.
Do if (bserial='07342034').
Compute changed=2.
Compute key40(1)=1.
Compute key40(6)=6.
Compute key40(7)=7.
Compute key40(11)=26.
Compute key40(12)=27.
Compute keypreg(1)=1.
Compute keypreg(2)=2.
Compute keypreg(3)=6.
End if.
Do if (bserial='08039031').
Compute changed=2.
Compute key40(1)=1.
Compute key40(2)=2.
Compute key40(3)=16.
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='10231037').
Compute changed=2.
Compute key40(1)=1.
Compute key40(2)=6.
Compute key40(6)=11.
Compute key40(11)=16.
Compute key40(16)=21.
Compute key40(17)=22.
Compute keypreg(1)=1.
Compute keypreg(2)=3.
Compute keypreg(3)=4.
Compute keypreg(4)=5.
End if.
Do if (bserial='10822000').
Compute changed=2.
Compute key40(1)=6.
Compute key40(6)=1.
Compute key40(7)=11.
Compute keypreg(1)=2.
Compute keypreg(2)=1.
End if.
Do if (bserial='02706048').
Compute changed=2.
Compute key40(1)=1.
Compute key40(2)=6.
More intriguing information
1. Performance - Complexity Comparison of Receivers for a LTE MIMO–OFDM System2. Restructuring of industrial economies in countries in transition: Experience of Ukraine
3. Examining Variations of Prominent Features in Genre Classification
4. Qualification-Mismatch and Long-Term Unemployment in a Growth-Matching Model
5. A novel selective 11b-hydroxysteroid dehydrogenase type 1 inhibitor prevents human adipogenesis
6. The name is absent
7. The Prohibition of the Proposed Springer-ProSiebenSat.1-Merger: How much Economics in German Merger Control?
8. Reform of the EU Sugar Regime: Impacts on Sugar Production in Ireland
9. Self-Help Groups and Income Generation in the Informal Settlements of Nairobi
10. Impact of Ethanol Production on U.S. and Regional Gasoline Prices and On the Profitability of U.S. Oil Refinery Industry