From cc5dc6d872021c1a8da30c368d5b2b9316c90b33 Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Wed, 19 Apr 1995 12:53:52 +0000
Subject: [PATCH] Possibilita' di chiamare l' anagrafica ditta con un codice

git-svn-id: svn://10.65.10.50/trunk@1271 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 ba/ba4300.cpp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/ba/ba4300.cpp b/ba/ba4300.cpp
index a03b42df1..719a415eb 100755
--- a/ba/ba4300.cpp
+++ b/ba/ba4300.cpp
@@ -175,6 +175,14 @@ bool TDitte_application::user_create() // initvar e arrmask
   _attiv = new TLocalisamfile(LF_ATTIV);
   _tabcom = new TLocalisamfile(LF_TABCOM);
   set_search_field(FLD_GD1_CODDITTA);
+  if (argc() > 2)
+  {
+    get_mask(MODE_QUERY);
+    TString16 s("1|");
+
+    s << argv(2);
+    set_link(*_msk, s);
+  }
   return TRUE;
 }