* gw-engine-spec.scm: wrap gnc_lot_get_split_list

* gw-business-core-spec.scm: wrap gncInvoiceGetPosted{Acc,Txn,Lot}


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7086 57a11ea4-9604-0410-9ed3-97b8803252fd

ChangeLog

@@ -1,3 +1,8 @@
+2002-07-05  Derek Atkins  <derek@ihtf.com>
+
+	* gw-engine-spec.scm: wrap gnc_lot_get_split_list
+	* gw-business-core-spec.scm: wrap gncInvoiceGetPosted{Acc,Txn,Lot}
+
 2002-07-04  Derek Atkins  <derek@ihtfp.com>
 
 	* option-util.c: add gnc_option_get_option_data() function

src/business/business-core/gw-business-core-spec.scm

@@ -601,6 +601,30 @@
    '((<gnc:GncInvoice*> invoice))
    "Return the invoice's list of Entries")
 
+  (gw:wrap-function
+   ws
+   'gnc:invoice-get-posted-lot
+   '<gnc:Lot*>
+   "gncInvoiceGetPostedLot"
+   '((<gnc:GncInvoice*> invoice))
+   "Return the posted Lot for this Invoice.")
+
+  (gw:wrap-function
+   ws
+   'gnc:invoice-get-posted-account
+   '<gnc:Account*>
+   "gncInvoiceGetPostedAcc"
+   '((<gnc:GncInvoice*> invoice))
+   "Return the posted Account for this Invoice.")
+
+  (gw:wrap-function
+   ws
+   'gnc:invoice-get-posted-txn
+   '<gnc:Transaction*>
+   "gncInvoiceGetPostedTxn"
+   '((<gnc:GncInvoice*> invoice))
+   "Return the posted Transaction for this Invoice.")
+
   (gw:wrap-function
    ws
    'gnc:invoice-get-invoice-from-lot

src/engine/gw-engine-spec.scm

@@ -2364,3 +2364,11 @@ the timepair representing midday on that day")
  "gnc_lot_is_closed"
  '((<gnc:Lot*> lot))
  "Is this Lot closed (is the balance zero)?")
+
+(gw:wrap-function
+ ws
+ 'gnc:lot-get-splits
+ '(gw:glist-of <gnc:Split*> callee-owned)
+ "gnc_lot_get_split_list"
+ '((<gnc:Lot*> lot))
+ "Return the list of splits attached to this lot.")