diff --git a/pr/agenti.h b/pr/agenti.h index 2b8376ef1..d14e79c3e 100755 --- a/pr/agenti.h +++ b/pr/agenti.h @@ -27,6 +27,9 @@ #define AGE_PLURIMAND "PLURIMAND" #define AGE_DATACESS "DATACESS" #define AGE_CODMAG "CODMAG" +#define AGE_GRUPPO "GRUPPO" +#define AGE_CONTO "CONTO" +#define AGE_SOTTOCONTO "SOTTOCONTO" #endif diff --git a/pr/f122.dir b/pr/f122.dir index e0df8171e..7b39684bc 100755 --- a/pr/f122.dir +++ b/pr/f122.dir @@ -1,3 +1,3 @@ 122 0 -$agenti|0|0|156|0|Archivio agenti||| +$agenti|0|0|168|0|Archivio agenti||| diff --git a/pr/f122.trr b/pr/f122.trr index 4908d6306..9d4385985 100755 --- a/pr/f122.trr +++ b/pr/f122.trr @@ -1,5 +1,5 @@ 122 -24 +27 CODAGE|1|5|0|Codice agente RAGSOC|1|50|0|Ragione sociale CODFORN|3|6|0|Codice fornitore relativo @@ -24,6 +24,9 @@ MATRICOLA|1|8|0|Matricola PLURIMAND|8|1|0|Plurimandatario DATACESS|5|8|0|Data cessazione rapporto CODMAG|1|5|0|Codice magazzino viaggiante +GRUPPO|2|3|0|Codice gruppo incasso +CONTO|2|3|0|Codice conto incasso +SOTTOCONTO|3|6|0|Codice sottoconto incasso 3 CODAGE| UPPER(RAGSOC)|X diff --git a/pr/pr0500a.h b/pr/pr0500a.h index fb865c119..b60b2d667 100755 --- a/pr/pr0500a.h +++ b/pr/pr0500a.h @@ -1,40 +1,46 @@ -// campi maschera pr0500a.uml +//campi maschera pr0500a.uml -#define F_CODAGE 101 -#define F_RAGSOC 102 -#define F_CODFORN 103 -#define F_DESCRFORN 104 -#define F_TIPO 105 -#define F_CODCAPO 106 -#define F_DESCRCAPO 107 -#define F_PERCCAPO 108 -#define F_PERCFATT 109 -#define F_PERCPAG 110 -#define F_CAMPOPROVV 111 -#define F_DESCAMPOPROVV 112 -#define F_PERCPROVV 113 -#define F_SEQRIC1 114 -#define F_SEQRIC2 115 -#define F_SEQRIC3 116 -#define F_SEQRIC4 117 -#define F_CODRICPR1 118 -#define F_CODRICPR2 119 -#define F_CODRICPR3 120 -#define F_CODRICPR4 121 -#define F_SEQALT1 122 -#define F_SEQALT2 123 -#define F_SEQALT3 124 -#define F_SEQALT4 125 -#define F_CODALTPR1 126 -#define F_CODALTPR2 127 -#define F_CODALTPR3 128 -#define F_CODALTPR4 129 -#define F_MATRICOLA 130 -#define F_PLURIMAND 131 -#define F_DATACESS 132 -#define F_CODMAG 135 -#define F_DESMAG 136 -#define F_CODDEP 137 -#define F_DESDEP 138 +#define F_CODAGE 101 +#define F_RAGSOC 102 +#define F_CODFORN 103 +#define F_DESCRFORN 104 +#define F_TIPO 105 +#define F_CODCAPO 106 +#define F_DESCRCAPO 107 +#define F_PERCCAPO 108 +#define F_PERCFATT 109 +#define F_PERCPAG 110 +#define F_CAMPOPROVV 111 +#define F_DESCAMPOPROVV 112 +#define F_PERCPROVV 113 +#define F_SEQRIC1 114 +#define F_SEQRIC2 115 +#define F_SEQRIC3 116 +#define F_SEQRIC4 117 +#define F_CODRICPR1 118 +#define F_CODRICPR2 119 +#define F_CODRICPR3 120 +#define F_CODRICPR4 121 +#define F_SEQALT1 122 +#define F_SEQALT2 123 +#define F_SEQALT3 124 +#define F_SEQALT4 125 +#define F_CODALTPR1 126 +#define F_CODALTPR2 127 +#define F_CODALTPR3 128 +#define F_CODALTPR4 129 +#define F_MATRICOLA 130 +#define F_PLURIMAND 131 +#define F_DATACESS 132 +#define F_CODMAG 135 +#define F_DESMAG 136 +#define F_CODDEP 137 +#define F_DESDEP 138 +#define F_GRUPPO 139 +#define F_DESCG 140 +#define F_CONTO 141 +#define F_DESCC 142 +#define F_SOTTOCONTO 143 +#define F_DESC 144 #define G_CAPOZONA 1 diff --git a/pr/pr0500a.uml b/pr/pr0500a.uml index ef6682598..7526918d3 100755 --- a/pr/pr0500a.uml +++ b/pr/pr0500a.uml @@ -488,5 +488,92 @@ BEGIN WARNING "Codice archivio non valido o gia' utilizzato per questa sequenza" END +GROUPBOX DLG_NULL 76 5 +BEGIN + PROMPT 1 14 "@bConto incassi" + FLAGS "R" +END + +NUMBER F_GRUPPO 3 +BEGIN + PROMPT 2 15 "Gruppo " + HELP "Codice del gruppo" + FIELD GRUPPO + USE LF_PCON SELECT CONTO="" + INPUT GRUPPO F_GRUPPO + DISPLAY "Gruppo" GRUPPO + DISPLAY "Descrizione@50" DESCR + OUTPUT F_GRUPPO GRUPPO + OUTPUT F_DESCG DESCR + CHECKTYPE NORMAL +END + +STRING F_DESCG 50 +BEGIN + PROMPT 24 15 "" + FLAGS "D" +END + +NUMBER F_CONTO 3 +BEGIN + PROMPT 2 16 "Conto " + HELP "Codice dell'eventuale conto" + FIELD CONTO + USE LF_PCON SELECT ((CONTO!="")&&(SOTTOCONTO="")) + COPY INPUT F_GRUPPO + INPUT CONTO F_CONTO + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Descrizione@50" DESCR + OUTPUT F_GRUPPO GRUPPO + OUTPUT F_CONTO CONTO + OUTPUT F_DESCC DESCR + CHECKTYPE NORMAL + VALIDATE REQIF_FUNC 1 F_SOTTOCONTO + WARNING "Manca il conto" +END + +STRING F_DESCC 50 +BEGIN + PROMPT 24 16 "" + FLAGS "D" +END + +NUMBER F_SOTTOCONTO 6 +BEGIN + PROMPT 2 17 "Sottoconto " + HELP "Codice dell'eventuale sottoconto" + FIELD SOTTOCONTO + USE LF_PCON SELECT SOTTOCONTO!="" + COPY INPUT F_CONTO + INPUT SOTTOCONTO F_SOTTOCONTO + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" SOTTOCONTO + DISPLAY "Sosp." SOSPESO + DISPLAY "Descrizione@50" DESCR + OUTPUT F_SOTTOCONTO SOTTOCONTO + OUTPUT F_GRUPPO GRUPPO + OUTPUT F_CONTO CONTO + OUTPUT F_DESC DESCR + CHECKTYPE NORMAL +END + +STRING F_DESC 50 +BEGIN + PROMPT 24 17 "" + USE LF_PCON KEY 2 + INPUT DESCR F_DESC + DISPLAY "Descrizione@50" DESCR + DISPLAY "Sosp." SOSPESO + DISPLAY "Gruppo" GRUPPO + DISPLAY "Conto" CONTO + DISPLAY "Sottoconto" SOTTOCONTO + COPY OUTPUT F_SOTTOCONTO + CHECKTYPE NORMAL + HELP "Descrizione del gruppo o del conto o del sottoconto" + WARNING "Descrizione mancante" +END + ENDPAGE ENDMASK