Patch level : 10.0 patch 260
Files correlati : lvbolacr.msk, verig22.msk Ricompilazione Demo : [ ] Commento : Aggiunto il nuovo profilo per i buoni di ritiro e relativa maschera di riga git-svn-id: svn://10.65.10.50/trunk@18556 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
		
							parent
							
								
									e641ff0ac5
								
							
						
					
					
						commit
						c83021ac64
					
				
							
								
								
									
										279
									
								
								lv/lvbolacr.src
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										279
									
								
								lv/lvbolacr.src
									
									
									
									
									
										Executable file
									
								
							@ -0,0 +1,279 @@
 | 
			
		||||
#include "veini.h"
 | 
			
		||||
#include "veuml.h"
 | 
			
		||||
#include "verig.h"
 | 
			
		||||
// Esempio  di profilo documento : Profilo Buono di Ritiro
 | 
			
		||||
 | 
			
		||||
[MAIN]
 | 
			
		||||
// Descrizione a caratteri del documento
 | 
			
		||||
TYPE=Bolla Consegna Lavanderia
 | 
			
		||||
// Dove sono le risorse per il documento
 | 
			
		||||
// modifica
 | 
			
		||||
CAMPICALC=TOTMER|TOTPRE|SPESE|SPESIMB|SPESTRA|SPESINC|BOLLI|IMPONIBILI|IMPOSTE|TOTDOC|SCONTOD|SCONTOT|OMAGGI|TOTPROVV
 | 
			
		||||
CALCOLI=*
 | 
			
		||||
TOTPROVV=
 | 
			
		||||
// Indica se il documento è indirizzato ad un cliente o ad un fornitore
 | 
			
		||||
TIPOCF=C
 | 
			
		||||
// Modulo di riferimento
 | 
			
		||||
MODULE=lv
 | 
			
		||||
Title(1)=Corpo
 | 
			
		||||
Title(2)=Pagamenti
 | 
			
		||||
Title(3)=Spedizioni/Agenti
 | 
			
		||||
Title(4)=Dati Trasporto
 | 
			
		||||
Title(5)=Partenza/Magazzino
 | 
			
		||||
Title(6)=Totali
 | 
			
		||||
Title(7)=Totali
 | 
			
		||||
 | 
			
		||||
[PROFILO]
 | 
			
		||||
// Si possono indicare, dopo il numero, PROMPT, HELP, WARNING cosi:
 | 
			
		||||
// 1|Prompt|Help|Warning
 | 
			
		||||
 | 
			
		||||
// TIPOCF          = S_NORMALE
 | 
			
		||||
// CODCF           = S_OBBLIGATORIO
 | 
			
		||||
// RAGSOC          = S_NORMALE
 | 
			
		||||
// RICALT          = S_NORMALE
 | 
			
		||||
OCCASEDIT       = S_DISABILITATO                //100
 | 
			
		||||
OCFPI           = S_DISABILITATO                //100
 | 
			
		||||
COFI            = S_NON_VISIBILE                //100
 | 
			
		||||
STATOPAIV       = S_NON_VISIBILE                //100
 | 
			
		||||
PAIVA           = S_NON_VISIBILE                //100
 | 
			
		||||
GOLEM           = S_NON_VISIBILE                //100
 | 
			
		||||
GRRECAPITO      = S_NASCOSTO                    //100
 | 
			
		||||
INDCF           = S_NON_VISIBILE                //100
 | 
			
		||||
CIVCF           = S_NON_VISIBILE                //100
 | 
			
		||||
LOCALITACF      = S_NON_VISIBILE                //100
 | 
			
		||||
CAPCF           = S_NON_VISIBILE                //100
 | 
			
		||||
PROVCOM         = S_NON_VISIBILE                //100
 | 
			
		||||
COMCF           = S_NON_VISIBILE                //100
 | 
			
		||||
DENCOM          = S_NON_VISIBILE                //100
 | 
			
		||||
STATOCF         = S_NON_VISIBILE                //100
 | 
			
		||||
DESSTATOCF      = S_NON_VISIBILE                //100
 | 
			
		||||
CODVAL1         = S_NORMALE                     //200
 | 
			
		||||
CODVAL2         = S_NORMALE                     //200
 | 
			
		||||
NOME_VAL1       = S_NORMALE                     //200
 | 
			
		||||
NOME_VAL2       = S_NORMALE                     //200
 | 
			
		||||
