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

Correzione a errore fatale + corrazione a posizioni campi

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@344 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1994-10-11 14:50:27 +00:00
parent 4e5d2443c1
commit 277c8fd132
3 changed files with 18 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
cg/cg3100a.uml
View File

@ -83,27 +83,26 @@ END
RADIOBUTTON F_DECIDI 10
BEGIN
PROMPT 2 10 "Stampa "
ITEM "2|data" MESSAGE DISABLE,2@|RESET,2@|ENABLE,3@
ITEM "1|numero" MESSAGE DISABLE,3@|RESET,3@|ENABLE,2@
PROMPT 2 10 "Stampa "
ITEM "2|Data" MESSAGE DISABLE,2@|RESET,2@|ENABLE,3@
ITEM "1|Numero" MESSAGE DISABLE,3@|RESET,3@|ENABLE,2@
END
DATE F_DATAINI
BEGIN
PROMPT 19 11 "Stampa mov. dalla data "
//HELP "Se non indicato nessun valore viene effettuata una stampa completa in ordine di data"
GROUP 3
PROMPT 18 11 "Stampa mov. dalla data "
GROUP 3
END
DATE F_DATAFIN
BEGIN
PROMPT 55 11 "alla data "
GROUP 3
PROMPT 54 11 "alla data "
GROUP 3
END
NUMBER F_NUMEROINI 7
BEGIN
PROMPT 19 12 "Stampa mov. dal numero "
PROMPT 18 12 "Stampa mov. dal numero "
USE LF_MOV KEY 1
INPUT NUMREG F_NUMEROINI
DISPLAY "Numero registrazione" NUMREG
@ -116,7 +115,7 @@ END
NUMBER F_NUMEROFIN 7
BEGIN
PROMPT 55 12 "al numero "
PROMPT 54 12 "al numero "
COPY USE F_NUMEROINI
INPUT NUMREG F_NUMEROFIN
COPY DISPLAY F_NUMEROINI
@ -154,15 +153,12 @@ STRING F_REGISTROINI 3
BEGIN
PROMPT 2 15 "Stampa dal registro iva "
USE REG SELECT I0<"3"
//INPUT CODTAB[1,5] F_ANNO SELECT
//INPUT CODTAB[1,5] ""
INPUT CODTAB[5,7] F_REGISTROINI
DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Cod. registro iva" CODTAB[5,7]
DISPLAY "Descrizione@40" S0
OUTPUT F_REGISTROINI CODTAB[5,7]
FLAGS "UR"
//CHECKTYPE NORMAL
HELP "Introdurre cod. registro iva di inizio stampa: vuoto = inizio archivio"
END
@ -170,15 +166,12 @@ STRING F_REGISTROFIN 3
BEGIN
PROMPT 40 15 "al reg. iva "
COPY USE F_REGISTROINI
//INPUT CODTAB[1,5] F_ANNO SELECT
//INPUT CODTAB[1,5] ""
INPUT CODTAB[5,7] F_REGISTROFIN
DISPLAY "Anno" CODTAB[1,4]
DISPLAY "Cod. registro iva" CODTAB[5,7]
DISPLAY "Descrizione@40" S0
OUTPUT F_REGISTROFIN CODTAB[5,7]
FLAGS "UR"
//CHECKTYPE NORMAL
HELP "Introdurre cod. registro iva di fine stampa: vuoto = fine archivio"
END
@ -192,20 +185,13 @@ BEGIN
PROMPT 2 17 "Stampa movimenti provvisori "
END
/*
TEXT DLG_NULL
BEGIN
PROMPT 2 17 "N.B. se non indicato nessun valore stampa completa in ordine di data"
END
*/
BUTTON DLG_PRINT 9 2
BEGIN
PROMPT -12 -1 "~Stampa"
MESSAGE EXIT,K_ENTER
END
BUTTON DLG_QUIT 9 2
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -22 -1 ""
END
@ -219,4 +205,3 @@ ENDMASK

2
cg/cg3100b.uml
View File

@ -141,7 +141,7 @@ BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 9 2
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -22 -1 ""
END

15
cg/cg3100c.uml
View File

@ -1,4 +1,3 @@
#include "cg3100.h"
PAGE "" -1 -1 76 19
@ -43,34 +42,34 @@ END
RADIOBUTTON F_DECIDI 10
BEGIN
PROMPT 2 8 "Stampa "
ITEM "2|data"
ITEM "2|Data"
MESSAGE DISABLE,2@|RESET,2@|ENABLE,1@
ITEM "1|numero"
ITEM "1|Numero"
MESSAGE DISABLE,1@|RESET,1@|ENABLE,2@
END
DATE F_DATAINI
BEGIN
PROMPT 19 9 "Stampa mov. dalla data "
PROMPT 18 9 "Stampa mov. dalla data "
GROUP 1
END
DATE F_DATAFIN
BEGIN
PROMPT 55 9 "alla data "
PROMPT 54 9 "alla data "
GROUP 1
END
NUMBER F_NUMEROINI 7
BEGIN
PROMPT 19 10 "Stampa mov. dal numero "
PROMPT 18 10 "Stampa mov. dal numero "
FLAGS "R"
GROUP 2
END
NUMBER F_NUMEROFIN 7
BEGIN
PROMPT 55 10 "al numero "
PROMPT 54 10 "al numero "
FLAGS "R"
GROUP 2
END
@ -90,7 +89,7 @@ BEGIN
PROMPT -12 -1 ""
END
BUTTON DLG_QUIT 9 2
BUTTON DLG_CANCEL 9 2
BEGIN
PROMPT -22 -1 ""
END