parm ac=@
continue
purge buldjob1 >$null
continue
purge buldjob2 >$null
setjcw insidempex 0
if !insidempex = 0
   xeq main.pub.vesoft,mpex;parm=1;info="!hpfile !ac"
   return
endif
repeat
echo ------ Building Account Job: ![racct.account]
if ![len("![racct.account]")] = 8
   setvar ac1 "![lft('![racct.account]',7)]" + "1"
   setvar ac2 "![lft('![racct.account]',7)]" + "2"
else
   setvar ac1 "![racct.account]" + "1"
   setvar ac2 "![racct.account]" + "2"
endif
setvar act1 '![strchange("!ac1"," ","")]'
setvar act2 '![strchange("!ac2"," ","")]'
continue
purge !act1 >$null
continue
purge !act2 >$null
run buldacct.pub.sys;info="![racct.account]" >$null
rename buldjob1,!act1
rename buldjob2,!act2
veaudit foraccts !ac