adding voided field to money::payment -- another log-causing oversight
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 5 Dec 2007 19:32:58 +0000 (19:32 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 5 Dec 2007 19:32:58 +0000 (19:32 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@8144 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/examples/fm_IDL.xml
Open-ILS/src/perlmods/OpenILS/Application/Storage/CDBI/money.pm

index 616dcaa..8aff39e 100644 (file)
                        <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"/>
index af1cb89..e458bc7 100644 (file)
@@ -86,7 +86,7 @@ package money::payment;
 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;