/*used in local-var01*/
FUNCTION getWORelQty returns decimal (input part as character):
define variable WORelQty as decimal no-undo.
assign WORelQty = 0.
for each wo_mstr
where wo_mstr.wo_domain = global_domain and
wo_status = "R" and
wo_part = part no-lock:
WORelQty = WORelQty + wo_qty_ord.
end.
return WORelQty.
END FUNCTION.
/*used in local-var02 */
FUNCTION getSumStuff decimal (input part as character, input wonumber as character):
define variable WORelQty2 as decimal no-undo.
define variable summedtotal as decimal no-undo.
assign WORelQty2 = 0 summedtotal = 0.
for each wo_mstr no-lock
where wo_mstr.wo_domain = global_domain and
wo_status = "R" and
wo_part = part and wo_nbr = wonumber:
WORelQty2 = WORelQty2 + wo_qty_ord.
end.
summedtotal = WORelQty2 + 5.
return summedtotal.
END FUNCTION.