CONTROEURO      = S_NORMALE                     //200
 | 
			
		||||
CAMBIO          = S_NORMALE                     //200
 | 
			
		||||
DATA_CAMBIO1    = S_NORMALE                     //200
 | 
			
		||||
DATA_CAMBIO2    = S_NORMALE                     //200
 | 
			
		||||
CODLIN          = S_NORMALE                     //300
 | 
			
		||||
DESLIN          = S_NORMALE                     //300
 | 
			
		||||
CODPAG          = S_OBBLIGATORIO                //400
 | 
			
		||||
DESCODPAG       = S_NORMALE                     //400
 | 
			
		||||
GRSCADENZE      = S_NORMALE                     //500
 | 
			
		||||
DATAINSC        = S_NORMALE                     //500
 | 
			
		||||
DATASCAD1       = S_DISABILITATO                //500
 | 
			
		||||
DATASCAD2       = S_DISABILITATO                //500
 | 
			
		||||
DATASCAD3       = S_DISABILITATO                //500
 | 
			
		||||
DATASCAD4       = S_DISABILITATO                //500
 | 
			
		||||
DATASCAD5       = S_DISABILITATO                //500
 | 
			
		||||
CODABIA         = S_OBBLIGATORIO                //600
 | 
			
		||||
CODCABA         = S_OBBLIGATORIO                //600
 | 
			
		||||
DESBANAPP       = S_NORMALE                     //600
 | 
			
		||||
IBAN            = S_NORMALE                     //600
 | 
			
		||||
IBAN_STATO      = S_NORMALE                     //600
 | 
			
		||||
IBAN_CHECK      = S_NORMALE                     //600
 | 
			
		||||
BBAN            = S_NORMALE                     //600
 | 
			
		||||
BBAN_CIN        = S_NORMALE                     //600
 | 
			
		||||
BBAN_ABI        = S_NORMALE                     //600
 | 
			
		||||
BBAN_CAB        = S_NORMALE                     //600
 | 
			
		||||
BBAN_CONTO      = S_NORMALE                     //600
 | 
			
		||||
CODABIP         = S_NORMALE                     //700
 | 
			
		||||
CODCABP         = S_NORMALE                     //700
 | 
			
		||||
DESBANPRE       = S_NORMALE                     //700
 | 
			
		||||
CATVEN          = S_NORMALE                     //800
 | 
			
		||||
DESCATVEN       = S_DISABILITATO                //800
 | 
			
		||||
CODLIST1        = S_NORMALE                     //800
 | 
			
		||||
CODLIST2        = S_NORMALE                     //800
 | 
			
		||||
DESLIST         = S_DISABILITATO                //800
 | 
			
		||||
CODCONT1        = S_NORMALE                     //810
 | 
			
		||||
CODCONT2        = S_NORMALE                     //810
 | 
			
		||||
DESCONT         = S_DISABILITATO                //810
 | 
			
		||||
CODCAMP         = S_NORMALE                     //820
 | 
			
		||||
DESCAMP         = S_DISABILITATO                //820
 | 
			
		||||
SCONTOPERC      = S_NORMALE                     //830
 | 
			
		||||
GRINDSPED       = S_NORMALE                     //900
 | 
			
		||||
CODINDSP        = S_NORMALE                     //900
 | 
			
		||||
RAGSOCSP        = S_DISABILITATO                //900
 | 
			
		||||
INDSP           = S_DISABILITATO                //900
 | 
			
		||||
CIVSP           = S_DISABILITATO                //900
 | 
			
		||||
LOCALITASP      = S_DISABILITATO                //900
 | 
			
		||||
CAPSP           = S_DISABILITATO                //900
 | 
			
		||||
COMSP           = S_DISABILITATO                //900
 | 
			
		||||
DENCOMSP        = S_DISABILITATO                //900
 | 
			
		||||
PROVCOMSP       = S_DISABILITATO                //900
 | 
			
		||||
STATOSP         = S_DISABILITATO                //900
 | 
			
		||||
DESSTATOSP      = S_DISABILITATO                //900
 | 
			
		||||
DATADOCRIF      = S_NORMALE                     //1000
 | 
			
		||||
NUMDOCRIF       = S_NOCHECK                     //1000
 | 
			
		||||
CODAGVIS        = S_NORMALE                     //1110
 | 
			
		||||
