From: Bdale Garbee <bdale@gag.com>
Date: Sun, 21 Jun 2015 00:46:10 +0000 (-0600)
Subject: add more attributes to partslistgag for AC BOM creation
X-Git-Tag: telelco-v3.0~706
X-Git-Url: https://git.gag.com/?a=commitdiff_plain;h=73480b04a4130e83607cfd2d883c74c8e334611b;p=hw%2Faltusmetrum

add more attributes to partslistgag for AC BOM creation
---

diff --git a/packages/BU2032SM.py b/packages/BU2032SM.py
index 1e230ed..0e17c4c 100755
--- a/packages/BU2032SM.py
+++ b/packages/BU2032SM.py
@@ -32,7 +32,7 @@ print '   Pad[',\
  	mm2mils100(-PinSpacing/2 - PinWidth/2), \
 	mm2mils100(PinHeight/2 - PinWidth/2), \
 	mm2mils100(PinWidth), \
-	0, \
+	mm2mils100(1.5), \
 	mm2mils100(PinWidth+0.4), \
 	'"pin1" "1" 0x0100]'
 
@@ -42,7 +42,7 @@ print '   Pad[',\
  	mm2mils100(PinSpacing/2 + PinWidth/2), \
 	mm2mils100(PinHeight/2 - PinWidth/2), \
 	mm2mils100(PinWidth), \
-	0, \
+	mm2mils100(1.5), \
 	mm2mils100(PinWidth+0.4), \
 	'"pin2" "2" 0x0100]'
 
diff --git a/packages/TE1217861.fp b/packages/TE1217861.fp
index d68898c..cd28e72 100644
--- a/packages/TE1217861.fp
+++ b/packages/TE1217861.fp
@@ -4,7 +4,7 @@ Element[0x0 "TE1217861" "" "" 0 0 0 0 0 100 ""]
 	ElementLine [  15600 -6150  15600  6150 1000 ]
 	ElementLine [  15600  6150 -15600  6150 1000 ]
 	ElementLine [ -15600  6150 -15600 -6150 1000 ]
-	Pin [ -10000 0 4500 4500 0 5500 "" "" 0x0001 ]
-	Pin [  10000 0 4500 4500 0 5500 "" "" 0x0001 ]
+	Pin [ -10000 0 4500 4500 0 5500 "1" "1" 0x0001 ]
+	Pin [  10000 0 4500 4500 0 5500 "1" "1" 0x0001 ]
 	Pad [ -10000 0 10000 0 14000 18000 16000  "1" "1" 0x0000 ]
 )
diff --git a/scheme/gnet-partslistgag.scm b/scheme/gnet-partslistgag.scm
index 01b71e3..42b24d6 100644
--- a/scheme/gnet-partslistgag.scm
+++ b/scheme/gnet-partslistgag.scm
@@ -48,6 +48,8 @@
 			(get-value package)  
 			(gnetlist:get-package-attribute package "footprint")
 			(gnetlist:get-package-attribute package "loadstatus")
+			(gnetlist:get-package-attribute package "provided")
+			(gnetlist:get-package-attribute package "mfg_part_number")
 			(gnetlist:get-package-attribute package "vendor")
 			(gnetlist:get-package-attribute package "vendor_part_number")) ;; sdb change
 		  (get-parts-table (cdr packages)))))))
@@ -100,7 +102,7 @@
 
 (define partslistgag:write-top-header
   (lambda (port)
-    (display "\"device\",\"value\",\"footprint\",\"loadstatus\",\"vendor\",\"vendor_part_number\",\"quantity\",\"refdes\"\n" port)))
+    (display "\"device\",\"value\",\"footprint\",\"loadstatus\",\"provided\",\"mfg_part_number\",\"vendor\",\"vendor_part_number\",\"quantity\",\"refdes\"\n" port)))
 
 (define (partslistgag:write-partslist ls port)
   (if (null? ls)