[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

SF.net SVN: ledger-smb:[3787] addons/1.3/enhanced_aa



Revision: 3787
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=3787&view=rev
Author:   einhverfr
Date:     2011-10-01 21:59:54 +0000 (Sat, 01 Oct 2011)
Log Message:
-----------
Resurrecting code accidently deleted

Added Paths:
-----------
    addons/1.3/enhanced_aa/arap2.pl
    addons/1.3/enhanced_aa/transaction.html

Added: addons/1.3/enhanced_aa/arap2.pl
===================================================================
--- addons/1.3/enhanced_aa/arap2.pl	                        (rev 0)
+++ addons/1.3/enhanced_aa/arap2.pl	2011-10-01 21:59:54 UTC (rev 3787)
@@ -0,0 +1,20 @@
+=pod
+
+=cut
+
+
+
+sub display_screen {
+    my ($request) = @_;
+    @{$request->{hiddens}} = qw(batch_id approved id printed emailed sort 
+           closedto locked title type oldtransdate audittrail recurring 
+           checktax reverse batch_id subtype entity_control_code meta_number
+           defaultcurrency);
+    push @{$request->{hiddens}}, 
+         ("old$form->{vc}",  "$form->{vc}_id",
+        "terms",           "creditlimit",
+        "creditremaining", "selectcurrency",
+        "defaultcurrency", "select$form->{ARAP}_amount",
+        "rowcount");
+
+}

Added: addons/1.3/enhanced_aa/transaction.html
===================================================================
--- addons/1.3/enhanced_aa/transaction.html	                        (rev 0)
+++ addons/1.3/enhanced_aa/transaction.html	2011-10-01 21:59:54 UTC (rev 3787)
@@ -0,0 +1,99 @@
+<?lsmb PROCESS 'ui-header.html' ?>
+<?lsmb INCLUDE 'elements.html' ?>
+<body>
+<?lsmb 
+    # Localization strings
+    # text('Edit Debit Note')
+    # text('Add Credit Note')
+    # text('Edit Credit Note')
+    # text('Add AP Transaction')
+    # text('Edit AP Transaction')
+?>
+<form method="POST" action="arap2.pl">
+<?lsmb FOR hid IN hiddens;
+     PROCESS input element_data = {
+             type = "hidden"
+             name = hid
+             value = ${hid}
+     };
+END ?>
+<div class="listtop"><?lsmb title ?></div>
+<table width="100%">
+  <tr valign="top">
+    <td>
+      <table width="100%">
+        <tr valign="top">
+          <td>
+            <table>
+              <tr>
+                <th align="right" nowrap><?lsmb vc_label ?></th>
+                <td colspan="3">
+                <?lsmb IF selectvc;
+                       PROCESS select element_data = {
+                               name = vc
+                               value_attr = 'id'
+                               options = contact_options
+                               default_options = [vc]
+                               class = "credit"
+                       };
+                       ELSE;
+                       PROCESS input element_data = {
+                               name = vc
+                               value = ${vc}
+                               type = "text"
+                               class = "credit"
+                       };
+                       END ?>
+                </td>
+              </tr>
+              <tr>
+                <td></td>
+                <td colspan="3">
+                  <table width="100%">
+                    <tr>
+                      <th align="left">
+                          <?lsmb text('Credit Limit') ?>
+                      </th>
+                      <td><?lsmb creditlimit ?></td>
+                      <th align=left><?lsmb text('Remaining') ?></th>
+                      <td class="plus$n"><?lsmb creditremaining ?></td>
+                    </tr>
+                  </table>
+                </td>
+              </tr>
+                <?lsmb IF batch_id ?>
+              <tr>
+                <th align="right"> 
+                    <? text('Batch Control Code') ?>
+                </th>
+                <td><?lsmb batch_control_code ?></td>
+              </tr>
+                <tr>
+                <th align="right"> <?lsmb text('Batch Name') ?> </th>
+                <td><?lsmb batch_description ?></td>
+              </tr>
+                <?lsmb END ?>
+		<?lsmb IF entity_control_code ?>
+	        <tr>
+		<th align="right"> 
+                    <?lsmb text('Entity Control Code') ?></th>
+		<td colspan=3> <?lsmb entity_control_code ?></td>
+	      </tr>
+	        <tr>
+		<th align="right"> <?lsmb text('Account') ?></th>
+		<td colspan=3><?lsmb meta_number ?></td>
+	      </tr>
+                <?lsmb END ?>
+              <tr>
+                <th align=right nowrap> <?lsmb text('Currency') ?></th>
+                <td><?lsmb PROCESS select element_data = {
+                           name = "currency"
+                           default_values = [currency]
+                           options = currencies
+                           text_attr = "curr"
+                           value_attr = "curr"
+                           class = "currency"
+                } ?></td>
+</form>
+</body>
+</html>

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.