DESAGVIS        = S_NORMALE                     //1110
 | 
			
		||||
CODAG           = S_NORMALE                     //1100
 | 
			
		||||
DESAG           = S_NORMALE                     //1100
 | 
			
		||||
CODZON          = S_NORMALE                     //1100
 | 
			
		||||
DESZON          = S_NORMALE                     //1100
 | 
			
		||||
CODSPMEZZO      = S_OBBLIGATORIO                //1200
 | 
			
		||||
DESSPMEZZO      = S_NORMALE                     //1200
 | 
			
		||||
CODPORTO        = S_NORMALE                     //1210
 | 
			
		||||
DESPORTO        = S_NORMALE                     //1210
 | 
			
		||||
CODNOTESP1      = S_NORMALE                     //1300
 | 
			
		||||
DESNOTESP1      = S_NORMALE                     //1300
 | 
			
		||||
CODNOTESP2      = S_NORMALE                     //1300
 | 
			
		||||
DESNOTESP2      = S_NORMALE                     //1300
 | 
			
		||||
CAUSTRASP       = S_OBBLIGATORIO                //1400
 | 
			
		||||
DENCAUSTRASP    = S_NORMALE                     //1400
 | 
			
		||||
CODVETT1        = S_NORMALE                     //1500
 | 
			
		||||
CODVETT2        = S_NORMALE                     //1500
 | 
			
		||||
CODVETT3        = S_NORMALE                     //1500
 | 
			
		||||
NOMEVETT1       = S_NORMALE                     //1500
 | 
			
		||||
NOMEVETT2       = S_NORMALE                     //1500
 | 
			
		||||
NOMEVETT3       = S_NORMALE                     //1500
 | 
			
		||||
NCOPIE          = S_NASCOSTO                    //1600
 | 
			
		||||
GRPARTENZA      = S_NORMALE                     //1700
 | 
			
		||||
DATAPART        = S_NORMALE                     //1700
 | 
			
		||||
ORAPART         = S_NORMALE                     //1700
 | 
			
		||||
IMPPAGATO       = S_NORMALE                     //1800
 | 
			
		||||
ACCSALDO        = S_NASCOSTO                    //1800
 | 
			
		||||
DOC1            = S_NASCOSTO                    //1900
 | 
			
		||||
DOC2            = S_NASCOSTO                    //1900
 | 
			
		||||
DOC3            = S_NASCOSTO                    //1900
 | 
			
		||||
DATACONS        = S_NASCOSTO                    //2000
 | 
			
		||||
ASPBENI1        = S_OBBLIGATORIO                //2100
 | 
			
		||||
DESCRBENI1      = S_NORMALE                     //2100
 | 
			
		||||
ASPBENI2        = S_NASCOSTO                    //2100
 | 
			
		||||
DESCRBENI2      = S_NASCOSTO                    //2100
 | 
			
		||||
IMPNETTI        = S_NASCOSTO                    //2200
 | 
			
		||||
RAGGR           = S_NORMALE                     //2300
 | 
			
		||||
RAGGREFF        = S_NORMALE                     //2300
 | 
			
		||||
SPESEINC        = S_NORMALE                     //2400
 | 
			
		||||
ADDBOLLI        = S_NORMALE                     //2400
 | 
			
		||||
UMTARA          = S_NORMALE                     //2710
 | 
			
		||||
TARA            = S_NORMALE                     //2710
 | 
			
		||||
DESUMTARA       = S_NASCOSTO                    //2710
 | 
			
		||||
UMPNETTO        = S_NORMALE                     //2700
 | 
			
		||||
PNETTO          = S_NORMALE                     //2700
 | 
			
		||||
DESUMPNETTO     = S_NASCOSTO                    //2700
 | 
			
		||||
NCOLLI          = S_NORMALE                     //2800
 | 
			
		||||
CAUSMAG         = S_OBBLIGATORIO                //2900
 | 
			
		||||
CAUSMAGC        = S_DISABILITATO                //2900
 | 
			
		||||
DESCRMAG        = S_NORMALE                     //2900
 | 
			
		||||
DESCRMAGC       = S_DISABILITATO                //2900
 | 
			
		||||
CODCMS          = S_NORMALE                     //3000
 | 
			
		||||
DESCRCMS        = S_NORMALE                     //3000
 | 
			
		||||
FASCMS          = S_NORMALE                     //3000
 | 
			
		||||
