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

Patch level :10.0

Browse Source 
Files correlati     :
Ricompilazione Demo : [ ]
Commento            :aggiunto programma (NON funzionante) delle giacenze x clifo


git-svn-id: svn://10.65.10.50/trunk@17162 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
luca 2008-09-04 15:14:18 +00:00
parent 6901596ed5
commit 6c823af76e
2 changed files with 9 additions and 11 deletions

2
mg/mg0400.cpp

@ -223,7 +223,7 @@ void TClifo_giac_mask::set_parametered_fields()
// costruttore della maschera anagrafica di magazzino
TClifo_giac_mask::TClifo_giac_mask(TRelation * rel) : TMask("mg0400")
TClifo_giac_mask::TClifo_giac_mask(TRelation * rel) : TMask("mg0400a")
{
_rel = rel;

18
mg/mg0400a.uml

@ -17,12 +17,13 @@ BEGIN
ITEM "C|Clienti"
ITEM "F|Fornitori"
FIELD TIPOCF
KEY 1 2
END
NUMBER F_CODCF 6
BEGIN
PROMPT 22 1 "Codice "
FLAGS "GR"
FLAGS "R"
USE LF_CLIFO
INPUT TIPOCF F_TIPOCF SELECT
INPUT CODCF F_CODCF
@ -32,7 +33,7 @@ BEGIN
OUTPUT F_CODCF CODCF
OUTPUT F_RAGSOC RAGSOC[1,30]
FIELD CODCF
KEY 1
KEY 1 2
CHECKTYPE REQUIRED
END
@ -45,14 +46,11 @@ BEGIN
DISPLAY "Ragione sociale@50" RAGSOC
DISPLAY "Codice@R" CODCF
COPY OUTPUT F_CODCF
CHECKTYPE REQUIRED
END
STRING F_CODART 20
BEGIN
PROMPT 1 4 "Articolo "
FIELD LF_ANAMAG->CODART
KEY 1
FLAG "UG"
USE LF_ANAMAG
INPUT CODART F_CODART
@ -60,21 +58,20 @@ BEGIN
DISPLAY "Descrizione@50" DESCR
OUTPUT F_CODART CODART
OUTPUT F_DESART DESCR
FIELD CODART
KEY 1 2
CHECKTYPE REQUIRED
END
STRING F_DESART 50 41
BEGIN
PROMPT 34 4 ""
FIELD LF_ANAMAG->DESCR
KEY 2
USE LF_ANAMAG KEY 2
INPUT DESCR F_DESART
DISPLAY "Codice@20" CODART
DISPLAY "Descrizione@50" DESCR
OUTPUT F_CODART CODART
OUTPUT F_DESART DESCR
CHECKTYPE REQUIRED
END
STRING F_ANNOES 4
@ -87,7 +84,8 @@ BEGIN
DISPLAY "Dal@16" D0
DISPLAY "Al@16" D1
OUTPUT F_ANNOES CODTAB
FIELD ANNOES
FIELD ANNOES
KEY 1 2
CHECKTYPE REQUIRED
ADD RUN cg0 -5 ESC
END
@ -96,7 +94,7 @@ SPREADSHEET F_SHEETGIAC 0 -2
BEGIN
PROMPT 0 6 "Giacenze"
FLAGS "A"
USE LF_MAG KEY NRIGA
USE LF_CLIFOGIAC KEY NRIGA
INPUT ANNOES F_ANNOES
INPUT CODART F_CODART
// la sequenza delle colonne livelliX è usata per ottenere