X-Git-Url: https://delta.frontaccounting.com/gitweb/?a=blobdiff_plain;f=purchasing%2Fincludes%2Fdb%2Fsuppalloc_db.inc;h=1c0f16eb8da44d7f76b6f6f46a06a52bab08b14f;hb=80dd97a37f674cc3691fa04af4c29607067566b2;hp=91b533964c02176e029a3fb2f1c4489b304bacc5;hpb=5e645e8c7492625677178e8b52da9456299a7411;p=fa-stable.git

diff --git a/purchasing/includes/db/suppalloc_db.inc b/purchasing/includes/db/suppalloc_db.inc
index 91b53396..1c0f16eb 100644
--- a/purchasing/includes/db/suppalloc_db.inc
+++ b/purchasing/includes/db/suppalloc_db.inc
@@ -81,7 +81,7 @@ function clear_supp_alloctions($type, $type_no, $date="")
 		// 2008-09-20 Joe Hunt
 		if ($date != "")
 			exchange_variation($type, $type_no, $row['trans_type_to'], $row['trans_no_to'], $date,
-				$row['amt'], payment_person_types::supplier(), true);
+				$row['amt'], PT_SUPPLIER, true);
 		//////////////////////
 	}