DESCRFAS        = S_NORMALE                     //3000
 | 
			
		||||
CODNOTE         = S_NORMALE                     //2500
 | 
			
		||||
NOTECLI         = S_NOCHECK                     //2500
 | 
			
		||||
LVGROUP         = S_NORMALE                     //4041
 | 
			
		||||
LVCODNUM        = S_NORMALE                     //4041
 | 
			
		||||
LVDESNUM        = S_NORMALE                     //4041
 | 
			
		||||
LVSTATO         = S_NORMALE                     //4041
 | 
			
		||||
LVPROVV         = S_NORMALE                     //4041
 | 
			
		||||
LVTIPODOC       = S_NORMALE                     //4041
 | 
			
		||||
LVDESTIPODOC    = S_NORMALE                     //4041
 | 
			
		||||
LVNDOC          = S_NORMALE                     //4041
 | 
			
		||||
LVANNO          = S_NORMALE                     //4041
 | 
			
		||||
LVDATADOC       = S_NORMALE                     //4041
 | 
			
		||||
LVGIORNO        = S_NORMALE                     //4041
 | 
			
		||||
LVSETTIMANA     = S_NORMALE                     //4041
 | 
			
		||||
LVTIPOCF        = S_NORMALE                     //4041
 | 
			
		||||
LVCODCF         = S_NORMALE                     //4041
 | 
			
		||||
LVRICALT        = S_NORMALE                     //4041
 | 
			
		||||
LVCODCONT       = S_NORMALE                     //4041
 | 
			
		||||
LVRAGSOC        = S_NORMALE                     //4041
 | 
			
		||||
LVCODCAU        = S_NORMALE                     //4041
 | 
			
		||||
LVDESCAU        = S_NORMALE                     //4041
 | 
			
		||||
BLANK           = S_DISABILITATO                //4000
 | 
			
		||||
 | 
			
		||||
[DEFAULT]
 | 
			
		||||
Default(0)=F_CAUSTRASP|VEN
 | 
			
		||||
 | 
			
		||||
[SHEET]
 | 
			
		||||
Col(0)=FR_CODART|Codice|8
 | 
			
		||||
Col(1)=FR_LIV1
 | 
			
		||||
Col(2)=FR_LIV2
 | 
			
		||||
Col(3)=FR_LIV3
 | 
			
		||||
Col(4)=FR_LIV4
 | 
			
		||||
Col(5)=FR_DESCR||28
 | 
			
		||||
Col(6)=FR_CAULAV|Caus.|5
 | 
			
		||||
Col(7)=FR_RITIRO|Ritiro|6
 | 
			
		||||
Col(8)=FR_QTA|Rotti|6
 | 
			
		||||
Col(9)=FR_TIPORIGA|Tipo|4
 | 
			
		||||
 | 
			
		||||
[RIGHE]
 | 
			
		||||
Tipo(0)=22
 | 
			
		||||
Tipo(1)=05
 | 
			
		||||
 | 
			
		||||
[HANDLERS]
 | 
			
		||||
Handler(0) = 106|4101
 | 
			
		||||
Handler(1) = 108|4102
 | 
			
		||||
 | 
			
		||||
[PROFILOGRUPPO]
 | 
			
		||||
101     = S_NASCOSTO
 | 
			
		||||
100     = S_NASCOSTO
 | 
			
		||||
200     = S_NORMALE
 | 
			
		||||
300     = S_NORMALE
 | 
			
		||||
400     = S_NORMALE
 | 
			
		||||
500     = S_NASCOSTO
 | 
			
		||||
600     = S_NORMALE
 | 
			
		||||
700     = S_NASCOSTO
 | 
			
		||||
800     = S_NORMALE
 | 
			
		||||
810     = S_NORMALE
 | 
			
		||||
820     = S_NORMALE
 | 
			
		||||
830     = S_NASCOSTO
 | 
			
		||||
900     = S_NORMALE
 | 
			
		||||
1000    = S_NORMALE
 | 
			
		||||
1100    = S_NORMALE
 | 
			
		||||
1200    = S_NORMALE
 | 
			
		||||
1210    = S_NORMALE
 | 
			
		||||
1300    = S_NORMALE
 | 
			
		||||
1400    = S_NORMALE
 | 
			
		||||
1500    = S_NORMALE
 | 
			
		||||
1600    = S_NASCOSTO
 | 
			
		||||
