>SELECT tube >SET ORDER TO TAG MAST_ID >GO TOP >SEEK SEEKID >IF FOUND() > SET ORDER TO TAG date > SCATTER MEMVAR MEMO > * Find Attempts record that goes with Tube record > CREATE CURSOR atts; > (Ext C(3), Seqno N(2), Placed C(18), Route C(10), Ext_Reas C(12)) > SELECT attempts > SCAN FOR attempts.mast_id = tube.mast_id > SELECT atts > REPLACE atts.ext WITH attempts.ext > REPLACE atts.seqno WITH attempts.seqno > REPLACE atts.placed WITH attempts.placed > REPLACE atts.route WITH attempts.route > REPLACE atts.ext_reas WITH attempts.ext_reas > ? atts.ext > ? atts.seqno > ? atts.placed > ? atts.route > ? atts.ext_reas > WAIT WINDOW > SKIP > SELECT attempts > ENDSCAN > SELECT atts > BROWSE > SELECT tube >ELSE >