compile function det_table_suff()
* determines the table suffix i.e. srl
begin condition
pre:
post:
end condition
declare function entid, repository
TableSuffPopup = entid( @appid<1>, 'POPUP', '', 'DET_TABLE_SUFF' )
return repository( 'EXECUTE', TableSuffPopup, @window, '' )