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:
luca83
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