Q5/ws_objects/Ew_plugins.pbl.src/f_terminate_l1.srf

$PBExportHeader$f_terminate_l1.srf
global type f_terminate_l1 from function_object
end type

forward prototypes
global subroutine f_terminate_l1 ()
end prototypes

global subroutine f_terminate_l1 ();datastore ds_terminate
ds_terminate = CREATE datastore
ds_terminate.DataObject = 'ds_plugins_terminate'
ds_terminate.SetTransObject(sqlca)
ds_terminate.Retrieve()

Long i
FOR i = 1 TO ds_terminate.RowCount()
	f_proc_terminate(ds_terminate.Object.filepath[i])
NEXT
destroy ds_terminate
end subroutine