Patch level : 12.0 360

Files correlati     : li0.exe
Commento            : Modificata maschera li0400 per visualizzare le vecchie dichiarazioni

git-svn-id: svn://10.65.10.50/branches/R_10_00@23671 c028cbd2-c16b-5b4b-a496-9718f37d4682

src/li/li0400.cpp

@@ -83,6 +83,24 @@ bool TLetint_mask::on_field_event(TOperable_field& o, TField_event e, long jolly
 			{
 			}
     break;
+	case F_TIPOOP:
+		switch(get_int(F_TIPOOP))
+		{
+		case 1:
+			enable(DLG_SAVEREC);
+			disable(F_DAL);
+			break;
+		case 2:
+			enable(DLG_SAVEREC);
+			enable(F_DAL);
+			break;
+		case 3:
+			disable(DLG_SAVEREC);
+			disable(F_DAL);
+			break;
+		default:
+			break;
+		}
 	case DLG_SAVEREC:
 	{
 		// Salvo le informazioni nel cliente:

src/li/li0400a.uml

@@ -224,6 +224,8 @@ BEGIN
   MESSAGE ENABLE,F_IMPORTO|CLEAR,1@
   ITEM "2|A concorrenza"
   MESSAGE ENABLE,F_IMPORTO|CLEAR,1@
+  ITEM "3|Nel periodo"
+  MESSAGE ENABLE,1@|CLEAR,F_IMPORTO
   FIELD TIPOOP
 END
 
@@ -248,6 +250,14 @@ BEGIN
   FLAGS "D"
 END
 
+DATE F_AL
+BEGIN
+  PROMPT 42 18 "Data fine periodo  "
+  FIELD AL
+  CHECKTYPE REQUIRED
+  FLAGS "D"
+END
+
 BOOLEAN F_STAMPATO
 BEGIN
   PROMPT 2 20 ""