From 32bb7e669f38c54b65f2a2729b39557916107f4f Mon Sep 17 00:00:00 2001
From: alex <alex@c028cbd2-c16b-5b4b-a496-9718f37d4682>
Date: Wed, 16 Dec 2009 14:07:34 +0000
Subject: [PATCH] Patch level         : 10.0 550 Files correlati     :
 Ricompilazione Demo : [ ]

Modifiche alle mashere delle tabelle di correlazione


git-svn-id: svn://10.65.10.50/trunk@19796 c028cbd2-c16b-5b4b-a496-9718f37d4682
---
 tc/tc0300a.uml | 12 +++++-------
 tc/tctscau.uml |  2 +-
 tc/tctscdp.uml |  1 -
 tc/tctsiva.uml |  1 -
 tc/tctsnaz.uml |  1 -
 tc/tctsreg.uml |  1 -
 6 files changed, 6 insertions(+), 12 deletions(-)

diff --git a/tc/tc0300a.uml b/tc/tc0300a.uml
index a599cbd21..e771ba158 100755
--- a/tc/tc0300a.uml
+++ b/tc/tc0300a.uml
@@ -83,13 +83,11 @@ END
 NUMBER F_EMCAU 3
 BEGIN
 	PROMPT 42 12 "Causale TS per movimenti senza causale "
-  USE LF_MULTIREL
-  INPUT COD "TSCAU"
-  INPUT FIRST F_EMCAU
-  DISPLAY "Codice" FIRST
-  DISPLAY "Descrizione@60" DATA
-  DISPLAY "Causale Collegata" SECOND
-  OUTPUT F_EMCAU FIRST
+  USE &TCA
+  INPUT CODTAB F_EMCAU
+  DISPLAY "Codice" CODTAB
+  DISPLAY "Descrizione@60" S0
+  OUTPUT F_EMCAU CODTAB
 	CHECKTYPE REQUIRED
   FLAGS "Z"
 	FIELD TSREMCAU
diff --git a/tc/tctscau.uml b/tc/tctscau.uml
index a3c98b8e4..4b41b81ec 100755
--- a/tc/tctscau.uml
+++ b/tc/tctscau.uml
@@ -31,7 +31,7 @@ BEGIN
   DISPLAY "Descrizione@60" LF_CAUSALI->DESCR
   DISPLAY "Causale Teamsystem" DATA
   OUTPUT F_CODTAB FIRST
-  OUTPUT F_DESC LF_CAUSALI->DESCR
+  OUTPUT F_CODTAB1 FIRST
   OUTPUT F_COD_CAMPO DATA
   FIELD FIRST
   FLAGS "UZG"  
diff --git a/tc/tctscdp.uml b/tc/tctscdp.uml
index 7e35c6f49..ea122ec18 100755
--- a/tc/tctscdp.uml
+++ b/tc/tctscdp.uml
@@ -31,7 +31,6 @@ BEGIN
   DISPLAY "Condizione TeamSystem" DATA
   OUTPUT F_CODTAB FIRST
   OUTPUT F_CODTAB1 FIRST
-  OUTPUT F_DESC %CPG->S0
   OUTPUT F_COD_CAMPO DATA
 	CHECKTYPE REQUIRED
   FIELD FIRST
diff --git a/tc/tctsiva.uml b/tc/tctsiva.uml
index df3c20afc..4199c8f13 100755
--- a/tc/tctsiva.uml
+++ b/tc/tctsiva.uml
@@ -31,7 +31,6 @@ BEGIN
   DISPLAY "Descrizione@60" %IVA->S0
   DISPLAY "Codice IVA Teamsystem" DATA
   OUTPUT F_CODTAB FIRST
-  OUTPUT F_DESC %IVA->S0
   OUTPUT F_COD_CAMPO DATA
   CHECKTYPE REQUIRED
   FIELD FIRST
diff --git a/tc/tctsnaz.uml b/tc/tctsnaz.uml
index 72a638412..4aa8692fb 100755
--- a/tc/tctsnaz.uml
+++ b/tc/tctsnaz.uml
@@ -31,7 +31,6 @@ BEGIN
   DISPLAY "Descrizione@60" %STA->S0
   DISPLAY "Nazione Teamsystem" DATA
   OUTPUT F_CODTAB FIRST
-  OUTPUT F_DESC %STA->S0
 	CHECKTYPE REQUIRED
   FIELD FIRST
   FLAGS "Z"
diff --git a/tc/tctsreg.uml b/tc/tctsreg.uml
index fd7da4f56..da6ff399d 100755
--- a/tc/tctsreg.uml
+++ b/tc/tctsreg.uml
@@ -37,7 +37,6 @@ BEGIN
   DISPLAY "Tipo" DATA[1,1]
   DISPLAY "Codice registro" DATA[2,3]
   OUTPUT F_CODTAB FIRST
-  OUTPUT F_DESC REG->S0
   FLAGS "UZ"
   CHECKTYPE REQUIRED
   FIELD FIRST