effettuata modifica della maschera
git-svn-id: svn://10.65.10.50/trunk@3872 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
paola
parent
838e98f229
commit
850eee8323
@ -15,7 +15,7 @@ END
|
||||
|
||||
NUMBER F_NPROGTR 7
|
||||
BEGIN
|
||||
PROMPT 2 2 "Numero "
|
||||
PROMPT 2 2 "Numero "
|
||||
FIELD LF_EFFETTI->NPROGTR
|
||||
FLAGS "R"
|
||||
KEY 1
|
||||
@ -36,8 +36,8 @@ BEGIN
|
||||
END
|
||||
|
||||
NUMBER F_CODCF 6
|
||||
BEGIN
|
||||
PROMPT 2 3 "Cod. cliente "
|
||||
BEGIN
|
||||
PROMPT 2 3 "Cliente "
|
||||
FIELD LF_EFFETTI->CODCF
|
||||
USE LF_CLIFO
|
||||
INPUT TIPOCF "C"
|
||||
@ -59,24 +59,26 @@ END
|
||||
|
||||
STRING F_CFRAGSOC 50
|
||||
BEGIN
|
||||
PROMPT 25 3 ""
|
||||
PROMPT 26 3 ""
|
||||
USE LF_CLIFO KEY 2
|
||||
//JOIN LF_EFFETTI TO LF_CLIFO KEY 2 INTO CODCF==CODCF
|
||||
INPUT TIPOCF "C"
|
||||
INPUT RAGSOC F_CFRAGSOC
|
||||
DISPLAY "Ragione sociale@60" RAGSOC
|
||||
DISPLAY "Codice" CODCF
|
||||
/*DISPLAY "Nr. progressivo" LF_EFFETTI->NPROGTR
|
||||
/*
|
||||
DISPLAY "Nr. progressivo" LF_EFFETTI->NPROGTR
|
||||
DISPLAY "Data scadenza" LF_EFFETTI->DATASCAD
|
||||
DISPLAY "Tipo distinta" LF_EFFETTI->TIPODIST
|
||||
DISPLAY "Nr. distinta" LF_EFFETTI->NDIST*/
|
||||
DISPLAY "Nr. distinta" LF_EFFETTI->NDIST
|
||||
*/
|
||||
COPY OUTPUT F_CODCF
|
||||
CHECKTYPE REQUIRED
|
||||
END
|
||||
|
||||
DATE F_DATASCAD
|
||||
BEGIN
|
||||
PROMPT 2 4 "Data scadenza "
|
||||
BEGIN
|
||||
PROMPT 2 4 "Data scadenza "
|
||||
FIELD LF_EFFETTI->DATASCAD
|
||||
KEY 3
|
||||
USE LF_EFFETTI KEY 3
|
||||
@ -94,8 +96,8 @@ BEGIN
|
||||
END
|
||||
|
||||
LIST F_TIPOPAG 24
|
||||
BEGIN
|
||||
PROMPT 2 6 "Tipo pagamento "
|
||||
BEGIN
|
||||
PROMPT 2 6 "Tipo pagamento "
|
||||
FIELD LF_EFFETTI->TIPOPAG
|
||||
ITEM "2|Tratta"
|
||||
ITEM "3|Ricevuta Bancaria"
|
||||
@ -108,8 +110,8 @@ BEGIN
|
||||
END
|
||||
|
||||
STRING F_ULTCLASS 1
|
||||
BEGIN
|
||||
PROMPT 46 6 "Ulteriore classificazione "
|
||||
BEGIN
|
||||
PROMPT 46 6 "Ulteriore classificazione "
|
||||
FIELD LF_EFFETTI->ULTCLASS
|
||||
USE %CLR
|
||||
INPUT CODTAB[1,1] F_TIPOPAG SELECT
|
||||
@ -120,8 +122,8 @@ BEGIN
|
||||
END
|
||||
|
||||
STRING F_CODVAL 3
|
||||
BEGIN
|
||||
PROMPT 2 7 "Codice valuta "
|
||||
BEGIN
|
||||
PROMPT 2 7 "Codice valuta "
|
||||
FIELD LF_EFFETTI->CODVAL
|
||||
FLAGS "UZ"
|
||||
USE %VAL
|
||||
@ -133,8 +135,8 @@ BEGIN
|
||||
END
|
||||
|
||||
DATA F_DATACAM
|
||||
BEGIN
|
||||
PROMPT 46 7 "Data cambio "
|
||||
BEGIN
|
||||
PROMPT 46 7 "Data cambio "
|
||||
FIELD LF_EFFETTI->DATACAMBIO
|
||||
FLAGS "R"
|
||||
USE CAM
|
||||
@ -151,7 +153,7 @@ END
|
||||
|
||||
NUMBER F_CAMBIO 15 5
|
||||
BEGIN
|
||||
PROMPT 2 8 "Cambio "
|
||||
PROMPT 2 8 "Cambio "
|
||||
FIELD LF_EFFETTI->CAMBIO
|
||||
FLAGS "RU"
|
||||
PICTURE ".5"
|
||||
@ -161,7 +163,7 @@ BEGIN
|
||||
END
|
||||
|
||||
BOOLEAN F_ULTRATA
|
||||
BEGIN
|
||||
BEGIN
|
||||
PROMPT 46 8 "Ultima rata"
|
||||
FIELD LF_EFFETTI->ULTRATA
|
||||
END
|
||||
@ -219,7 +221,7 @@ BEGIN
|
||||
END
|
||||
|
||||
NUMBER F_CODCAB 5
|
||||
BEGIN
|
||||
BEGIN
|
||||
PROMPT 2 3 "Codice CAB "
|
||||
FIELD LF_EFFETTI->CODCAB
|
||||
FLAGS "RZ"
|
||||
@ -242,7 +244,7 @@ BEGIN
|
||||
END
|
||||
|
||||
NUMBER F_CODABIP 5
|
||||
BEGIN
|
||||
BEGIN
|
||||
PROMPT 42 2 "Codice ABI "
|
||||
FIELD LF_EFFETTI->CODABIP
|
||||
FLAGS "RZ"
|
||||
@ -280,14 +282,14 @@ BEGIN
|
||||
END
|
||||
|
||||
DATE F_DATAEMISS
|
||||
BEGIN
|
||||
PROMPT 2 6 "Data di emissione "
|
||||
BEGIN
|
||||
PROMPT 2 6 "Data di emissione "
|
||||
FIELD LF_EFFETTI->DATAEMISS
|
||||
END
|
||||
|
||||
NUMBER F_NUMEMISS 8
|
||||
BEGIN
|
||||
PROMPT 42 6 "Nr. di emissione "
|
||||
BEGIN
|
||||
PROMPT 42 6 "Nr. di emissione "
|
||||
FIELD LF_EFFETTI->NUMEMISS
|
||||
END
|
||||
|
||||
@ -303,8 +305,8 @@ BEGIN
|
||||
END
|
||||
|
||||
LIST F_TIPODIST 15
|
||||
BEGIN
|
||||
PROMPT 2 10 "Tipo distinta "
|
||||
BEGIN
|
||||
PROMPT 2 10 "Tipo distinta "
|
||||
FIELD LF_EFFETTI->TIPODIST
|
||||
ITEM " |** Nessuno **"
|
||||
MESSAGE DISABLE,2@|RESET,2@
|
||||
@ -317,8 +319,8 @@ BEGIN
|
||||
END
|
||||
|
||||
NUMBER F_NDIST 8
|
||||
BEGIN
|
||||
PROMPT 52 10 "Nr. distinta "
|
||||
BEGIN
|
||||
PROMPT 42 10 "Nr. distinta "
|
||||
FIELD LF_EFFETTI->NDIST
|
||||
FLAGS "D"
|
||||
VALIDATE NOT_EMPTY_FUNC
|
||||
@ -327,8 +329,8 @@ BEGIN
|
||||
END
|
||||
|
||||
DATE F_DATADIST
|
||||
BEGIN
|
||||
PROMPT 2 11 "Data distinta "
|
||||
BEGIN
|
||||
PROMPT 2 11 "Data distinta "
|
||||
FIELD LF_EFFETTI->DATADIST
|
||||
FLAGS "D"
|
||||
GROUP 2
|
||||
@ -343,8 +345,8 @@ BEGIN
|
||||
END
|
||||
|
||||
NUMBER F_NRIGADIST 6
|
||||
BEGIN
|
||||
PROMPT 52 12 "Nr. di riga "
|
||||
BEGIN
|
||||
PROMPT 42 12 "Nr. di riga "
|
||||
FIELD LF_EFFETTI->NRIGADIST
|
||||
FLAGS "D"
|
||||
GROUP 2
|
||||
@ -356,14 +358,14 @@ BEGIN
|
||||
END
|
||||
|
||||
DATE F_DATARIBA
|
||||
BEGIN
|
||||
PROMPT 2 15 "Data Ri.Ba. "
|
||||
BEGIN
|
||||
PROMPT 2 15 "Data Ri.Ba. "
|
||||
FIELD LF_EFFETTI->DATARIBA
|
||||
END
|
||||
|
||||
BOOLEAN F_DISRIBAEST
|
||||
BEGIN
|
||||
PROMPT 52 15 "Distinta Ri.Ba. estratta"
|
||||
BEGIN
|
||||
PROMPT 42 15 "Distinta Ri.Ba. estratta"
|
||||
FIELD LF_EFFETTI->DISRIBAEST
|
||||
END
|
||||
|
||||
@ -375,7 +377,7 @@ END
|
||||
|
||||
BOOLEAN F_EFFCOMP
|
||||
BEGIN
|
||||
PROMPT 52 17 "Effetto completato"
|
||||
PROMPT 42 17 "Effetto completato"
|
||||
FIELD LF_EFFETTI->EFFCOMP
|
||||
END
|
||||
|
||||
@ -383,9 +385,14 @@ ENDPAGE
|
||||
|
||||
PAGE "Gestione Effetti 3/3" 0 -1 0 19
|
||||
|
||||
TEXT DLG_NULL
|
||||
BEGIN
|
||||
PROMPT 3 1 "OBBLIGATI PRINCIPALI"
|
||||
END
|
||||
|
||||
SPREADSHEET F_SHEET_EFF 76 8
|
||||
BEGIN
|
||||
PROMPT 2 1 "OBBLIGATI PRINCIPALI"
|
||||
PROMPT 3 2 "OBBLIGATI PRINCIPALI"
|
||||
ITEM "Ragione Sociale@50"
|
||||
ITEM "Localita'@35"
|
||||
ITEM "Stato"
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user