Patch level : 12.0 764
Files correlati : vetbrss.msk vetbspp.msk vetbatr.msk vetbprs.msk Commento : Sistemate maschere tabelle spese prestazioni risorse e attrezzature
This commit is contained in:
		
							parent
							
								
									1d6b7a426e
								
							
						
					
					
						commit
						1255aac8a5
					
				@ -247,7 +247,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING ATR_CODARTDISP 20
 | 
					STRING ATR_CODARTDISP 20
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 15 "Art. dispon.  "
 | 
					  PROMPT 2 16 "Art. dispon.  "
 | 
				
			||||||
  COPY USE ATR_CODART
 | 
					  COPY USE ATR_CODART
 | 
				
			||||||
  INPUT CODART ATR_CODARTDISP
 | 
					  INPUT CODART ATR_CODARTDISP
 | 
				
			||||||
  COPY DISPLAY ATR_CODART
 | 
					  COPY DISPLAY ATR_CODART
 | 
				
			||||||
@ -261,7 +261,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING ATR_DESCARTDISP 50 34
 | 
					STRING ATR_DESCARTDISP 50 34
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 40 15 ""
 | 
					  PROMPT 40 16 ""
 | 
				
			||||||
  COPY USE ATR_DESCART
 | 
					  COPY USE ATR_DESCART
 | 
				
			||||||
  INPUT DESCR ATR_DESCARTDISP
 | 
					  INPUT DESCR ATR_DESCARTDISP
 | 
				
			||||||
  COPY DISPLAY ATR_DESCART
 | 
					  COPY DISPLAY ATR_DESCART
 | 
				
			||||||
@ -273,7 +273,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING ATR_TIPORADISP 2
 | 
					STRING ATR_TIPORADISP 2
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 16 "Tipo ora "
 | 
					  PROMPT 2 17 "Tipo ora "
 | 
				
			||||||
  USE &CIORE
 | 
					  USE &CIORE
 | 
				
			||||||
  DISPLAY "Codice" CODTAB
 | 
					  DISPLAY "Codice" CODTAB
 | 
				
			||||||
  DISPLAY "Descrizione@50" S0
 | 
					  DISPLAY "Descrizione@50" S0
 | 
				
			||||||
@ -285,7 +285,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
CURRENCY ATR_PREZZODISP 12
 | 
					CURRENCY ATR_PREZZODISP 12
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 22 16 "Prezzo disponibilità "
 | 
					  PROMPT 22 17 "Prezzo disponibilità "
 | 
				
			||||||
  FLAGS "U"
 | 
					  FLAGS "U"
 | 
				
			||||||
  FIELD R11
 | 
					  FIELD R11
 | 
				
			||||||
  MODULE ci
 | 
					  MODULE ci
 | 
				
			||||||
 | 
				
			|||||||
@ -297,7 +297,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING PRS_CODTRB 4
 | 
					STRING PRS_CODTRB 4
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
PROMPT 2 20  "Cod. tributo   "
 | 
					PROMPT 2 22  "Cod.tributo"
 | 
				
			||||||
FIELD S10
 | 
					FIELD S10
 | 
				
			||||||
FLAG "U"
 | 
					FLAG "U"
 | 
				
			||||||
USE %TRB
 | 
					USE %TRB
 | 
				
			||||||
@ -311,7 +311,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING PRS_CODTRB1 50 22
 | 
					STRING PRS_CODTRB1 50 22
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
PROMPT 25 20 ""
 | 
					PROMPT 22 22 ""
 | 
				
			||||||
USE %TRB KEY 2
 | 
					USE %TRB KEY 2
 | 
				
			||||||
INPUT S0  PRS_CODTRB1
 | 
					INPUT S0  PRS_CODTRB1
 | 
				
			||||||
DISPLAY "Descrizione@50" S0
 | 
					DISPLAY "Descrizione@50" S0
 | 
				
			||||||
@ -323,7 +323,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
NUMBER PRS_CODCAUS770 2
 | 
					NUMBER PRS_CODCAUS770 2
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 21 "Caus. 770 "
 | 
					  PROMPT 2 23 "Caus. 770 "
 | 
				
			||||||
  USE %CA7 SELECT I0==#PRS_CODTRB
 | 
					  USE %CA7 SELECT I0==#PRS_CODTRB
 | 
				
			||||||
  INPUT CODTAB PRS_CODCAUS770
 | 
					  INPUT CODTAB PRS_CODCAUS770
 | 
				
			||||||
  DISPLAY "Cod.caus." CODTAB
 | 
					  DISPLAY "Cod.caus." CODTAB
 | 
				
			||||||
