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

lv/lvbolacr.src

@@ -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

lv/verig22.ini

@@ -0,0 +1,7 @@
+#Profilo di riga tipo merce lavanderie
+[MAIN]
+CALCOLI=*
+CAMPICALC=
+IMPONIBILE=IMPNS
+
+[HANDLERS]

lv/verig22.uml

@@ -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