diff --git a/ps/lvbolaca_FABRIS.src b/ps/lvbolaca_FABRIS.src new file mode 100755 index 000000000..ddf4b835f --- /dev/null +++ b/ps/lvbolaca_FABRIS.src @@ -0,0 +1,305 @@ +#include "veini.h" +#include "veuml.h" +#include "verig.h" +// Esempio di profilo documento : Profilo Bolla Vendita + +[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 +LVDATAPRCO = S_NORMALE //4041 +LVDATACON = S_NORMALE //4041 +LVCODCAU = S_NORMALE //4041 +LVDESCAU = S_NORMALE //4041 +LVCODITI = 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|Cons.|6 +Col(9)=FR_PREZZO||6 +Col(10)=FR_JOLLY1@R|Dotaz.|7 +Col(11)=FR_JOLLY2@R|D.Temp.|7 +Col(12)=FR_JOLLY3|Inizio|10 +Col(13)=FR_JOLLY4|Fine|10 +Col(14)=FR_UMQTA +Col(15)=FR_SCONTO +Col(16)=FR_PERCPROV +Col(17)=FR_PERCPROV1 +Col(18)=FR_CODIVA +Col(19)=FR_NCOLLI +Col(20)=FR_PNETTO +Col(21)=FR_TARA +Col(22)=FR_CAUS +Col(23)=FR_CODMAGC +Col(24)=FR_CODDEPC +Col(25)=FR_CODMAG +Col(26)=FR_CODDEP +Col(27)=FR_TIPORIGA|Tipo|4 + +[RIGHE] +Tipo(0)=21 +Tipo(1)=05 + +[HANDLERS] +Handler(0) = 106|4101 +Handler(1) = 108|4102 +Handler(3) = 805|4105 + +[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_NORMALE +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=830 +3=SHEET +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) = (TIPORIGA!="05")&&(QTA==0)&&(QTAGG1==0) +BgCol(1) = 255,255,128 +FgCol(1) = 0,0,0 +RuleName(2) = Dotazione scaduta +Rule(2) = (ADATATMP!="")&&(ANSI(33.DATADOC)>ANSI(ADATATMP)) +BgCol(2) = 255,0,0 +FgCol(2) = 0,0,0 \ No newline at end of file diff --git a/ps/lvbolacp_FABRIS.src b/ps/lvbolacp_FABRIS.src new file mode 100755 index 000000000..68b5489a2 --- /dev/null +++ b/ps/lvbolacp_FABRIS.src @@ -0,0 +1,308 @@ +#include "veini.h" +#include "veuml.h" +#include "verig.h" +// Esempio di profilo documento : Profilo Bolla Vendita + +[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 +LVDATAPRCO = S_NORMALE //4041 +LVDATACON = S_NORMALE //4041 +LVCODCAU = S_NORMALE //4041 +LVDESCAU = S_NORMALE //4041 +LVCODITI = 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|Da cons|8 +Col(9)=FR_QTAEVASA|Cons.|6 +Col(10)=FR_NCOLLI|Pacchi|6 +Col(11)=FR_PREZZO||6 +Col(12)=FR_JOLLY1|Dotaz.|7 +Col(13)=FR_JOLLY2|D.Temp.|7 +Col(14)=FR_JOLLY3|Inizio|10 +Col(15)=FR_JOLLY4|Fine|10 +Col(16)=FR_UMQTA +Col(17)=FR_SCONTO +Col(18)=FR_PERCPROV +Col(19)=FR_PERCPROV1 +Col(20)=FR_CODIVA +Col(21)=FR_PNETTO +Col(22)=FR_TARA +Col(23)=FR_CAUS +Col(24)=FR_CODMAGC +Col(25)=FR_CODDEPC +Col(26)=FR_CODMAG +Col(27)=FR_CODDEP +Col(28)=FR_TIPORIGA|Tipo|4 +Col(29)=FR_JOLLY5|Rif. buoni cons.|20 + +[RIGHE] +Tipo(0)=24 + +[HANDLERS] +Handler(0) = 106|4101 +Handler(1) = 554|4102 +Handler(2) = 108|4103 +Handler(3) = 125|4103 +Handler(4) = 805|4105 + +[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_NORMALE +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=830 +3=SHEET +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) = (TIPORIGA!="05")&&(QTA==0)&&(QTAGG1==0) +BgCol(1) = 255,255,128 +FgCol(1) = 0,0,0 +RuleName(2) = Dotazione scaduta +Rule(2) = (ADATATMP!="")&&(ANSI(33.DATADOC)>ANSI(ADATATMP)) +BgCol(2) = 255,0,0 +FgCol(2) = 0,0,0 diff --git a/ps/lvbolacr_FABRIS.src b/ps/lvbolacr_FABRIS.src new file mode 100755 index 000000000..89ada1c5e --- /dev/null +++ b/ps/lvbolacr_FABRIS.src @@ -0,0 +1,285 @@ +#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 +LVDATAPRCO = S_NORMALE //4041 +LVDATACON = S_NORMALE //4041 +LVCODCAU = S_NORMALE //4041 +LVDESCAU = S_NORMALE //4041 +LVCODITI = 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) = 554|4102 +Handler(2) = 108|4103 +Handler(3) = 125|4103 +Handler(4) = 805|4105 + +[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) = (TIPORIGA!="05")&&(QTA==0)&&(QTAGG1==0) +BgCol(1) = 255,255,128 +FgCol(1) = 0,0,0 \ No newline at end of file diff --git a/ps/lvbolla_DIANA.rep b/ps/lvbolla_DIANA.rep new file mode 100755 index 000000000..905eea41c --- /dev/null +++ b/ps/lvbolla_DIANA.rep @@ -0,0 +1,615 @@ + + + bolla lavanderia + +
+ + + + + 16.RAGSOC + + + + 16.INDIR + + + + 16.CAP + + + + 16.LOCALITA + + + + 214@.S0 + + + 33.ZONA + + + 122.RAGSOC + + + 300@.RAGSOC + + + 214@.S0 + + + + MESSAGE _PAGENO + + + + 33.DATADOC + + + + 33.DATADOC + + + + 33.NDOC + + + + 33.NDOC + + + + MESSAGE _CLIENTE,COFI + + + + 33.CODCF + + + 33.CODCF + + + MESSAGE _CLIENTE,PAIV + + + + MESSAGE _CLIENTE,!RAGSOC + + + + MESSAGE _CLIENTE,!RAGSOC + + + + MESSAGE _CLIENTE,!INDNUM + + + + MESSAGE _CLIENTE,!INDNUM + + + + + MESSAGE _CLIENTE,!CAP + + + + MESSAGE _CLIENTE,!CAP + + + + + + MESSAGE COPY,99 + + + + + 210@.S0 + + + MESSAGE _CLIENTE,STATOPAIV + + + 20.TEL + + + + + + + 11 + + + + 11 + 16.LOCALITA + + + + 16.CAP + + + + + + + + + + + 11 + 16.RAGSOC + + + + + + + MESSAGE _PAGENO + +
+
+
+ + "TestaBolla1.bmp" + + + "Testabolla1.bmp" + + + "testa2.bmp" + + + + + + "testa2.bmp" + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + IF(168.STPRZBOL=='X';'Prezzo';'') + + + + + + + IF(168.STPRZBOL=='X';'Imponibile';'') + + + + IF(168.STPRZBOL=='X';'Imposta';'') + + + + IF(168.STPRZBOL=='X';'Totale';'') + + + + + + + +
+
+ !((34.TIPORIGA='08')) + + + + 34.CODAGG1 + MESSAGE _TABLEREAD,LVCAU,#THIS,S3 + + + + 34.QTAGG1 + + + + + 34.CODART + + + + 34.CODART + + + + MESSAGE _DESCRIGA +MESSAGE COPY,800 + + + + + 30 + 34.QTA + MESSAGE _ALIGN,#52,TOP + + + + MESSAGE _ISAMREAD,166,ANNOES=33.ANNO!TIPOCF='C'!CODCF=33.CODCF!INDSPED=33.INDSPED!CODART=#51!NRIGA=1,DOTOD + + + + + + + + +
+
+ + + + +
+
+ + + 33.DATADOC + + + + 33.NDOC + + + 207@.S0 + + + CODSPMEZZO + +
  • +
  • +
  • +
  • + + + + + + + + + + + + + + ORAPART + + + DATAPART + + + 206@.S0 + + + + IF(33.NCOLLI=0,TOTCOLLI,33.NCOLLI) + + + + 33.NOTE + + +
    • + USE 33 +JOIN 34 INTO CODNUM==CODNUM ANNO==ANNO PROVV==PROVV NDOC==NDOC +JOIN 168 INTO CODCF==CODCF CODCONT==CODCONT +JOIN 17 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF +JOIN 20 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF +JOIN 16 TO 33 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP +JOIN 16 TO 17 ALIAS 116 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDSP +JOIN 13 TO 16 INTO STATO=STATO COM=COM +JOIN 47 TO 34 INTO CODART==CODART +JOIN 122 TO 33 INTO CODAGE==CODAG +JOIN 122 TO 33 ALIAS 300 INTO CODAGE==CODAGVIS +JOIN %POR TO 33 ALIAS 203 INTO CODTAB==CODPORTO +JOIN %VET TO 33 ALIAS 205 INTO CODTAB==CODVETT1 +JOIN %ABE TO 33 ALIAS 206 INTO CODTAB==ASPBENI1 +JOIN %CTR TO 33 ALIAS 207 INTO CODTAB==CAUSTRASP +JOIN %BAN TO 33 ALIAS 208 INTO CODTAB==CODABIA +JOIN %VAL TO 33 ALIAS 209 INTO CODTAB==CODVAL +JOIN %TIP TO 33 ALIAS 210 INTO CODTAB==TIPODOC +JOIN %MSP TO 33 ALIAS 211 INTO CODTAB==CODSPMEZZO +JOIN %ZON TO 33 ALIAS 214 INTO CODTAB==ZONA +JOIN GCA TO 34 ALIAS 212 INTO CODTAB==3+CODART[7,12] +JOIN GCA TO 34 ALIAS 213 INTO CODTAB==5+CODART[17,18] +JOIN LVITI TO 33 ALIAS 214 INTO CODTAB==33.G1:CODITI +JOIN LVAUT TO LVITI ALIAS 215 INTO CODTAB==S1 + + + \ No newline at end of file diff --git a/ps/lvbollac_FABRIS.src b/ps/lvbollac_FABRIS.src new file mode 100755 index 000000000..b7720303b --- /dev/null +++ b/ps/lvbollac_FABRIS.src @@ -0,0 +1,307 @@ +#include "veini.h" +#include "veuml.h" +#include "verig.h" +// Esempio di profilo documento : Profilo Bolla Vendita + +[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 +LVDATAPRCO = S_NORMALE //4041 +LVDATACON = S_NORMALE //4041 +LVCODCAU = S_NORMALE //4041 +LVDESCAU = S_NORMALE //4041 +LVCODITI = 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|Cons.|6 +Col(9)=FR_PREZZO||6 +Col(10)=FR_JOLLY1@R|Dotaz.|7 +Col(11)=FR_JOLLY2@R|D.Temp.|7 +Col(12)=FR_JOLLY3|Inizio|10 +Col(13)=FR_JOLLY4|Fine|10 +Col(14)=FR_UMQTA +Col(15)=FR_SCONTO +Col(16)=FR_PERCPROV +Col(17)=FR_PERCPROV1 +Col(18)=FR_CODIVA +Col(19)=FR_NCOLLI +Col(20)=FR_PNETTO +Col(21)=FR_TARA +Col(22)=FR_CAUS +Col(23)=FR_CODMAGC +Col(24)=FR_CODDEPC +Col(25)=FR_CODMAG +Col(26)=FR_CODDEP +Col(27)=FR_TIPORIGA|Tipo|4 + +[RIGHE] +Tipo(0)=21 +Tipo(1)=05 + +[HANDLERS] +Handler(0) = 106|4101 +Handler(1) = 554|4102 +Handler(2) = 108|4103 +Handler(3) = 125|4103 +Handler(4) = 805|4105 + +[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_NORMALE +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=830 +3=SHEET +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) = (TIPORIGA!="05")&&(QTA==0)&&(QTAGG1==0) +BgCol(1) = 255,255,128 +FgCol(1) = 0,0,0 +RuleName(2) = Dotazione scaduta +Rule(2) = (ADATATMP!="")&&(ANSI(33.DATADOC)>ANSI(ADATATMP)) +BgCol(2) = 255,0,0 +FgCol(2) = 0,0,0 diff --git a/ps/verig21_FABRIS.ini b/ps/verig21_FABRIS.ini new file mode 100755 index 000000000..0af1f2beb --- /dev/null +++ b/ps/verig21_FABRIS.ini @@ -0,0 +1,13 @@ +#Profilo di riga tipo merce lavanderie +[MAIN] +CALCOLI=* +CAMPICALC= +IMPONIBILE=IMPNS + +[HANDLERS] +NHANDLER = 5 +1 = 133|4101 +2 = 112|4102 +3 = 105|4103 +4 = 152|4104 +5 = 103|4105 \ No newline at end of file diff --git a/ps/verig21_FABRIS.uml b/ps/verig21_FABRIS.uml new file mode 100755 index 000000000..c31ea3fa3 --- /dev/null +++ b/ps/verig21_FABRIS.uml @@ -0,0 +1,445 @@ +#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 10 +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" + ADD RUN ve2 -3 + CHECKTYPE NORMAL +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 + //CHECKTYPE NORMAL +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 2 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 2 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 + +CURRENCY FR_PREZZO 15 +BEGIN + PROMPT 13 7 "Prezzo " + FLAGS "U" + FIELD PREZZO +END + +STRING FR_SCONTO 15 +BEGIN + PROMPT 36 7 "Sconto " + FIELD SCONTO +END + +NUMBER FR_PERCPROV 5 2 +BEGIN + PROMPT 59 7 "Provv. " + FIELD PERCPROV +END + +NUMBER FR_PERCPROV1 5 2 +BEGIN + PROMPT 72 7 "" + FIELD PERCPROV1 +END + +STRING FR_CAULAV 3 +BEGIN + PROMPT 2 8 "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 1 +BEGIN + PROMPT 20 8 "Ritirato " + FIELD QTAGG1 +END + +NUMBER FR_QTA 6 1 +BEGIN + PROMPT 39 8 "Consegnato " + FIELD QTA +END + +NUMBER FR_JOLLY1 6 1 +BEGIN + PROMPT 2 9 "Dot. Od. " + FIELD DOTOD + FLAGS "D" +END + +NUMBER FR_JOLLY2 6 1 +BEGIN + PROMPT 20 9 "Dot. Tem. " + FIELD DOTMP + FLAGS "D" +END + +DATE FR_JOLLY3 +BEGIN + PROMPT 40 9 "Inizio " + FIELD DADATATMP +END + +DATE FR_JOLLY4 +BEGIN + PROMPT 60 9 "Fine " + FIELD ADATATMP +END + +NUMBER FR_NCOLLI 7 +BEGIN + PROMPT 2 10 "N. Colli " + FIELD NCOLLI +END + +NUMBER FR_TARA 15 2 +BEGIN + PROMPT 25 10 "Tara " + FIELD TARA +END + +NUMBER FR_PNETTO 6 2 +BEGIN + PROMPT 60 10 "Peso netto " + FIELD PNETTO +END + +STRING FR_CODIVA 4 +BEGIN + PROMPT 2 12 "IVA " + USE %IVA + INPUT CODTAB FR_CODIVA + DISPLAY "Codice@20" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODIVA CODTAB + OUTPUT FR_DESIVA S0 + FLAGS "U" + VALIDATE ZEROFILL_FUNC 2 + CHECKTYPE NORMAL + FIELD CODIVA +END + +STRING FR_DESIVA 50 +BEGIN + PROMPT 13 12 "" + USE %IVA KEY 2 + INPUT S0 FR_DESIVA + DISPLAY "Descrizione@50" S0 + DISPLAY "Codice@20" CODTAB + OUTPUT FR_CODIVA CODTAB + OUTPUT FR_DESIVA S0 +END + +STRING FR_TIPODET 1 +BEGIN + PROMPT 67 12 "Indetr. " + USE %DET + INPUT CODTAB FR_TIPODET + DISPLAY "Codice" CODTAB + DISPLAY "Tipo" I0 + DISPLAY "Descrizione@50" S0 + OUTPUT FR_TIPODET CODTAB + CHECKTYPE NORMAL + FLAGS "U" +END + +GROUPBOX DLG_NULL 78 6 +BEGIN + PROMPT 1 14 "@bMagazzino" +END + +STRING FR_CODMAG 4 +BEGIN + PROMPT 2 15 "Magazzino " + USE MAG SELECT CODTAB[4,5]=="" + INPUT CODTAB FR_CODMAG + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAG CODTAB + OUTPUT FR_DESMAG S0 + WARNING "Magazzino assente" + FLAGS "U" + CHECKTYPE NORMAL + FIELD CODMAG[1,3] +END + +STRING FR_DESMAG 50 +BEGIN + PROMPT 26 15 "" + FLAGS "D" +END + +STRING FR_CODDEP 4 +BEGIN + PROMPT 2 16 "Deposito " + USE MAG SELECT (CODTAB[1,3]==#FR_CODMAG) && (CODTAB[4,5]!="") + INPUT CODTAB[1,3] FR_CODMAG + INPUT CODTAB[4,5] FR_CODDEP + DISPLAY "Codice mag." CODTAB[1,3] + DISPLAY "Codice dep." CODTAB[4,5] + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAG CODTAB[1,3] + OUTPUT FR_CODDEP CODTAB[4,5] + OUTPUT FR_DESDEP S0 + MESSAGE DIRTY,FR_CODMAG|K_TAB,FR_CODMAG + CHECKTYPE NORMAL + WARNING "Deposito assente" + FLAGS "U" + FIELD CODMAG[4,5] +END + +STRING FR_DESDEP 50 +BEGIN + PROMPT 26 16 "" + FLAGS "D" +END + +STRING FR_CODMAGC 4 +BEGIN + PROMPT 2 17 "Magazzino Col. " + COPY USE FR_CODMAG + INPUT CODTAB FR_CODMAGC + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAGC CODTAB + OUTPUT FR_DESMAGC S0 + WARNING "Magazzino assente" + FLAGS "U" + CHECKTYPE NORMAL + FIELD CODMAGC[1,3] +END + +STRING FR_DESMAGC 50 +BEGIN + PROMPT 26 17 "" + FLAGS "D" +END + +STRING FR_CODDEPC 4 +BEGIN + PROMPT 2 18 "Deposito " + USE MAG SELECT (CODTAB[1,3]==#FR_CODMAGC) && (CODTAB[4,5]!="") + INPUT CODTAB[1,3] FR_CODMAGC + INPUT CODTAB[4,5] FR_CODDEPC + DISPLAY "Codice mag." CODTAB[1,3] + DISPLAY "Codice dep." CODTAB[4,5] + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAGC CODTAB[1,3] + OUTPUT FR_CODDEPC CODTAB[4,5] + OUTPUT FR_DESDEPC S0 + MESSAGE DIRTY,FR_CODMAGC|K_TAB,FR_CODMAGC + CHECKTYPE NORMAL + WARNING "Deposito assente" + FLAGS "U" + FIELD CODMAGC[4,5] +END + +STRING FR_DESDEPC 50 +BEGIN + PROMPT 26 18 "" + FLAGS "D" +END + +ENDPAGE + +PAGE "Analitica" 0 2 0 0 + +GROUPBOX DLG_NULL 78 14 +BEGIN + PROMPT 1 0 "Contabilita' analitica" +END + +ENDPAGE +ENDMASK diff --git a/ps/verig22_FABRIS.ini b/ps/verig22_FABRIS.ini new file mode 100755 index 000000000..967a87b70 --- /dev/null +++ b/ps/verig22_FABRIS.ini @@ -0,0 +1,7 @@ +#Profilo di riga tipo merce lavanderie +[MAIN] +CALCOLI=* +CAMPICALC= +IMPONIBILE=IMPNS + +[HANDLERS] diff --git a/ps/verig22_FABRIS.uml b/ps/verig22_FABRIS.uml new file mode 100755 index 000000000..eba34c69f --- /dev/null +++ b/ps/verig22_FABRIS.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 1 +BEGIN + PROMPT 28 7 "Ritirato " + FIELD QTAGG1 +END + +NUMBER FR_QTA 6 1 +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 diff --git a/ps/verig24_FABRIS.ini b/ps/verig24_FABRIS.ini new file mode 100755 index 000000000..0af1f2beb --- /dev/null +++ b/ps/verig24_FABRIS.ini @@ -0,0 +1,13 @@ +#Profilo di riga tipo merce lavanderie +[MAIN] +CALCOLI=* +CAMPICALC= +IMPONIBILE=IMPNS + +[HANDLERS] +NHANDLER = 5 +1 = 133|4101 +2 = 112|4102 +3 = 105|4103 +4 = 152|4104 +5 = 103|4105 \ No newline at end of file diff --git a/ps/verig24_FABRIS.uml b/ps/verig24_FABRIS.uml new file mode 100755 index 000000000..824a3f9b4 --- /dev/null +++ b/ps/verig24_FABRIS.uml @@ -0,0 +1,474 @@ +#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 0 0 "" +END + +LIST FR_TIPORIGA 2 50 +BEGIN + PROMPT 2 1 "Tipo riga " + FIELD TIPORIGA +END + +GROUPBOX DLG_NULL 78 10 +BEGIN + PROMPT 1 3 "@bArticolo" +END + +STRING FR_CODART 8 +BEGIN + PROMPT 2 4 "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 4 "" + 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 6 "" + FIELD CODARTMAG + FLAGS "G" +END + +BOOLEAN FR_CHECKED +BEGIN + PROMPT 51 50 "" + FIELD CHECKED + FLAGS "D" +END + +STRING FR_LIV1 15 +BEGIN + PROMPT 2 5 "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 5 "" + 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 5 "" + 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 5 "" + 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 2 6 "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 2 6 "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 + +CURRENCY FR_PREZZO 15 +BEGIN + PROMPT 13 6 "Prezzo " + FLAGS "U" + FIELD PREZZO +END + +STRING FR_SCONTO 15 +BEGIN + PROMPT 36 6 "Sconto " + FIELD SCONTO +END + +NUMBER FR_PERCPROV 5 2 +BEGIN + PROMPT 59 6 "Provv. " + FIELD PERCPROV +END + +NUMBER FR_PERCPROV1 5 2 +BEGIN + PROMPT 72 6 "" + FIELD PERCPROV1 +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_DESCAU S0 + OUTPUT FR_FLCONS B1 + OUTPUT FR_FLRIT B0 + CHECKTYPE REQUIRED + FLAGS "U" + FIELD CODAGG1 +END + +STRING FR_DESCAU 50 +BEGIN + PROMPT 18 7 "" + FLAGS "D" +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 1 +BEGIN + PROMPT 2 8 "Ritirato " + FIELD QTAGG1 +END + +NUMBER FR_QTA 6 1 +BEGIN + PROMPT 20 8 "Da cons. " + FIELD QTA +END + +NUMBER FR_QTAEVASA 6 1 +BEGIN + PROMPT 40 8 "Consegnato " + FIELD QTAEVASA + FLAGS "D" +END + +NUMBER FR_NCOLLI 7 +BEGIN + PROMPT 60 8 "Pacchi " + FIELD NCOLLI + FLAGS "D" +END + +NUMBER FR_JOLLY1 6 1 +BEGIN + PROMPT 2 9 "Dot. Od. " + FIELD DOTOD + FLAGS "D" +END + +NUMBER FR_JOLLY2 6 1 +BEGIN + PROMPT 20 9 "Dot. Tem. " + FIELD DOTMP + FLAGS "D" +END + +DATE FR_JOLLY3 +BEGIN + PROMPT 40 9 "Inizio " + FIELD DADATATMP + FLAGS "D" +END + +DATE FR_JOLLY4 +BEGIN + PROMPT 60 9 "Fine " + FIELD ADATATMP + FLAGS "D" +END + +NUMBER FR_TARA 15 2 +BEGIN + PROMPT 2 10 "Tara " + FIELD TARA +END + +NUMBER FR_PNETTO 6 2 +BEGIN + PROMPT 25 10 "Peso netto " + FIELD PNETTO +END + +STRING FR_CODIVA 4 +BEGIN + PROMPT 2 11 "IVA " + USE %IVA + INPUT CODTAB FR_CODIVA + DISPLAY "Codice@20" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODIVA CODTAB + OUTPUT FR_DESIVA S0 + FLAGS "U" + VALIDATE ZEROFILL_FUNC 2 + CHECKTYPE NORMAL + FIELD CODIVA +END + +STRING FR_DESIVA 50 +BEGIN + PROMPT 13 11 "" + USE %IVA KEY 2 + INPUT S0 FR_DESIVA + DISPLAY "Descrizione@50" S0 + DISPLAY "Codice@20" CODTAB + OUTPUT FR_CODIVA CODTAB + OUTPUT FR_DESIVA S0 +END + +STRING FR_TIPODET 1 +BEGIN + PROMPT 67 11 "Indetr. " + USE %DET + INPUT CODTAB FR_TIPODET + DISPLAY "Codice" CODTAB + DISPLAY "Tipo" I0 + DISPLAY "Descrizione@50" S0 + OUTPUT FR_TIPODET CODTAB + CHECKTYPE NORMAL + FLAGS "U" +END + +GROUPBOX DLG_NULL 78 6 +BEGIN + PROMPT 1 13 "@bMagazzino" +END + +STRING FR_CODMAG 4 +BEGIN + PROMPT 2 14 "Magazzino " + USE MAG SELECT CODTAB[4,5]=="" + INPUT CODTAB FR_CODMAG + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAG CODTAB + OUTPUT FR_DESMAG S0 + WARNING "Magazzino assente" + FLAGS "U" + CHECKTYPE NORMAL + FIELD CODMAG[1,3] +END + +STRING FR_DESMAG 50 +BEGIN + PROMPT 26 14 "" + FLAGS "D" +END + +STRING FR_CODDEP 4 +BEGIN + PROMPT 2 15 "Deposito " + USE MAG SELECT (CODTAB[1,3]==#FR_CODMAG) && (CODTAB[4,5]!="") + INPUT CODTAB[1,3] FR_CODMAG + INPUT CODTAB[4,5] FR_CODDEP + DISPLAY "Codice mag." CODTAB[1,3] + DISPLAY "Codice dep." CODTAB[4,5] + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAG CODTAB[1,3] + OUTPUT FR_CODDEP CODTAB[4,5] + OUTPUT FR_DESDEP S0 + MESSAGE DIRTY,FR_CODMAG|K_TAB,FR_CODMAG + CHECKTYPE NORMAL + WARNING "Deposito assente" + FLAGS "U" + FIELD CODMAG[4,5] +END + +STRING FR_DESDEP 50 +BEGIN + PROMPT 26 15 "" + FLAGS "D" +END + +STRING FR_CODMAGC 4 +BEGIN + PROMPT 2 16 "Magazzino Col. " + COPY USE FR_CODMAG + INPUT CODTAB FR_CODMAGC + DISPLAY "Codice" CODTAB + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAGC CODTAB + OUTPUT FR_DESMAGC S0 + WARNING "Magazzino assente" + FLAGS "U" + CHECKTYPE NORMAL + FIELD CODMAGC[1,3] +END + +STRING FR_DESMAGC 50 +BEGIN + PROMPT 26 16 "" + FLAGS "D" +END + +STRING FR_CODDEPC 4 +BEGIN + PROMPT 2 17 "Deposito " + USE MAG SELECT (CODTAB[1,3]==#FR_CODMAGC) && (CODTAB[4,5]!="") + INPUT CODTAB[1,3] FR_CODMAGC + INPUT CODTAB[4,5] FR_CODDEPC + DISPLAY "Codice mag." CODTAB[1,3] + DISPLAY "Codice dep." CODTAB[4,5] + DISPLAY "Descrizione@50" S0 + OUTPUT FR_CODMAGC CODTAB[1,3] + OUTPUT FR_CODDEPC CODTAB[4,5] + OUTPUT FR_DESDEPC S0 + MESSAGE DIRTY,FR_CODMAGC|K_TAB,FR_CODMAGC + CHECKTYPE NORMAL + WARNING "Deposito assente" + FLAGS "U" + FIELD CODMAGC[4,5] +END + +STRING FR_DESDEPC 50 +BEGIN + PROMPT 26 17 "" + FLAGS "D" +END + +GROUPBOX DLG_NULL 78 4 +BEGIN + PROMPT 1 19 "@bRiferimenti documenti" +END + +STRING FR_JOLLY5 20 +BEGIN + PROMPT 2 20 "Buono di Consegna" + FIELD RIFBCON + FLAGS "D" +END + +ENDPAGE + +PAGE "Analitica" 0 2 0 0 + +GROUPBOX DLG_NULL 78 14 +BEGIN + PROMPT 1 0 "Contabilita' analitica" +END + +ENDPAGE +ENDMASK