|
原来for each可以这么用,又学了一招~
老是忘了加no-lock,结果别人在使用table时一执行程序就出错了~
原帖由 zelef 于 2008-5-16 21:17 发表 ![]()
仔细点也可以这样:
for each pt_mstr no-lock, each ld_det where pt_part = ld_part no-lock:
display pt_part pt_pvm_um ld_loc ld_qty_oh with STREAM-IO WIDTH 150.
end.
如果想导出到本机:
output to d:/inventory.txt.
for each pt_mstr no-lock, each ld_det where pt_part = ld_part no-lock:
display pt_part pt_pvm_um ld_loc ld_qty_oh with STREAM-IO WIDTH 150.
end.
output close. |
|