Q5/ws_objects/Ew_mainface.pbl.src/uo_ljjob_creator_ew.sru

$PBExportHeader$uo_ljjob_creator_ew.sru
forward
global type uo_ljjob_creator_ew from uo_ljjob_creator_spi
end type
end forward

global type uo_ljjob_creator_ew from uo_ljjob_creator_spi
end type
global uo_ljjob_creator_ew uo_ljjob_creator_ew

type variables
private:
string ins_jobs[]
end variables

forward prototypes
public function uo_ljjob create_job (long arg_tasktype)
end prototypes

public function uo_ljjob create_job (long arg_tasktype);uo_ljjob rslt
SetNull(rslt)
String ls_type
IF arg_tasktype >= LowerBound(ins_jobs) And arg_tasktype <= UpperBound(ins_jobs) THEN
	IF Not IsNull(ins_jobs[arg_tasktype]) THEN
		ls_type = Trim(ins_jobs[arg_tasktype], True)
		IF ls_type <> '' THEN
			rslt = Create Using ls_type
		END IF
	END IF
END IF

RETURN rslt

end function

on uo_ljjob_creator_ew.create
call super::create
end on

on uo_ljjob_creator_ew.destroy
call super::destroy
end on

event constructor;call super::constructor;ins_jobs[1] = ''
ins_jobs[11] = 'uo_ljjob_order_wkp_barcode_pda'
end event