my_tbl:=pegtrim(impp07->p01)

nrun_pp2:=my_tbl
refrit('orun_pp2')
totrefr()

##IF !odbcistable(my_tbl)
    ##RETURN
##ENDIF 

my_str:='#' + upper(pegtrim(my_tbl))+ '#'
if( ! my_str $ my_noupd, my_noupd:=my_noupd + upper(pegtrim(my_tbl)) + '#', )
dbskip()
##RETURN    