[open-ils-commits] r8144 - in trunk/Open-ILS: examples src/perlmods/OpenILS/Application/Storage/CDBI

[svn at svn.open-ils.org]

Author: miker
Date: 2007-12-05 14:32:58 -0500 (Wed, 05 Dec 2007)
New Revision: 8144

Modified:
   trunk/Open-ILS/examples/fm_IDL.xml
   trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/money.pm
Log:
adding voided field to money::payment -- another log-causing oversight

Modified: trunk/Open-ILS/examples/fm_IDL.xml
===================================================================
--- trunk/Open-ILS/examples/fm_IDL.xml	2007-12-05 17:42:46 UTC (rev 8143)
+++ trunk/Open-ILS/examples/fm_IDL.xml	2007-12-05 19:32:58 UTC (rev 8144)
@@ -2032,6 +2032,7 @@
 			<field reporter:label="Work Payment Detail" name="work_payment" oils_obj:array_position="14" oils_persist:virtual="true" reporter:datatype="link"/>
 			<field reporter:label="Forgive Payment Detail" name="forgive_payment" oils_obj:array_position="15" oils_persist:virtual="true" reporter:datatype="link"/>
 			<field reporter:label="Goods Payment Detail" name="goods_payment" oils_obj:array_position="16" oils_persist:virtual="true" reporter:datatype="link"/>
+			<field reporter:label="Voided" name="voided" oils_obj:array_position="17" oils_persist:virtual="false" reporter:datatype="bool"/>
 		</fields>
 		<links>
 			<link field="cash_payment" reltype="might_have" key="id" map="" class="mcp"/>

Modified: trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/money.pm
===================================================================
--- trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/money.pm	2007-12-05 17:42:46 UTC (rev 8143)
+++ trunk/Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/money.pm	2007-12-05 19:32:58 UTC (rev 8144)
@@ -86,7 +86,7 @@
 use base qw/money/;
 __PACKAGE__->table('money_payment');
 __PACKAGE__->columns(Primary => 'id');
-__PACKAGE__->columns(Essential => qw/xact amount payment_ts payment_type note/);
+__PACKAGE__->columns(Essential => qw/xact amount payment_ts payment_type note voided/);
 #-------------------------------------------------------------------------------
 
 package money::desk_payment;