@Normal@<:#852,4560><+!><-!><:f240,6Times New Roman,0,0,0>Useful for renumbering sequential customer numbers and product serial numbers over existing records.<+!><:f240,BHelveticaNeue MediumCond,0,0,0>
@Normal@<:#288,4560><+!><:f240,BHelveticaNeue MediumCond,0,0,0>Objective<-!><:f240,6Times New Roman,0,0,0>
@Normal@<:#852,4560><:f240,6Times New Roman,0,0,0>Automate the renumbering of existing records in an Approach database using macros and a variable field.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>
@Normal@<:#288,4560><+!><:f240,BHelveticaNeue MediumCond,0,0,0>Example<-!><:f240,6Times New Roman,0,0,0>
@Normal@<:#2556,4560><:f240,6Times New Roman,0,0,0>Define a variable field <+">var<-"> and a record number field
<+">recno<-">. Set the variable field to Numeric by clicking the Options button in Field Definition. The idea is to create three macros and chain them together. The first macro initializes
<+">var<-"> to one and goes to the first record. The second macro simply assigns
<+">recno<-"> to <+">var<-"> and advances to next record. The third macro increases
<+">var<-"> by one.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>
@Normal@<:#288,4560><+!><:f240,BHelveticaNeue MediumCond,0,0,0>To create macros<-!><:f240,6Times New Roman,0,0,0>
@Normal@<:#852,4560><:f240,6Times New Roman,0,0,0>Under Edit menu, choose Define Macro, call the first macro mac1, the second macro mac2 and the third one mac3.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>In mac1,
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>1) set <+">var<-"> to 1.
@Normal@<:R1,13,1,270,1,720,1,1440,1,2160,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#568,4560><:f240,6Times New Roman,0,0,0>2) under menu options, highlight and add
'First Record'.
@Normal@<:R><:#284,4560><:f240,6Times New Roman,0,0,0>3) click on the 'Add' button.
@Normal@<:f240,6Times New Roman,0,0,0><:f><:f240,6Times New Roman,0,0,0><:f><:f240,6Times New Roman,0,0,0><:f><:f240,6Times New Roman,0,0,0><:f><:f240,6Times New Roman,0,0,0><:f><:f240,6Times New Roman,0,0,0>
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>In mac2,
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>1) set <+">recno<-"> to <+">var<-">.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>2) highlight and add 'Next Record'.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>3) click on the 'Add' button.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>In mac3,
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>1) set <+">var<-"> to <+">var<-"> + 1.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>2) click on the 'Add' button
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>
@Normal@<:#288,4560><+!><:f240,BHelveticaNeue MediumCond,0,0,0>To chain macros<-!><:f240,6Times New Roman,0,0,0>
@Normal@<:R1,13,1,270,1,720,1,1440,1,2160,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#1420,4560><:f240,6Times New Roman,0,0,0>1) open mac1 under the 'Next' option at the
bottom of the macro sheet, check 'Run Macro' and choose mac2 from the drop
down list. Then click on 'Change' at the top of the macro sheet.
@Normal@<:R1,13,1,270,1,720,1,1440,1,2160,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#568,4560><:f240,6Times New Roman,0,0,0>2) open mac2, go down to 'Next', run
macro mac3 and click on 'Change'.
@Normal@<:R1,13,1,270,1,720,1,1440,1,2160,1,2880,1,3600,1,4320,1,5040,1,5760,1,6480,1,7200,1,7920,1,8640,><:#568,4560><:f240,6Times New Roman,0,0,0>3) open mac3, go down to 'Next', run
macro mac2 and click on 'Change'.
@Normal@<:R><:#284,4560><:f240,6Times New Roman,0,0,0>
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>Now, in Browse mode, just run macro mac1.
@Normal@<:#284,4560><:f240,6Times New Roman,0,0,0>