@ -340,7 +340,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
LISTBOX PRS_CODQUA 2 10
 | 
					LISTBOX PRS_CODQUA 2 10
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 20 21 "Quadro    "
 | 
					  PROMPT 18 23 "Quadro    "
 | 
				
			||||||
  HELP "Inserire il codice quadro"
 | 
					  HELP "Inserire il codice quadro"
 | 
				
			||||||
  ITEM "|" MESSAGE CLEAR,PRS_CAUSD
 | 
					  ITEM "|" MESSAGE CLEAR,PRS_CAUSD
 | 
				
			||||||
  ITEM "LA|Quadro LA" MESSAGE ENABLE,PRS_CAUSD
 | 
					  ITEM "LA|Quadro LA" MESSAGE ENABLE,PRS_CAUSD
 | 
				
			||||||
@ -352,7 +352,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING PRS_CAUSD 2
 | 
					STRING PRS_CAUSD 2
 | 
				
			||||||
BEGIN             
 | 
					BEGIN             
 | 
				
			||||||
  PROMPT 50 21 "Causale LA "
 | 
					  PROMPT 41 23 "Causale LA"
 | 
				
			||||||
  FLAGS "U"
 | 
					  FLAGS "U"
 | 
				
			||||||
  SHEET "Codice|Descrizione@320"
 | 
					  SHEET "Codice|Descrizione@320"
 | 
				
			||||||
  INPUT PRS_CAUSD
 | 
					  INPUT PRS_CAUSD
 | 
				
			||||||
@ -396,7 +396,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
LISTBOX PRS_SEZIONE 6
 | 
					LISTBOX PRS_SEZIONE 6
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 23 "Sezione per cooperative "
 | 
					  PROMPT 56 23 "Sezione per cooperative"
 | 
				
			||||||
  FIELD S11
 | 
					  FIELD S11
 | 
				
			||||||
  ITEM "D|Dare"
 | 
					  ITEM "D|Dare"
 | 
				
			||||||
  ITEM "A|Avere"
 | 
					  ITEM "A|Avere"
 | 
				
			||||||
 | 
				
			|||||||
@ -443,7 +443,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING RSS_TIPOSTRA1 2
 | 
					STRING RSS_TIPOSTRA1 2
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 1 17 "Tipo ora straordinaria 1 "
 | 
					  PROMPT 1 20 "Tipo ora straordinaria 1 "
 | 
				
			||||||
  USE &CIORE 
 | 
					  USE &CIORE 
 | 
				
			||||||
  INPUT CODTAB RSS_TIPOSTRA1
 | 
					  INPUT CODTAB RSS_TIPOSTRA1
 | 
				
			||||||
  DISPLAY "Codice" CODTAB
 | 
					  DISPLAY "Codice" CODTAB
 | 
				
			||||||
@ -455,19 +455,19 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
NUMBER RSS_DOPOSTRA1 2
 | 
					NUMBER RSS_DOPOSTRA1 2
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 41 17 "dopo ore "
 | 
					  PROMPT 41 20 "dopo ore "
 | 
				
			||||||
  FIELD R5
 | 
					  FIELD R5
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
CURRENCY RSS_COSTOSTRA1 9
 | 
					CURRENCY RSS_COSTOSTRA1 9
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 59 17 "Costo "
 | 
					  PROMPT 59 20 "Costo "
 | 
				
			||||||
  FIELD R6
 | 
					  FIELD R6
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
STRING RSS_TIPOSTRA2 2
 | 
					STRING RSS_TIPOSTRA2 2
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 1 18 "Tipo ora straordinaria 2 "
 | 
					  PROMPT 1 21 "Tipo ora straordinaria 2 "
 | 
				
			||||||
  COPY USE RSS_TIPOSTRA1
 | 
					  COPY USE RSS_TIPOSTRA1
 | 
				
			||||||
  INPUT CODTAB RSS_TIPOSTRA2
 | 
					  INPUT CODTAB RSS_TIPOSTRA2
 | 
				
			||||||
  COPY DISPLAY RSS_TIPOSTRA1
 | 
					  COPY DISPLAY RSS_TIPOSTRA1
 | 
				
			||||||
@ -478,13 +478,13 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
NUMBER RSS_DOPOSTRA2 2
 | 
					NUMBER RSS_DOPOSTRA2 2
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 41 18 "dopo ore "
 | 
					  PROMPT 41 21 "dopo ore "
 | 
				
			||||||
  FIELD R7
 | 
					  FIELD R7
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
CURRENCY RSS_COSTOSTRA2 9
 | 
					CURRENCY RSS_COSTOSTRA2 9
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 59 18 "Costo "
 | 
					  PROMPT 59 21 "Costo "
 | 
				
			||||||
  FIELD R8
 | 
					  FIELD R8
 | 
				
			||||||