1700    = S_NORMALE
 | 
			
		||||
1800    = S_NORMALE
 | 
			
		||||
1900    = S_NORMALE
 | 
			
		||||
2000    = S_NASCOSTO
 | 
			
		||||
2100    = S_NORMALE
 | 
			
		||||
2200    = S_NASCOSTO
 | 
			
		||||
2300    = S_NORMALE
 | 
			
		||||
2400    = S_NORMALE
 | 
			
		||||
2500    = S_NORMALE
 | 
			
		||||
2700    = S_NORMALE
 | 
			
		||||
2710    = S_NORMALE
 | 
			
		||||
2800    = S_NORMALE
 | 
			
		||||
2900    = S_NORMALE
 | 
			
		||||
3000    = S_NORMALE
 | 
			
		||||
4000    = S_NORMALE
 | 
			
		||||
4041    = S_NORMALE
 | 
			
		||||
 | 
			
		||||
[ORDINEGRUPPI]
 | 
			
		||||
NGROUPS=23
 | 
			
		||||
1=4041
 | 
			
		||||
2=SHEET
 | 
			
		||||
3=830
 | 
			
		||||
4=2500
 | 
			
		||||
5=200
 | 
			
		||||
6=300
 | 
			
		||||
7=400
 | 
			
		||||
8=600
 | 
			
		||||
9=800
 | 
			
		||||
10=900
 | 
			
		||||
11=1100
 | 
			
		||||
12=1200
 | 
			
		||||
13=1500
 | 
			
		||||
14=1210
 | 
			
		||||
15=1300
 | 
			
		||||
16=1400
 | 
			
		||||
17=2100
 | 
			
		||||
18=2800
 | 
			
		||||
19=2700
 | 
			
		||||
20=2710
 | 
			
		||||
21=1700
 | 
			
		||||
22=2900
 | 
			
		||||
23=100
 | 
			
		||||
 | 
			
		||||
[Colors]
 | 
			
		||||
RuleName(1) = Riga vuota
 | 
			
		||||
Rule(1) = STR(TIPORIGA!="05")&&(QTA==0)&&(QTAGG1==0)|N
 | 
			
		||||
BgCol(1) = 255,255,128
 | 
			
		||||
FgCol(1) = 0,0,0
 | 
			
		||||
							
								
								
									
										7
									
								
								lv/verig22.ini
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										7
									
								
								lv/verig22.ini
									
									
									
									
									
										Executable file
									
								
							@ -0,0 +1,7 @@
 | 
			
		||||
#Profilo di riga tipo merce lavanderie
 | 
			
		||||
[MAIN]
 | 
			
		||||
CALCOLI=*
 | 
			
		||||
CAMPICALC=
 | 
			
		||||
IMPONIBILE=IMPNS
 | 
			
		||||
 | 
			
		||||
[HANDLERS]
 | 
			
		||||
							
								
								
									
										240
									
								
								lv/verig22.uml
									
									
									
									
									
										Executable file
									
								
							
							
						
						
									
										240
									
								
								lv/verig22.uml
									
									
									
									
									
										Executable file
									
								
							@ -0,0 +1,240 @@
 | 
			
		||||
#include "..\ve\verig.h"
 | 
			
		||||
 | 
			
		||||
TOOLBAR "" 0 0 0 2
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_OK 10 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -14 -1 ""
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_CANCEL 10 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -24 -1 ""
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_DELREC 10 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -34 -1 "Elimina"
 | 
			
		||||
  MESSAGE EXIT,K_DEL
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BUTTON DLG_USER 10 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT -44 -1 "~Collega"
 | 
			
		||||
  PICTURE BMP_LINK
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
ENDPAGE
 | 
			
		||||
 | 
			
		||||
PAGE "Merce Lavanderia" 0 2 0 0 
 | 
			
		||||
 | 
			
		||||
GROUPBOX DLG_NULL 78 3
 | 
			
		||||
BEGIN
 | 
			
		||||
	PROMPT 1 1 ""
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
LIST FR_TIPORIGA 2 50
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 2 2 "Tipo riga "
 | 
			
		||||
  FIELD TIPORIGA
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
GROUPBOX DLG_NULL 78 5
 | 
			
		||||
