root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Tolti i gruppi merceologici 2 e 3, spostati di una riga i campi

Browse Source 
successivi.


git-svn-id: svn://10.65.10.50/trunk@3386 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
angelo 1996-08-13 15:40:16 +00:00
parent 1246414ecf
commit 761bccc810
1 changed files with 50 additions and 110 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

160
ve/ve2400.uml
View File

@ -7,7 +7,7 @@ ENDPAGE
PAGE "Pagina 1" 0 0 70 20 PAGE "Pagina 1" 0 0 70 20
GROUPBOX DLG_NULL 71 5 GROUPBOX DLG_NULL 78 5
BEGIN BEGIN
PROMPT 0 0 "" PROMPT 0 0 ""
//FLAG "R" //FLAG "R"
@ -48,129 +48,69 @@ BEGIN
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
STRING F_GRMERC1 3 STRING F_GRMERC 3
BEGIN BEGIN
PROMPT 1 5 "Gruppo merc. 1 " PROMPT 1 5 "Gr. merc. "
FIELD LF_ANAMAG->GRMERC1[1,3] FIELD LF_ANAMAG->GRMERC[1,3]
GROUP 1 GROUP 1
FLAG "U" FLAG "U"
END USE GMC
INPUT CODTAB F_GRMERC SELECT
STRING F_GRMERC1B 2
BEGIN
PROMPT 21 5 ""
FIELD LF_ANAMAG->GRMERC1[4,5]
GROUP 1
FLAG "U"
MESSAGE EMPTY CLEAR,2@
MESSAGE ENABLE,2@
USE GMC
INPUT CODTAB[1,3] F_GRMERC1
INPUT CODTAB[4,5] F_GRMERC1B
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_GRMERC1 CODTAB[1,3] OUTPUT F_GRMERC CODTAB[1,3]
OUTPUT F_GRMERC1B CODTAB[4,5] OUTPUT F_GRMERCB CODTAB[4,5]
OUTPUT F_GRMERC1D S0 OUTPUT F_GRMERCD1 S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
STRING F_GRMERC1D 50 STRING F_GRMERCD1 50
BEGIN BEGIN
PROMPT 26 5 "" PROMPT 23 5 ""
GROUP 1 GROUP 1
USE GMC KEY 2 USE GMC KEY 2
INPUT S0 F_GRMERC1D INPUT S0 F_GRMERCD1
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_GRMERC1 CODTAB[1,3] OUTPUT F_GRMERC CODTAB[1,3]
OUTPUT F_GRMERC1B CODTAB[4,5] OUTPUT F_GRMERCD1 S0
OUTPUT F_GRMERC1D S0
END
STRING F_GRMERC2 3
BEGIN
PROMPT 1 6 "Gruppo merc. 2 "
FIELD LF_ANAMAG->GRMERC2[1,3]
GROUP 2
FLAG "U"
END
STRING F_GRMERC2B 2
BEGIN
PROMPT 21 6 ""
FIELD LF_ANAMAG->GRMERC2[4,5]
GROUP 2
FLAG "U"
MESSAGE EMPTY CLEAR,3@
MESSAGE ENABLE,3@
NUM_EXPR (#F_GRMERC2=="")||(#F_GRMERC2!=#F_GRMERC1)
USE GMC
INPUT CODTAB[1,3] F_GRMERC2
INPUT CODTAB[4,5] F_GRMERC2B
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_GRMERC2 CODTAB[1,3]
OUTPUT F_GRMERC2B CODTAB[4,5]
OUTPUT F_GRMERC2D S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
STRING F_GRMERC2D 50 STRING F_GRMERCB 2
BEGIN BEGIN
PROMPT 26 6 "" PROMPT 1 6 "Sott. merc. "
GROUP 2 FIELD LF_ANAMAG->GRMERC[4,5]
USE GMC KEY 2 GROUP 1
INPUT S0 F_GRMERC2D
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
OUTPUT F_GRMERC2 CODTAB[1,3]
OUTPUT F_GRMERC2B CODTAB[4,5]
OUTPUT F_GRMERC2D S0
END
STRING F_GRMERC3 3
BEGIN
PROMPT 1 7 "Gruppo merc. 3 "
FIELD LF_ANAMAG->GRMERC3[1,3]
GROUP 3
FLAG "U" FLAG "U"
END
STRING F_GRMERC3B 2
BEGIN
PROMPT 21 7 ""
FIELD LF_ANAMAG->GRMERC3[4,5]
GROUP 3
FLAG "U"
NUM_EXPR (#F_GRMERC3=="")||((#F_GRMERC3!=#F_GRMERC1)&&(#F_GRMERC3!=#F_GRMERC2))
USE GMC USE GMC
INPUT CODTAB[1,3] F_GRMERC3 INPUT CODTAB[1,3] F_GRMERC
INPUT CODTAB[4,5] F_GRMERC3B INPUT CODTAB[4,5] F_GRMERCB
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_GRMERC3 CODTAB[1,3] OUTPUT F_GRMERC CODTAB[1,3]
OUTPUT F_GRMERC3B CODTAB[4,5] OUTPUT F_GRMERCB CODTAB[4,5]
OUTPUT F_GRMERC3D S0 OUTPUT F_GRMERCD2 S0
CHECKTYPE NORMAL CHECKTYPE NORMAL
END END
STRING F_GRMERC3D 50 STRING F_GRMERCD2 50
BEGIN BEGIN
PROMPT 26 7 "" PROMPT 23 6 ""
GROUP 3 GROUP 1
USE GMC KEY 2 USE GMC KEY 2
INPUT S0 F_GRMERC3D INPUT S0 F_GRMERCD2
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
OUTPUT F_GRMERC3 CODTAB[1,3] OUTPUT F_GRMERC CODTAB[1,3]
OUTPUT F_GRMERC3B CODTAB[4,5] OUTPUT F_GRMERCB CODTAB[4,5]
OUTPUT F_GRMERC3D S0 OUTPUT F_GRMERCD2 S0
CHECKTYPE NORMAL
END END
STRING F_CODIVA 4 STRING F_CODIVA 4
BEGIN BEGIN
PROMPT 1 8 "Codice IVA " PROMPT 1 7 "Codice IVA "
FIELD LF_ANAMAG->CODIVA FIELD LF_ANAMAG->CODIVA
USE %IVA USE %IVA
INPUT CODTAB F_CODIVA INPUT CODTAB F_CODIVA
@ -183,7 +123,7 @@ END
STRING F_CODIVA1 50 STRING F_CODIVA1 50
BEGIN BEGIN
PROMPT 26 8 "" PROMPT 23 7 ""
USE %IVA KEY 2 USE %IVA KEY 2
INPUT S0 F_CODIVA1 INPUT S0 F_CODIVA1
DISPLAY "Descrizione@50" S0 DISPLAY "Descrizione@50" S0
@ -194,7 +134,7 @@ END
SPREADSHEET F_SHEET0 77 5 SPREADSHEET F_SHEET0 77 5
BEGIN BEGIN
PROMPT 1 9 "" PROMPT 1 8 ""
ITEM "U.M." ITEM "U.M."
ITEM "F. conversione" ITEM "F. conversione"
ITEM "Prezzo netto@18" ITEM "Prezzo netto@18"
@ -203,7 +143,7 @@ END
STRING F_CATCONA 3 STRING F_CATCONA 3
BEGIN BEGIN
PROMPT 1 15 "Categoria conto acquisti " PROMPT 1 14 "Categoria conto acquisti "
FIELD LF_ANAMAG->CATCONA FIELD LF_ANAMAG->CATCONA
GROUP 11 GROUP 11
MESSAGE CLEAR,12@ MESSAGE CLEAR,12@
@ -223,7 +163,7 @@ END
STRING F_CATCONA1 40 STRING F_CATCONA1 40
BEGIN BEGIN
PROMPT 36 15 "" PROMPT 36 14 ""
FLAG "D" FLAG "D"
GROUP 11 GROUP 11
USE CAA KEY 2 USE CAA KEY 2
@ -238,7 +178,7 @@ END
STRING F_GRUPPOA 2 STRING F_GRUPPOA 2
BEGIN BEGIN
PROMPT 1 16 "Conto d'acquisto " PROMPT 1 15 "Conto d'acquisto "
FIELD LF_ANAMAG->GRUPPOA FIELD LF_ANAMAG->GRUPPOA
GROUP 12 GROUP 12
MESSAGE CLEAR,11@ MESSAGE CLEAR,11@
@ -247,14 +187,14 @@ END
STRING F_CONTOA 2 STRING F_CONTOA 2
BEGIN BEGIN
PROMPT 22 16 "" PROMPT 22 15 ""
FIELD LF_ANAMAG->CONTOA FIELD LF_ANAMAG->CONTOA
GROUP 12 GROUP 12
END END
STRING F_SOTTOCA 6 STRING F_SOTTOCA 6
BEGIN BEGIN
PROMPT 26 16 "" PROMPT 26 15 ""
FIELD LF_ANAMAG->SOTTOCA FIELD LF_ANAMAG->SOTTOCA
GROUP 12 GROUP 12
USE LF_PCON USE LF_PCON
@ -274,7 +214,7 @@ END
STRING F_DESCRA 40 STRING F_DESCRA 40
BEGIN BEGIN
PROMPT 36 16 "" PROMPT 36 15 ""
FLAG "D" FLAG "D"
GROUP 12 GROUP 12
USE LF_PCON KEY 2 USE LF_PCON KEY 2
@ -290,7 +230,7 @@ END
STRING F_CATCONV 3 STRING F_CATCONV 3
BEGIN BEGIN
PROMPT 1 17 "Categoria conto vendite " PROMPT 1 16 "Categoria conto vendite "
FIELD LF_ANAMAG->CATCONV FIELD LF_ANAMAG->CATCONV
GROUP 21 GROUP 21
MESSAGE CLEAR,22@ MESSAGE CLEAR,22@
@ -310,7 +250,7 @@ END
STRING F_CATCONV1 40 STRING F_CATCONV1 40
BEGIN BEGIN
PROMPT 36 17 "" PROMPT 36 16 ""
FLAG "D" FLAG "D"
GROUP 21 GROUP 21
USE CRA KEY 2 USE CRA KEY 2
@ -325,7 +265,7 @@ END
STRING F_GRUPPOV 2 STRING F_GRUPPOV 2
BEGIN BEGIN
PROMPT 1 18 "Conto di vendita " PROMPT 1 17 "Conto di vendita "
FIELD LF_ANAMAG->GRUPPOV FIELD LF_ANAMAG->GRUPPOV
GROUP 22 GROUP 22
MESSAGE CLEAR,21@ MESSAGE CLEAR,21@
@ -334,14 +274,14 @@ END
STRING F_CONTOV 2 STRING F_CONTOV 2
BEGIN BEGIN
PROMPT 22 18 "" PROMPT 22 17 ""
FIELD LF_ANAMAG->CONTOV FIELD LF_ANAMAG->CONTOV
GROUP 22 GROUP 22
END END
STRING F_SOTTOCV 6 STRING F_SOTTOCV 6
BEGIN BEGIN
PROMPT 26 18 "" PROMPT 26 17 ""
FIELD LF_ANAMAG->SOTTOCV FIELD LF_ANAMAG->SOTTOCV
GROUP 22 GROUP 22
USE LF_PCON USE LF_PCON
@ -361,7 +301,7 @@ END
STRING F_DESCRV 40 STRING F_DESCRV 40
BEGIN BEGIN
PROMPT 36 18 "" PROMPT 36 17 ""
FLAG "D" FLAG "D"
GROUP 22 GROUP 22
USE LF_PCON KEY 2 USE LF_PCON KEY 2
@ -375,19 +315,19 @@ END
STRING F_UMP 3 STRING F_UMP 3
BEGIN BEGIN
PROMPT 1 19 "U.M. peso " PROMPT 1 18 "U.M. peso "
FIELD LF_ANAMAG->UMP FIELD LF_ANAMAG->UMP
END END
NUMBER F_PESO 15 5 NUMBER F_PESO 15 5
BEGIN BEGIN
PROMPT 30 19 "Peso " PROMPT 30 18 "Peso "
FIELD LF_ANAMAG->PESO FIELD LF_ANAMAG->PESO
END END
STRING F_CLASSDOG 10 STRING F_CLASSDOG 10
BEGIN BEGIN
PROMPT 1 20 "Classe doganale " PROMPT 1 19 "Classe doganale "
FIELD LF_ANAMAG->CLASSDOG FIELD LF_ANAMAG->CLASSDOG
FLAG "UZ" FLAG "UZ"
USE %CLD USE %CLD
@ -401,7 +341,7 @@ END
STRING F_CLASSDOG1 40 STRING F_CLASSDOG1 40
BEGIN BEGIN
PROMPT 36 20 "" PROMPT 36 19 ""
FLAG "D" FLAG "D"
END END