END
 | 
					END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
				
			|||||||
@ -269,14 +269,14 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
NUMBER SPP_GRUPPOA 3
 | 
					NUMBER SPP_GRUPPOA 3
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 12 "Conto acquisti "
 | 
					  PROMPT 2 15 "Conto acquisti "
 | 
				
			||||||
  FIELD I3
 | 
					  FIELD I3
 | 
				
			||||||
  CHECKTYPE NORMAL
 | 
					  CHECKTYPE NORMAL
 | 
				
			||||||
 END
 | 
					 END
 | 
				
			||||||
 | 
					
 | 
				
			||||||
NUMBER SPP_CONTOA 3
 | 
					NUMBER SPP_CONTOA 3
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 22 12 ""
 | 
					  PROMPT 22 15 ""
 | 
				
			||||||
  FIELD I4
 | 
					  FIELD I4
 | 
				
			||||||
  USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO=="")
 | 
					  USE LF_PCON SELECT (CONTO!="") && (SOTTOCONTO=="")
 | 
				
			||||||
  INPUT GRUPPO      SPP_GRUPPOA
 | 
					  INPUT GRUPPO      SPP_GRUPPOA
 | 
				
			||||||
@ -293,7 +293,7 @@ BEGIN
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
NUMBER SPP_SOTTOA 6
 | 
					NUMBER SPP_SOTTOA 6
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 29 12 ""
 | 
					  PROMPT 29 15 ""
 | 
				
			||||||
  FIELD I5
 | 
					  FIELD I5
 | 
				
			||||||
  USE LF_PCON SELECT SOTTOCONTO!=""
 | 
					  USE LF_PCON SELECT SOTTOCONTO!=""
 | 
				
			||||||
  JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
 | 
					  JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
 | 
				
			||||||
@ -315,7 +315,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING SPP_DESCRCONTOA 50 35
 | 
					STRING SPP_DESCRCONTOA 50 35
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 40 12 ""
 | 
					  PROMPT 40 15 ""
 | 
				
			||||||
  FLAG "U"
 | 
					  FLAG "U"
 | 
				
			||||||
  USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
 | 
					  USE LF_PCON KEY 2 SELECT SOTTOCONTO!=""
 | 
				
			||||||
  JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
 | 
					  JOIN LF_PCON ALIAS 500 INTO GRUPPO==GRUPPO CONTO==CONTO
 | 
				
			||||||
@ -332,7 +332,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
LIST SPP_TIPOSP 1 20
 | 
					LIST SPP_TIPOSP 1 20
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 14 "Tipologia di spesa/prestazione "
 | 
					  PROMPT 2 20 "Tipologia di spesa/prestazione "
 | 
				
			||||||
  FIELD S11[1,1]
 | 
					  FIELD S11[1,1]
 | 
				
			||||||
  ITEM " |Altro"
 | 
					  ITEM " |Altro"
 | 
				
			||||||
  ITEM "I|Incasso"
 | 
					  ITEM "I|Incasso"
 | 
				
			||||||
@ -342,7 +342,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING SPP_CODTRB 4
 | 
					STRING SPP_CODTRB 4
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 15  "Cod. tributo   "
 | 
					  PROMPT 2 21  "Cod. tributo   "
 | 
				
			||||||
  FIELD S10
 | 
					  FIELD S10
 | 
				
			||||||
  FLAG "U"
 | 
					  FLAG "U"
 | 
				
			||||||
  USE %TRB
 | 
					  USE %TRB
 | 
				
			||||||
@ -356,7 +356,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING SPP_CODTRB1 50 22
 | 
					STRING SPP_CODTRB1 50 22
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 25 15 ""
 | 
					  PROMPT 25 21 ""
 | 
				
			||||||
  USE %TRB KEY 2
 | 
					  USE %TRB KEY 2
 | 
				
			||||||
  INPUT S0  SPP_CODTRB1
 | 
					  INPUT S0  SPP_CODTRB1
 | 
				
			||||||
  DISPLAY "Descrizione@50" S0
 | 
					  DISPLAY "Descrizione@50" S0
 | 
				
			||||||
