Modificate le tabelle RFA, CCO,CVE,GMC, CAA e CRA in modo che
siano associate alla ditta e non piu' comuni. git-svn-id: svn://10.65.10.50/trunk@3419 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
parent
50f62e71ac
commit
16904de61b
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Tabella Categorie Acquisti Articoli" -1 -1 50 8
|
PAGE "Stampa Tabella Categorie Acquisti Articoli" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da cod. articolo "
|
PROMPT 2 1 "Da cod. articolo "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE CAA
|
USE CAA
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Cod. acquisto articolo" CODTAB
|
DISPLAY "Cod. acquisto articolo" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A cod. articolo "
|
PROMPT 2 3 "A cod. articolo "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 10 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Tabella Categorie Ricavi Articoli" -1 -1 50 8
|
PAGE "Stampa Tabella Categorie Ricavi Articoli" -1 -1 50 8
|
||||||
STRING F_INIZIO1 3
|
STRING F_INIZIO1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da cod. articolo "
|
PROMPT 2 1 "Da cod. articolo "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE CRA
|
USE CRA
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Cod. ricavo articolo" CODTAB
|
DISPLAY "Cod. ricavo articolo" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 3
|
STRING F_FINE1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A cod. articolo "
|
PROMPT 2 3 "A cod. articolo "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 10 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -3,39 +3,39 @@
|
|||||||
PAGE "Stampa Tabella Raggruppamento Fiscale Articoli " -1 -1 50 8
|
PAGE "Stampa Tabella Raggruppamento Fiscale Articoli " -1 -1 50 8
|
||||||
STRING F_INIZIO1 5
|
STRING F_INIZIO1 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 1 "Da codice art. "
|
PROMPT 2 1 "Da codice art. "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
HELP "Inserire il codice da cui iniziare la stampa. Se in bianco vuol dire dall'inizio"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
USE RFA
|
USE RFA
|
||||||
INPUT CODTAB F_INIZIO1
|
INPUT CODTAB F_INIZIO1
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
DISPLAY "Descrizione@50" S0
|
DISPLAY "Descrizione@50" S0
|
||||||
OUTPUT F_INIZIO1 CODTAB
|
OUTPUT F_INIZIO1 CODTAB
|
||||||
GROUP 1
|
GROUP 1
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_FINE1 5
|
STRING F_FINE1 5
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 3 "A codice art. "
|
PROMPT 2 3 "A codice art. "
|
||||||
FLAGS "U"
|
FLAGS "U"
|
||||||
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
HELP "Inserire il codice di fine. Se in bianco vuol dire l'ultimo"
|
||||||
FIELD LF_TABCOM->CODTAB
|
FIELD LF_TABCOM->CODTAB
|
||||||
COPY USE F_INIZIO1
|
COPY USE F_INIZIO1
|
||||||
INPUT CODTAB F_FINE1
|
INPUT CODTAB F_FINE1
|
||||||
COPY DISPLAY F_INIZIO1
|
COPY DISPLAY F_INIZIO1
|
||||||
OUTPUT F_FINE1 CODTAB
|
OUTPUT F_FINE1 CODTAB
|
||||||
GROUP 2
|
GROUP 2
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_OK 10 2
|
BUTTON DLG_OK 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -12 -1 ""
|
PROMPT -12 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
BUTTON DLG_QUIT 10 2
|
BUTTON DLG_QUIT 10 2
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT -22 -1 ""
|
PROMPT -22 -1 ""
|
||||||
END
|
END
|
||||||
|
|
||||||
ENDPAGE
|
ENDPAGE
|
||||||
|
@ -37,7 +37,7 @@ BEGIN
|
|||||||
FIELD %ACR->CODTAB[1,3]
|
FIELD %ACR->CODTAB[1,3]
|
||||||
KEY 1
|
KEY 1
|
||||||
FLAG "U"
|
FLAG "U"
|
||||||
USE %CCO // CATEGORIE CONTABILI C/F
|
USE CCO // CATEGORIE CONTABILI C/F
|
||||||
|
|
||||||
INPUT CODTAB F_CODCATCON
|
INPUT CODTAB F_CODCATCON
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
|
@ -16,7 +16,7 @@ END
|
|||||||
STRING F_CODICE 3
|
STRING F_CODICE 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Cod. Tabella "
|
PROMPT 2 2 "Cod. Tabella "
|
||||||
FIELD CAA->CODTAB
|
FIELD CODTAB
|
||||||
KEY 1
|
KEY 1
|
||||||
USE CAA
|
USE CAA
|
||||||
|
|
||||||
@ -35,7 +35,7 @@ END
|
|||||||
STRING F_DESCR 50
|
STRING F_DESCR 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Descrizione "
|
PROMPT 2 4 "Descrizione "
|
||||||
FIELD CAA->S0
|
FIELD S0
|
||||||
KEY 2
|
KEY 2
|
||||||
USE CAA KEY 2
|
USE CAA KEY 2
|
||||||
INPUT S0 F_DESCR
|
INPUT S0 F_DESCR
|
||||||
@ -52,14 +52,14 @@ END
|
|||||||
STRING F_CODCON 3
|
STRING F_CODCON 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 8 "Codice conto "
|
PROMPT 2 8 "Codice conto "
|
||||||
FIELD CAA->S1
|
FIELD S1
|
||||||
FLAG "R"
|
FLAG "R"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_CODCON1 3
|
STRING F_CODCON1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 25 8 ""
|
PROMPT 25 8 ""
|
||||||
FIELD CAA->S2
|
FIELD S2
|
||||||
USE LF_PCON SELECT INDBIL=3
|
USE LF_PCON SELECT INDBIL=3
|
||||||
FLAG "R"
|
FLAG "R"
|
||||||
INPUT GRUPPO F_CODCON
|
INPUT GRUPPO F_CODCON
|
||||||
@ -76,7 +76,7 @@ END
|
|||||||
STRING F_CODCON2 6
|
STRING F_CODCON2 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 8 ""
|
PROMPT 34 8 ""
|
||||||
FIELD CAA->S3
|
FIELD S3
|
||||||
USE LF_PCON SELECT INDBIL=3
|
USE LF_PCON SELECT INDBIL=3
|
||||||
FLAG "R"
|
FLAG "R"
|
||||||
INPUT GRUPPO F_CODCON
|
INPUT GRUPPO F_CODCON
|
||||||
|
@ -17,7 +17,7 @@ END
|
|||||||
STRING F_CODICE 3
|
STRING F_CODICE 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Cod. Tabella "
|
PROMPT 2 2 "Cod. Tabella "
|
||||||
FIELD CRA->CODTAB
|
FIELD CODTAB
|
||||||
KEY 1
|
KEY 1
|
||||||
USE CRA
|
USE CRA
|
||||||
|
|
||||||
@ -35,7 +35,7 @@ END
|
|||||||
STRING F_DESCR 50
|
STRING F_DESCR 50
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Descrizione "
|
PROMPT 2 4 "Descrizione "
|
||||||
FIELD CRA->S0
|
FIELD S0
|
||||||
KEY 2
|
KEY 2
|
||||||
USE CRA KEY 2
|
USE CRA KEY 2
|
||||||
INPUT S0 F_DESCR
|
INPUT S0 F_DESCR
|
||||||
@ -52,14 +52,14 @@ END
|
|||||||
STRING F_CODCON 3
|
STRING F_CODCON 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 8 "Codice conto "
|
PROMPT 2 8 "Codice conto "
|
||||||
FIELD CRA->S1
|
FIELD S1
|
||||||
FLAG "R"
|
FLAG "R"
|
||||||
END
|
END
|
||||||
|
|
||||||
STRING F_CODCON1 3
|
STRING F_CODCON1 3
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 25 8 ""
|
PROMPT 25 8 ""
|
||||||
FIELD CRA->S2
|
FIELD S2
|
||||||
USE LF_PCON SELECT INDBIL="4"
|
USE LF_PCON SELECT INDBIL="4"
|
||||||
FLAG "R"
|
FLAG "R"
|
||||||
INPUT GRUPPO F_CODCON
|
INPUT GRUPPO F_CODCON
|
||||||
@ -76,7 +76,7 @@ END
|
|||||||
STRING F_CODCON2 6
|
STRING F_CODCON2 6
|
||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 34 8 ""
|
PROMPT 34 8 ""
|
||||||
FIELD CRA->S3
|
FIELD S3
|
||||||
USE LF_PCON SELECT INDBIL="4"
|
USE LF_PCON SELECT INDBIL="4"
|
||||||
FLAG "R"
|
FLAG "R"
|
||||||
INPUT GRUPPO F_CODCON
|
INPUT GRUPPO F_CODCON
|
||||||
|
@ -16,7 +16,7 @@ STRING FLD_TABRFA_CODTAB 5
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 2 "Codice "
|
PROMPT 2 2 "Codice "
|
||||||
FIELD CODTAB
|
FIELD CODTAB
|
||||||
USE %RFA
|
USE RFA
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
INPUT CODTAB FLD_TABRFA_CODTAB
|
INPUT CODTAB FLD_TABRFA_CODTAB
|
||||||
DISPLAY "Codice" CODTAB
|
DISPLAY "Codice" CODTAB
|
||||||
@ -31,7 +31,7 @@ STRING FLD_TABRFA_S0 50
|
|||||||
BEGIN
|
BEGIN
|
||||||
PROMPT 2 4 "Descrizione "
|
PROMPT 2 4 "Descrizione "
|
||||||
FIELD S0
|
FIELD S0
|
||||||
USE %RFA KEY 2
|
USE RFA KEY 2
|
||||||
CHECKTYPE REQUIRED
|
CHECKTYPE REQUIRED
|
||||||
WARNING "Manca la descrizione"
|
WARNING "Manca la descrizione"
|
||||||
INPUT S0 FLD_TABRFA_S0
|
INPUT S0 FLD_TABRFA_S0
|
||||||
|
Loading…
x
Reference in New Issue
Block a user