campo-sirio/ve/ve0200e.uml
alex b3cd9c64a9 Patch level : xx.888
Files correlati     : no patch
Ricompilazione Demo : [ ]
Commento            : Riportata la versione 01.05 patch 888 sul main trunk


git-svn-id: svn://10.65.10.50/trunk@9217 c028cbd2-c16b-5b4b-a496-9718f37d4682
2000-10-03 13:45:12 +00:00

175 lines
5.5 KiB
Plaintext
Executable File

#include "veconf.h"
TOOLBAR "" 0 20 0 2
BUTTON DLG_OK 10 2
BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -22 -1 ""
END
ENDPAGE
PAGE "Contabilizzazione" 1 1 60 14
GROUPBOX DLG_NULL 78 7
BEGIN
PROMPT 1 1 "Ricerca primaria del conto di costo ricavo"
END
LIST F_RICERCACR1 36
BEGIN
PROMPT 2 2 "Primo gruppo "
ITEM "CF|Clienti/Fornitori"
ITEM "CA|Causale contabile"
ITEM "AN|Anagrafica magazzino"
ITEM "CV|Categoria di vendita"
ITEM "CC|Categoria contabile"
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2)&&(#THIS_FIELD!=#F_RICERCACR3)&&(#THIS_FIELD!=#F_RICERCACR4))
//WARNING "La sequenza di ricerca primaria deve indicare cinque tipi diversi"
END
LIST F_RICERCACR2 36
BEGIN
PROMPT 2 3 "Secondo gruppo "
ITEM "-|Nessuno" MESSAGE CLEAR,1@
ITEM "CF|Clienti/Fornitori" MESSAGE ENABLE,F_RICERCACR3
ITEM "CA|Causale contabile" MESSAGE ENABLE,F_RICERCACR3
ITEM "AN|Anagrafica magazzino" MESSAGE ENABLE,F_RICERCACR3
ITEM "CV|Categoria di vendita" MESSAGE ENABLE,F_RICERCACR3
ITEM "CC|Categoria contabile" MESSAGE ENABLE,F_RICERCACR3
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2)&&(#THIS_FIELD!=#F_RICERCACR3)&&(#THIS_FIELD!=#F_RICERCACR4))
//WARNING "La sequenza di ricerca primaria deve indicare cinque tipi diversi"
END
LIST F_RICERCACR3 36
BEGIN
PROMPT 2 4 "Terzo gruppo "
ITEM "-|Nessuno" MESSAGE CLEAR,2@
ITEM "CF|Clienti/Fornitori" MESSAGE ENABLE,F_RICERCACR4
ITEM "CA|Causale contabile" MESSAGE ENABLE,F_RICERCACR4
ITEM "AN|Anagrafica magazzino" MESSAGE ENABLE,F_RICERCACR4
ITEM "CV|Categoria di vendita" MESSAGE ENABLE,F_RICERCACR4
ITEM "CC|Categoria contabile" MESSAGE ENABLE,F_RICERCACR4
GROUP 1
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2)&&(#THIS_FIELD!=#F_RICERCACR3)&&(#THIS_FIELD!=#F_RICERCACR4))
//WARNING "La sequenza di ricerca primaria deve indicare cinque tipi diversi"
END
LIST F_RICERCACR4 36
BEGIN
PROMPT 2 5 "Quarto gruppo "
ITEM "-|Nessuno" MESSAGE CLEAR,F_RICERCACR5
ITEM "CF|Clienti/Fornitori" MESSAGE ENABLE,F_RICERCACR5
ITEM "CA|Causale contabile" MESSAGE ENABLE,F_RICERCACR5
ITEM "AN|Anagrafica magazzino" MESSAGE ENABLE,F_RICERCACR5
ITEM "CV|Categoria di vendita" MESSAGE ENABLE,F_RICERCACR5
ITEM "CC|Categoria contabile" MESSAGE ENABLE,F_RICERCACR5
GROUP 1 2
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2)&&(#THIS_FIELD!=#F_RICERCACR3)&&(#THIS_FIELD!=#F_RICERCACR4))
//WARNING "La sequenza di ricerca primaria deve indicare cinque tipi diversi"
END
LIST F_RICERCACR5 36
BEGIN
PROMPT 2 6 "Quinto gruppo "
ITEM "-|Nessuno"
ITEM "CF|Clienti/Fornitori"
ITEM "CA|Causale contabile"
ITEM "AN|Anagrafica magazzino"
ITEM "CV|Categoria di vendita"
ITEM "CC|Categoria contabile"
GROUP 1 2
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCACR1)&&(#THIS_FIELD!=#F_RICERCACR2)&&(#THIS_FIELD!=#F_RICERCACR3)&&(#THIS_FIELD!=#F_RICERCACR4))
//WARNING "La sequenza di ricerca primaria deve indicare cinque tipi diversi"
END
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 1 8 "Ricerca per anagrafica del conto di costo ricavo"
END
LIST F_RICERCAAN1 36
BEGIN
PROMPT 2 9 "Primo gruppo "
ITEM "AR|Articolo"
ITEM "GM|Gruppo merceologico"
ITEM "SM|Sottogruppo merceologico"
ITEM "RF|Raggruppamento fiscale"
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCAAN1)&&(#THIS_FIELD!=#F_RICERCAAN2)&&(#THIS_FIELD!=#F_RICERCAAN3))
//WARNING "La sequenza di ricerca per anagrafica deve indicare quattro tipi diversi"
END
LIST F_RICERCAAN2 36
BEGIN
PROMPT 2 10 "Secondo gruppo "
ITEM "-|Nessuno" MESSAGE CLEAR,3@
ITEM "AR|Articolo" MESSAGE ENABLE,F_RICERCAAN3
ITEM "GM|Gruppo merceologico" MESSAGE ENABLE,F_RICERCAAN3
ITEM "SM|Sottogruppo merceologico" MESSAGE ENABLE,F_RICERCAAN3
ITEM "RF|Raggruppamento fiscale" MESSAGE ENABLE,F_RICERCAAN3
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCAAN1)&&(#THIS_FIELD!=#F_RICERCAAN2)&&(#THIS_FIELD!=#F_RICERCAAN3))
//WARNING "La sequenza di ricerca per anagrafica deve indicare quattro tipi diversi"
END
LIST F_RICERCAAN3 36
BEGIN
PROMPT 2 11 "Terzo gruppo "
ITEM "-|Nessuno" MESSAGE CLEAR,F_RICERCAAN4
ITEM "AR|Articolo" MESSAGE ENABLE,F_RICERCAAN4
ITEM "GM|Gruppo merceologico" MESSAGE ENABLE,F_RICERCAAN4
ITEM "SM|Sottogruppo merceologico" MESSAGE ENABLE,F_RICERCAAN4
ITEM "RF|Raggruppamento fiscale" MESSAGE ENABLE,F_RICERCAAN4
GROUP 3
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCAAN1)&&(#THIS_FIELD!=#F_RICERCAAN2)&&(#THIS_FIELD!=#F_RICERCAAN3))
//WARNING "La sequenza di ricerca per anagrafica deve indicare quattro tipi diversi"
END
LIST F_RICERCAAN4 36
BEGIN
PROMPT 2 12 "Quarto gruppo "
ITEM "-|Nessuno"
ITEM "AR|Articolo"
ITEM "GM|Gruppo merceologico"
ITEM "SM|Sottogruppo merceologico"
ITEM "RF|Raggruppamento fiscale"
GROUP 3
//STR_EXPR (#THIS_FIELD=="-")||((#THIS_FIELD!=#F_RICERCAAN1)&&(#THIS_FIELD!=#F_RICERCAAN2)&&(#THIS_FIELD!=#F_RICERCAAN3))
//WARNING "La sequenza di ricerca per anagrafica deve indicare quattro tipi diversi"
END
BOOLEAN F_SCONTO_LORDO
BEGIN
PROMPT 2 14 "Contabilizzazione merci al lordo "
FIELD CONTSCLOR
END
STRING F_IVASTORNO 4
BEGIN
PROMPT 2 15 "Cod. IVA storno art. omaggio "
FIELD IVASTO
USE %IVA
FLAGS "U"
INPUT CODTAB F_IVASTORNO
DISPLAY "Codice" CODTAB
DISPLAY "Descrizione@50" S0
DISPLAY "Tipo" S1
DISPLAY "%@5" R0
OUTPUT F_IVASTORNO CODTAB
END
BOOLEAN F_CHECKPREVCONT
BEGIN
PROMPT 2 16 "Controlla che i documenti precedenti siano contabilizzati"
FIELD CHECKPREVCONT
END
ENDPAGE
ENDMASK