@ -368,7 +368,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
NUMBER SPP_CODCAUS770 2
 | 
					NUMBER SPP_CODCAUS770 2
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 16 "Caus. 770 "
 | 
					  PROMPT 2 22 "Caus. 770 "
 | 
				
			||||||
  USE %CA7 SELECT I0==#SPP_CODTRB
 | 
					  USE %CA7 SELECT I0==#SPP_CODTRB
 | 
				
			||||||
  INPUT CODTAB SPP_CODCAUS770
 | 
					  INPUT CODTAB SPP_CODCAUS770
 | 
				
			||||||
  DISPLAY "Cod.caus." CODTAB
 | 
					  DISPLAY "Cod.caus." CODTAB
 | 
				
			||||||
@ -385,7 +385,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
LISTBOX SPP_CODQUA 2 10
 | 
					LISTBOX SPP_CODQUA 2 10
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 20 16 "Quadro    "
 | 
					  PROMPT 20 22 "Quadro    "
 | 
				
			||||||
  HELP "Inserire il codice quadro"
 | 
					  HELP "Inserire il codice quadro"
 | 
				
			||||||
  ITEM "|" MESSAGE CLEAR,SPP_CAUSD
 | 
					  ITEM "|" MESSAGE CLEAR,SPP_CAUSD
 | 
				
			||||||
  ITEM "LA|Quadro LA" MESSAGE ENABLE,SPP_CAUSD
 | 
					  ITEM "LA|Quadro LA" MESSAGE ENABLE,SPP_CAUSD
 | 
				
			||||||
@ -397,7 +397,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING SPP_CAUSD 2
 | 
					STRING SPP_CAUSD 2
 | 
				
			||||||
BEGIN             
 | 
					BEGIN             
 | 
				
			||||||
  PROMPT 50 16 "Causale LA "
 | 
					  PROMPT 50 22 "Causale LA "
 | 
				
			||||||
  FLAGS "U"
 | 
					  FLAGS "U"
 | 
				
			||||||
  SHEET "Codice|Descrizione@320"
 | 
					  SHEET "Codice|Descrizione@320"
 | 
				
			||||||
  INPUT SPP_CAUSD
 | 
					  INPUT SPP_CAUSD
 | 
				
			||||||
@ -441,7 +441,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
LISTBOX SPP_SEZIONE 6
 | 
					LISTBOX SPP_SEZIONE 6
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
  PROMPT 2 17 "Sezione per cooperative "
 | 
					  PROMPT 2 23 "Sezione per cooperative "
 | 
				
			||||||
  FIELD S11[5,5]
 | 
					  FIELD S11[5,5]
 | 
				
			||||||
  ITEM "D|Dare"
 | 
					  ITEM "D|Dare"
 | 
				
			||||||
  ITEM "A|Avere" 
 | 
					  ITEM "A|Avere" 
 | 
				
			||||||
@ -449,7 +449,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
STRING SPP_TIPOCAS 4
 | 
					STRING SPP_TIPOCAS 4
 | 
				
			||||||
BEGIN             
 | 
					BEGIN             
 | 
				
			||||||
  PROMPT 2 18 "Tipo Cassa Previdenziale "
 | 
					  PROMPT 2 24 "Tipo Cassa Previdenziale "
 | 
				
			||||||
  FLAGS "U"
 | 
					  FLAGS "U"
 | 
				
			||||||
  SHEET "Codice|Descrizione@320"
 | 
					  SHEET "Codice|Descrizione@320"
 | 
				
			||||||
  INPUT SPP_TIPOCAS
 | 
					  INPUT SPP_TIPOCAS
 | 
				
			||||||
@ -484,7 +484,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
BOOLEAN SPP_SOGGRIT
 | 
					BOOLEAN SPP_SOGGRIT
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
	PROMPT 40 18 "Soggetto a ritenuta "
 | 
						PROMPT 40 24 "Soggetto a ritenuta"
 | 
				
			||||||
	FLAGS "D"
 | 
						FLAGS "D"
 | 
				
			||||||
	FIELD B0
 | 
						FIELD B0
 | 
				
			||||||
	GROUP 4
 | 
						GROUP 4
 | 
				
			||||||
@ -492,7 +492,7 @@ END
 | 
				
			|||||||
 | 
					
 | 
				
			||||||
BOOLEAN SPP_CALCRIT
 | 
					BOOLEAN SPP_CALCRIT
 | 
				
			||||||
BEGIN
 | 
					BEGIN
 | 
				
			||||||
	PROMPT 2 19 "Spesa rientrante nel calcolo ritenuta "
 | 
						PROMPT 60 24 "Soggetto al calcolo rit."
 | 
				
			||||||
	FLAGS "D"
 | 
						FLAGS "D"
 | 
				
			||||||
	FIELD B1
 | 
						FIELD B1
 | 
				
			||||||
	GROUP 4
 | 
						GROUP 4
 | 
				
			||||||
 | 
				
			|||||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user