BEGIN
 | 
			
		||||
	PROMPT 1 4 "@bArticolo"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_CODART 8
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 2 5 "Articolo "
 | 
			
		||||
  USE LF_ANAMAG KEY 1
 | 
			
		||||
  INPUT CODART FR_CODART
 | 
			
		||||
  DISPLAY "Codice@6" CODART
 | 
			
		||||
  DISPLAY "Descrizione@50" DESCR
 | 
			
		||||
  OUTPUT FR_CODART CODART
 | 
			
		||||
  OUTPUT FR_DESCRART DESCR
 | 
			
		||||
  FLAGS "U"
 | 
			
		||||
  FIELD CODART
 | 
			
		||||
  ADD RUN ve2 -3
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_DESCRART 50
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 25 5 ""
 | 
			
		||||
  USE LF_ANAMAG KEY 2
 | 
			
		||||
  INPUT DESCR FR_DESCRART
 | 
			
		||||
  DISPLAY "Descrizione@50" DESCR
 | 
			
		||||
  DISPLAY "Codice@8" CODART
 | 
			
		||||
  COPY OUTPUT FR_CODART
 | 
			
		||||
  ADD RUN ve2 -3
 | 
			
		||||
  FIELD DESCR
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_HDESC 50
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 100 100 "Descrizione "
 | 
			
		||||
  USE LF_ANAMAG KEY 2
 | 
			
		||||
  INPUT DESCR FR_HDESC
 | 
			
		||||
  DISPLAY "Descrizione@50" DESCR
 | 
			
		||||
  DISPLAY "Codice@20" CODART
 | 
			
		||||
	COPY OUTPUT FR_CODART
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_CODARTMAG 20
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 200 7 ""
 | 
			
		||||
  FIELD CODARTMAG
 | 
			
		||||
  FLAGS "G"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BOOLEAN FR_CHECKED
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 51 50 ""
 | 
			
		||||
  FIELD CHECKED
 | 
			
		||||
  FLAGS "D"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_LIV1 15
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 2 6 "Liv.Gia. "
 | 
			
		||||
  FLAGS "U"
 | 
			
		||||
  USE GCG
 | 
			
		||||
  JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
 | 
			
		||||
  INPUT CODTAB[1,1] "1"
 | 
			
		||||
  INPUT CODTAB[2,] FR_LIV1
 | 
			
		||||
  DISPLAY "Livello@20" 500@->S0
 | 
			
		||||
  DISPLAY "Gruppo@15" CODTAB[2,]
 | 
			
		||||
  DISPLAY "Descrizione@30" S0
 | 
			
		||||
  OUTPUT FR_LIV1 CODTAB[2,]
 | 
			
		||||
  MESSAGE EMPTY RESET,FR_LIV2|RESET,FR_LIV3|RESET,FR_LIV4
 | 
			
		||||
  MESSAGE ENABLE,FR_LIV2
 | 
			
		||||
  CHECKTYPE NORMAL
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_LIV2 15
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 28 6 ""
 | 
			
		||||
  FLAGS "U"
 | 
			
		||||
  USE GCG
 | 
			
		||||
  JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
 | 
			
		||||
  INPUT CODTAB[1,1] "2"
 | 
			
		||||
  INPUT CODTAB[2,] FR_LIV2
 | 
			
		||||
  DISPLAY "Livello@20" 500@->S0
 | 
			
		||||
  DISPLAY "Gruppo@15" CODTAB[2,]
 | 
			
		||||
  DISPLAY "Descrizione@30" S0
 | 
			
		||||
  OUTPUT FR_LIV2 CODTAB[2,]
 | 
			
		||||
  MESSAGE EMPTY RESET,FR_LIV3|RESET,FR_LIV4
 | 
			
		||||
  MESSAGE ENABLE,FR_LIV3
 | 
			
		||||
  CHECKTYPE NORMAL
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_LIV3 15
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 45 6 ""
 | 
			
		||||
  FLAGS "U"
 | 
			
		||||
  USE GCG
 | 
			
		||||
  JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
 | 
			
		||||
  INPUT CODTAB[1,1] "3"
 | 
			
		||||
  INPUT CODTAB[2,] FR_LIV3
 | 
			
		||||
  DISPLAY "Livello@20" 500@->S0
 | 
			
		||||
  DISPLAY "Gruppo@15" CODTAB[2,]
 | 
			
		||||
  DISPLAY "Descrizione@30" S0
 | 
			
		||||
  OUTPUT FR_LIV3 CODTAB[2,]
 | 
			
		||||
  MESSAGE EMPTY RESET,FR_LIV4
 | 
			
		||||
  MESSAGE ENABLE,FR_LIV4
 | 
			
		||||
  CHECKTYPE NORMAL
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_LIV4 15
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 62 6 ""
 | 
			
		||||
  FLAGS "U"
 | 
			
		||||
  USE GCG
 | 
			
		||||
  JOIN FCG ALIAS 500 INTO CODTAB==CODTAB[1,1]
 | 
			
		||||
  INPUT CODTAB[1,1] "4"
 | 
			
		||||
  INPUT CODTAB[2,] FR_LIV4
 | 
			
		||||
  DISPLAY "Livello@20" 500@->S0
 | 
			
		||||
  DISPLAY "Gruppo@15" CODTAB[2,]
 | 
			
		||||
  DISPLAY "Descrizione@30" S0
 | 
			
		||||
  OUTPUT FR_LIV4 CODTAB[2,]
 | 
			
		||||
  CHECKTYPE NORMAL
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_UMQTA 3
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 62 7 "U.M. "
 | 
			
		||||
  USE LF_UMART KEY 2
 | 
			
		||||
  JOIN %UMS INTO CODTAB=UM
 | 
			
		||||
  INPUT CODART FR_CODARTMAG SE
 | 
			
		||||
  INPUT UM FR_UMQTA
 | 
			
		||||
  DISPLAY "Codice@20" UM
 | 
			
		||||
  DISPLAY "Descrizione@50" %UMS->S0
 | 
			
		||||
  OUTPUT  FR_UMQTA UM
 | 
			
		||||
  FIELD UMQTA
 | 
			
		||||
  FLAG "U"
 | 
			
		||||
  CHECKTYPE REQUIRED
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_UMQTA2 2
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 62 7 "U.M. "
 | 
			
		||||
  USE %UMS
 | 
			
		||||
  INPUT CODTAB FR_UMQTA2
 | 
			
		||||
  DISPLAY "Codice" CODTAB
 | 
			
		||||
  DISPLAY "Descrizione@50" S0
 | 
			
		||||
  OUTPUT  FR_UMQTA2 CODTAB
 | 
			
		||||
  FIELD UMQTA
 | 
			
		||||
  FLAG "U"
 | 
			
		||||
  CHECKTYPE NORMAL
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
STRING FR_CAULAV 3
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 2 7 "Cau.Lav. "
 | 
			
		||||
  USE &LVCAU
 | 
			
		||||
  INPUT CODTAB FR_CAULAV 
 | 
			
		||||
  DISPLAY "Codice" CODTAB
 | 
			
		||||
  DISPLAY "Descrizione@50" S0
 | 
			
		||||
  OUTPUT FR_CAULAV CODTAB
 | 
			
		||||
  OUTPUT FR_FLCONS B1
 | 
			
		||||
  OUTPUT FR_FLRIT B0
 | 
			
		||||
  CHECKTYPE REQUIRED
 | 
			
		||||
  FLAGS "U"
 | 
			
		||||
  FIELD CODAGG1
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BOOLEAN FR_FLCONS
 | 
			
		||||
BEGIN
 | 
			
		||||
	PROMPT 50 50 "Flag consegnato"
 | 
			
		||||
	FLAGS "HG"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
BOOLEAN FR_FLRIT
 | 
			
		||||
BEGIN
 | 
			
		||||
	PROMPT 50 50 "Flag ritirato"
 | 
			
		||||
	FLAGS "HG"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER FR_RITIRO 6 0
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 28 7 "Ritirato "
 | 
			
		||||
  FIELD QTAGG1
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
NUMBER FR_QTA 6 0
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 45 7 "Rotti    "
 | 
			
		||||
  FIELD QTA
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
ENDPAGE
 | 
			
		||||
 | 
			
		||||
PAGE "Analitica" 0 2 0 0
 | 
			
		||||
 | 
			
		||||
GROUPBOX DLG_NULL 78 14
 | 
			
		||||
BEGIN
 | 
			
		||||
  PROMPT 1 0 "Contabilita' analitica"
 | 
			
		||||
END
 | 
			
		||||
 | 
			
		||||
ENDPAGE
 | 
			
		||||
ENDMASK
 | 
			
		||||
		Loading…
	
	
			
			x
			
			
		
	
		Reference in New Issue
	
	Block a user