Highest, lowest, average and total order line amounts.

f4311 [max(aexp) min(aexp) avg(aexp) sum(aexp)]

Sum of Open OP Orders.

f4311 [
  group(doco,dcto) sum(aopn)]
  all(nxtr = 400 dcto = OP uopn <> 0)

List Pending Purchase Orders

/* Pending PO's */
#pending =
/* Open table F4311 */
f4311
/* Select fields */
(doco,lnid,nxtr)
/* Next Status less than 280
   and item in list */
all(nxtr < 280 litm in @items);

List Open Purchase Orders

/* Open PO's */
#open =
/* Open table F4311  */
f4311
/* Select fields */
(doco,dcto,lnid,litm,dsc1,uopn,prrc,aopn)
/* Items to display */
all(nxtr bw 280,400 litm in @items);