cg2100a.uml Aggiunte cornicette alla triste prima maschera di prima nota

cg2102.cpp     Adattato iva_notify al nuovo comportamento del K_INS


git-svn-id: svn://10.65.10.50/trunk@4016 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 1996-12-18 08:55:28 +00:00
parent 52f005ea2a
commit 80e5795a0b
2 changed files with 17 additions and 11 deletions

View File

@ -8,12 +8,12 @@ PAGE "Ricerca" -1 -1 77 8
GROUPBOX DLG_NULL 78 3 GROUPBOX DLG_NULL 78 3
BEGIN BEGIN
PROMPT 1 0 "" PROMPT 1 1 "@bDitta"
END END
NUMBER F_CODDITTA 5 NUMBER F_CODDITTA 5
BEGIN BEGIN
PROMPT 3 1 "Ditta " PROMPT 3 2 "Codice "
FLAGS "FRD" FLAGS "FRD"
USE LF_NDITTE USE LF_NDITTE
CHECKTYPE NORMAL CHECKTYPE NORMAL
@ -23,13 +23,19 @@ END
STRING F_RAGSOC 50 STRING F_RAGSOC 50
BEGIN BEGIN
PROMPT 17 1 "Ragione " PROMPT 17 2 "Ragione "
FLAGS "D" FLAGS "D"
END END
GROUPBOX DLG_NULL 78 8
BEGIN
PROMPT 1 5 "@bMovimento di prima nota"
FLAGS "R"
END
NUMBER F_NUMREG 6 NUMBER F_NUMREG 6
BEGIN BEGIN
PROMPT 1 4 "Numero operazione " PROMPT 3 6 "Numero operazione "
HELP "Numero del movimento di prima nota da gestire" HELP "Numero del movimento di prima nota da gestire"
FLAGS "R" FLAGS "R"
FIELD LF_MOV->NUMREG FIELD LF_MOV->NUMREG
@ -47,7 +53,7 @@ END
DATE F_DATAREG DATE F_DATAREG
BEGIN BEGIN
PROMPT 1 6 "Data operazione " PROMPT 3 8 "Data operazione "
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
HELP "Data in cui viene registrata l'operazione" HELP "Data in cui viene registrata l'operazione"
MESSAGE COPY,F_ANNOIVA,7,10 MESSAGE COPY,F_ANNOIVA,7,10
@ -55,26 +61,26 @@ END
NUMBER F_ANNOIVA 4 NUMBER F_ANNOIVA 4
BEGIN BEGIN
PROMPT 51 6 "Anno IVA " PROMPT 52 8 "Anno IVA "
FLAGS "D" FLAGS "D"
END END
DATE F_DATACOMP DATE F_DATACOMP
BEGIN BEGIN
PROMPT 1 7 "Data di competenza " PROMPT 3 9 "Data di competenza "
HELP "Data di competenza dell'operazione" HELP "Data di competenza dell'operazione"
CHECKTYPE REQUIRED CHECKTYPE REQUIRED
END END
NUMBER F_ANNOES 4 NUMBER F_ANNOES 4
BEGIN BEGIN
PROMPT 51 7 "Codice esercizio " PROMPT 52 9 "Codice esercizio "
FLAGS "DRZ" FLAGS "DRZ"
END END
STRING F_CODCAUS 3 STRING F_CODCAUS 3
BEGIN BEGIN
PROMPT 1 9 "Causale " PROMPT 3 11 "Causale "
FLAGS "UZ" FLAGS "UZ"
FIELD CODCAUS FIELD CODCAUS
USE LF_CAUSALI USE LF_CAUSALI
@ -92,7 +98,7 @@ END
STRING F_DESCRCAUS 50 STRING F_DESCRCAUS 50
BEGIN BEGIN
PROMPT 21 9 "" PROMPT 23 11 ""
USE LF_CAUSALI KEY 2 USE LF_CAUSALI KEY 2
CHECKTYPE NORMAL CHECKTYPE NORMAL
INPUT DESCR F_DESCRCAUS INPUT DESCR F_DESCRCAUS

View File

@ -1220,7 +1220,7 @@ bool TPrimanota_application::iva_notify(TSheet_field& iva, int r, KEY k)
if (a._as400) if (a._as400)
return TRUE; return TRUE;
if (k = K_INS || k == K_CTRL+K_DEL) if (k == K_INS || k == K_CTRL+K_DEL)
return TRUE; return TRUE;
TToken_string& row = iva.row(r); TToken_string& row = iva.row(r);