Tolto allineamento al codice pagamento

git-svn-id: svn://10.65.10.50/trunk@2604 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1996-02-16 10:56:20 +00:00
parent 7bd4ee2f23
commit 227dc56faa
3 changed files with 190 additions and 189 deletions

View File

@ -25,7 +25,7 @@ STRING F_CODICE 4
BEGIN BEGIN
PROMPT 6 1 "Codice " PROMPT 6 1 "Codice "
HELP "Codice condizione di pagamento" HELP "Codice condizione di pagamento"
FLAGS "UZ" FLAGS "U#"
FIELD CODTAB FIELD CODTAB
USE %CPG KEY 1 ALIAS 50 USE %CPG KEY 1 ALIAS 50
INPUT CODTAB F_CODICE INPUT CODTAB F_CODICE

View File

@ -697,7 +697,7 @@ STRING F_CODPAG 4
BEGIN BEGIN
PROMPT 2 8 "Pagamento " PROMPT 2 8 "Pagamento "
FIELD LF_CLIFO->CODPAG FIELD LF_CLIFO->CODPAG
FLAGS "UZ" FLAGS "U#"
USE %CPG USE %CPG
INPUT CODTAB F_CODPAG INPUT CODTAB F_CODPAG
DISPLAY "Codice" CODTAB DISPLAY "Codice" CODTAB

View File

