FOR GRFS=GRFS TKB @GRFSTKBLD