dbauo_taskmx_assign.sru 997 B

12345678910111213141516171819202122232425262728293031323334353637383940
  1. $PBExportHeader$dbauo_taskmx_assign.sru
  2. forward
  3. global type dbauo_taskmx_assign from nonvisualobject
  4. end type
  5. end forward
  6. global type dbauo_taskmx_assign from nonvisualobject
  7. end type
  8. global dbauo_taskmx_assign dbauo_taskmx_assign
  9. type variables
  10. dbauo_taskmx ins_taskmx
  11. dbauo_mtrlwaremx ins_mtrlwaremx
  12. long ins_assignid
  13. decimal ins_qty
  14. long ins_mtrlwareid
  15. end variables
  16. forward prototypes
  17. public subroutine f_init (dbauo_taskmx arg_taskmx, long arg_assignid, decimal arg_qty, long arg_mtrlwareid)
  18. end prototypes
  19. public subroutine f_init (dbauo_taskmx arg_taskmx, long arg_assignid, decimal arg_qty, long arg_mtrlwareid);ins_taskmx = arg_taskmx
  20. ins_assignid = arg_assignid
  21. ins_qty = arg_qty
  22. ins_mtrlwareid = arg_mtrlwareid
  23. ins_mtrlwaremx = ins_taskmx.ins_mtrlware.f_find(ins_mtrlwareid)
  24. end subroutine
  25. on dbauo_taskmx_assign.create
  26. call super::create
  27. TriggerEvent( this, "constructor" )
  28. end on
  29. on dbauo_taskmx_assign.destroy
  30. TriggerEvent( this, "destructor" )
  31. call super::destroy
  32. end on