column heading on bom

diff --git a/farnell/farnell-find b/farnell/farnell-find
index 59b7f835c99fd417f098bba624d77038be0b2858..9b45d344fcf33d02ee65bb0348b3c65ffc1ad2c2 100755 (executable)
--- a/farnell/farnell-find
+++ b/farnell/farnell-find
@@ -509,6 +509,10 @@ sub analyse_spec ($) {
     }
     if ($op eq 'order-bom') {
        dump_warnerrs();
+    } else {
+       printf " Qty  %-10s %-*s (ex VAT) Each Total Stock?\n\n",
+           'Item', $desclen-7, 'Part no. and Description'
+               or die $!;
     }
     foreach $item (sort { itemsortmap($a) cmp itemsortmap($b); }
                   keys %show) {