Patch level : 12.0 1098

Files correlati     : li0.exe fp0.exe ve1.exe
Commento        :

Aggiunta la data di protocollo dell'Agenzia delle Entrate sulle lettere d'intento.

src/li/li0400.cpp

@@ -67,7 +67,12 @@ bool TLetint_mask::on_field_event(TOperable_field& o, TField_event e, long jolly
       }
     }
     break;
-
+	case F_PROTINTF:
+		if (e == fe_close && get_int(F_ANNO) > 2020 && (insert_mode() || edit_mode()))
+		{
+			if (!o.get().full())
+				return error_box(TR("Dal 2021 il protocollo di invio è obbligatorio"));
+		}
   case F_DATAREG:
     if (e == fe_close && insert_mode())
     {
@@ -238,6 +243,8 @@ void TLetint::init_modify_mode(TMask& m)	//evita la registrazione di un record m
 		xvtil_statbar_set(msg);
 	}
 	m.disable(F_UTILIZZATO);
+	if (m.get(F_PROTDATA).blank() && m.get(F_PROTINTF).full())
+		m.set(F_PROTDATA, m.get(F_VSDATA));
 }
 
 

src/li/li0400a.uml

@@ -196,13 +196,15 @@ DATE F_VSDATA
 BEGIN
   PROMPT 35 11 "Data di emissione"
   FIELD VSDATA
-  CHECKTYPE REQUIRED
+  VALIDATE REQIF_FUNC 1 F_VSPROT
+  WARNING "Data di emissione obbligatoria"
 END
 
 STRING F_PROTINTF 17
 BEGIN
   PROMPT 1 12 "Numero di protocollo di invio:"
   FIELD PROTINTF
+  WARNING "Numero di protocollo obbligatorio"
   //CHECKTYPE REQUIRED
 END
 
@@ -210,13 +212,16 @@ STRING F_PROTINTS 6
 BEGIN
   PROMPT 50 12 "-"
   FIELD PROTINTS
-  //CHECKTYPE REQUIRED
+  VALIDATE REQIF_FUNC 1 F_PROTINTF
+  WARNING "Numero di protocollo obbligatorio"
 END
 
 DATE F_PROTDATA
 BEGIN
-  PROMPT 60 12 ""
+  PROMPT 60 12 "Data"
   FIELD PROTDATA
+  VALIDATE REQIF_FUNC 1 F_PROTINTF
+  WARNING "Data di protocollo obbligatoria"
 END
 
 STRING F_TIPOES 6

src/li/lilib01.cpp

@@ -443,6 +443,8 @@ int TLi_manager::get_plafond_row(const TDocumento & d, TString & protinf, TStrin
       protinf = reclint.get(LETINT_PROTINTF);
       protins = reclint.get(LETINT_PROTINTS);
       dataprot = reclint.get_date(LETINT_PROTDATA);
+			if (!dataprot.ok())
+				dataprot = reclint.get_date(LETINT_VSDATA);
       if (type.full() && rectype.full())
       {
         field = rectype.get("S4");