windowevent open
    create button=name=createqcordernoqty,text=Create Order No Qty
end event


windowevent click createqcordernoqty

// First check...
//if <itemcode> =  "" or <quantity,#0.000000> n= 0 or <lager> =  then
if <itemcode> =  "" or <lager> =  then
  messagebox=error$unvollstaendig$Angaben sind unvollständig. Bitte korrigieren!!!
  return failure
end if
//
createqcorder()

post=post=close:cancel
post=post=parent=retrieve
	
	
end event