@ -1,187 +1,188 @@
#include "cg6800.h" #include "cg6800.h"
TOOLBAR "" 0 20 0 2 TOOLBAR "" 0 20 0 2
BUTTON DLG_SAVEREC 10 2 BUTTON DLG_SAVEREC 10 2
BEGIN BEGIN
PROMPT -15 -1 "~Registra" PROMPT -15 -1 "~Registra"
MESSAGE EXIT,K_SAVE MESSAGE EXIT,K_SAVE
END END
BUTTON DLG_CANCEL 10 2 BUTTON DLG_CANCEL 10 2
BEGIN BEGIN
PROMPT -45 -1 "" PROMPT -45 -1 ""
MESSAGE EXIT,K_ESC MESSAGE EXIT,K_ESC
END END
BUTTON DLG_QUIT 10 2 BUTTON DLG_QUIT 10 2
BEGIN BEGIN
PROMPT -55 -1 "" PROMPT -55 -1 ""
MESSAGE EXIT,K_QUIT MESSAGE EXIT,K_QUIT
END END
ENDPAGE ENDPAGE
PAGE "" -1 -1 78 18 PAGE "" -1 -1 78 18
NUMBER F_NUMREG 6 NUMBER F_NUMREG 6
BEGIN BEGIN
PROMPT 1 1 "Numero registrazione " PROMPT 1 1 "Numero registrazione "
HELP "Inserire il numero di registrazione che si vuole modificare" HELP "Inserire il numero di registrazione che si vuole modificare"
FLAGS "RZ" FLAGS "RZ"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
NUMBER F_NUMRIG 2 NUMBER F_NUMRIG 2
BEGIN BEGIN
PROMPT 40 1 "Numero di riga " PROMPT 40 1 "Numero di riga "
HELP "Inserire il numero della riga desiderata. Se non viene specificata si entra in modifica della testata" HELP "Inserire il numero della riga desiderata. Se non viene specificata si entra in modifica della testata"
FLAGS "RZ" FLAGS "RZ"
END END
DATE F_DATAREG DATE F_DATAREG
BEGIN BEGIN
PROMPT 1 3 "Data registrazione " PROMPT 1 3 "Data registrazione "
END END
DATE F_DATACOMP DATE F_DATACOMP
BEGIN BEGIN
PROMPT 40 3 "Data competenza " PROMPT 40 3 "Data competenza "
END END
NUMBER F_ANNO 4 NUMBER F_ANNO 4
BEGIN BEGIN
PROMPT 68 3 "Anno " PROMPT 68 3 "Anno "
FLAGS "D" FLAGS "D"
END END
DATE F_DATADOC DATE F_DATADOC
BEGIN BEGIN
PROMPT 1 4 "Data del documento " PROMPT 1 4 "Data del documento "
END END
STRING F_NUMDOC 7 STRING F_NUMDOC 7
BEGIN BEGIN
PROMPT 40 4 "Numero documento " PROMPT 40 4 "Numero documento "
END END
STRING F_REGIVA 3 STRING F_REGIVA 3
BEGIN BEGIN
PROMPT 1 6 "Registro IVA " PROMPT 1 6 "Registro IVA "
FLAGS "UZ" FLAGS "UZ"
END END
STRING F_DESCRREG 49 STRING F_DESCRREG 49
BEGIN BEGIN
PROMPT 28 6 "" PROMPT 28 6 ""
FLAGS "D" FLAGS "D"
END END
NUMBER F_PROTIVA 5 NUMBER F_PROTIVA 5
BEGIN BEGIN
PROMPT 1 7 "Numero protocollo iva " PROMPT 1 7 "Numero protocollo iva "
FLAGS "R" FLAGS "R"
END END
NUMBER F_NUPROTIVA 5 NUMBER F_NUPROTIVA 5
BEGIN BEGIN
PROMPT 40 7 "Ultimo protoc. riepilog. " PROMPT 40 7 "Ultimo protoc. riepilog. "
FLAGS "R" FLAGS "R"
END END
STRING F_CODCAUS 3 STRING F_CODCAUS 3
BEGIN BEGIN
PROMPT 1 8 "Codice causale " PROMPT 1 8 "Codice causale "
FLAGS "Z" FLAGS "Z"
END END
STRING F_DESCRCAU 49 STRING F_DESCRCAU 49
BEGIN BEGIN
PROMPT 28 8 "" PROMPT 28 8 ""
FLAGS "D" FLAGS "D"
END END
STRING F_CODPAG 4 STRING F_CODPAG 4
BEGIN BEGIN
PROMPT 1 9 "Codice pagamento " PROMPT 1 9 "Codice pagamento "
END FLAGS "U#"
END
STRING F_DESCRPAG 48
BEGIN STRING F_DESCRPAG 48
PROMPT 29 9 "" BEGIN
FLAGS "D" PROMPT 29 9 ""
END FLAGS "D"
END
NUMBER F_GRUPPO 3
BEGIN NUMBER F_GRUPPO 3
PROMPT 1 11 "Sottoconto partita " BEGIN
FLAGS "R" PROMPT 1 11 "Sottoconto partita "
END FLAGS "R"
END
NUMBER F_CONTO 3
BEGIN NUMBER F_CONTO 3
PROMPT 29 11 "" BEGIN
FLAGS "R" PROMPT 29 11 ""
END FLAGS "R"
END
NUMBER F_SOTTOCONTO 6
BEGIN NUMBER F_SOTTOCONTO 6
PROMPT 34 11 "" BEGIN
FLAGS "R" PROMPT 34 11 ""
END FLAGS "R"
END
STRING F_DESCRPARTITA 50
BEGIN STRING F_DESCRPARTITA 50
PROMPT 1 12 "Descrizione partita " BEGIN
FLAGS "D" PROMPT 1 12 "Descrizione partita "
END FLAGS "D"
END
LIST F_SEZIONE 9
BEGIN LIST F_SEZIONE 9
PROMPT 1 13 "Sezione " BEGIN
ITEM " |Nessuna" PROMPT 1 13 "Sezione "
ITEM "D|Dare" ITEM " |Nessuna"
ITEM "A|Avere" ITEM "D|Dare"
CHECKTYPE REQUIRED ITEM "A|Avere"
WARNING "Valore non valido per sezione" CHECKTYPE REQUIRED
END WARNING "Valore non valido per sezione"
END
STRING F_DESCR 30
BEGIN STRING F_DESCR 30
PROMPT 1 14 "Descrizione aggiuntiva " BEGIN
END PROMPT 1 14 "Descrizione aggiuntiva "
END
NUMBER F_IMPORTO 15
BEGIN NUMBER F_IMPORTO 15
PROMPT 1 15 "Importo " BEGIN
FLAGS "R" PROMPT 1 15 "Importo "
PICTURE "." FLAGS "R"
END PICTURE "."
END
NUMBER F_GRUPPOC 3
BEGIN NUMBER F_GRUPPOC 3
PROMPT 1 16 "Sottoconto contropart. " BEGIN
FLAGS "R" PROMPT 1 16 "Sottoconto contropart. "
END FLAGS "R"
END
NUMBER F_CONTOC 3
BEGIN NUMBER F_CONTOC 3
PROMPT 29 16 "" BEGIN
FLAGS "R" PROMPT 29 16 ""
END FLAGS "R"
END
NUMBER F_SOTTOC 6
BEGIN NUMBER F_SOTTOC 6
PROMPT 34 16 "" BEGIN
FLAGS "R" PROMPT 34 16 ""
END FLAGS "R"
END
STRING F_DESCRCPARTITA 50
BEGIN STRING F_DESCRCPARTITA 50
PROMPT 1 17 "Descrizione c/partita " BEGIN
FLAGS "D" PROMPT 1 17 "Descrizione c/partita "
END FLAGS "D"
END
ENDPAGE
ENDPAGE
ENDMASK
ENDMASK