Patch level : 2.0 528

Files correlati     : batbbnp.uml
Ricompilazione Demo : [ ]
Commento            :

PG200005
La funzione "collega" legata al campo Banche di presentazioni non effettua nessuna azione


git-svn-id: svn://10.65.10.50/trunk@11328 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-07-22 09:23:25 +00:00
parent 3ab1d4d24d
commit abdf29e13d

View File

@ -15,7 +15,7 @@ END
NUMBER F_CODICEABI 5
BEGIN
PROMPT 2 1 "Codice ABI "
FIELD BNP->CODTAB[1,5]
FIELD CODTAB[1,5]
FLAGS "Z"
KEY 1
USE %BAN KEY 1 SELECT CODTAB ?= "?????"
@ -30,7 +30,7 @@ END
NUMBER F_CODICECAB 5
BEGIN
PROMPT 2 2 "Codice CAB "
FIELD BNP->CODTAB[6,10]
FIELD CODTAB[6,10]
FLAGS "Z"
KEY 1
USE %BAN KEY 1 SELECT CODTAB ?= "??????????"
@ -49,7 +49,7 @@ NUMBER F_ABI 5
BEGIN
PROMPT 2 1 "Codice ABI "
FLAGS "Z"
FIELD BNP->CODTAB[1,5]
FIELD CODTAB[1,5]
KEY 1
USE BNP KEY 1 SELECT CODTAB ?= "??????????"
JOIN %BAN ALIAS 100 INTO CODTAB==CODTAB
@ -67,7 +67,7 @@ NUMBER F_CAB 5
BEGIN
PROMPT 2 2 "Codice CAB "
FLAGS "Z"
FIELD BNP->CODTAB[6,10]
FIELD CODTAB[6,10]
KEY 1
USE BNP KEY 1 SELECT CODTAB ?= "??????????"
JOIN %BAN ALIAS 100 INTO CODTAB=CODTAB
@ -98,19 +98,19 @@ END
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 1 4 "Portafoglio Effetti all' incasso"
PROMPT 1 4 "@bPortafoglio Effetti all'incasso"
END
STRING F_CC_INC 20
BEGIN
PROMPT 2 5 "C/C "
FIELD BNP->S0
FIELD S0
END
STRING F_CC_CONT_INC 20
BEGIN
PROMPT 2 6 "C/Contabile "
FIELD BNP->S3
FIELD S3
END
NUMBER F_GRUPPO_INC 3
@ -207,26 +207,26 @@ END
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 1 10 "Portafoglio Effetti salvo buon fine"
PROMPT 1 10 "@bPortafoglio Effetti salvo buon fine"
END
STRING F_CC_SBF 20
BEGIN
PROMPT 2 11 "C/C "
FIELD BNP->S1
FIELD S1
END
NUMBER F_FIDO_SBF 20 2
BEGIN
PROMPT 38 11 "Fido "
FIELD BNP->R1
FIELD R1
PICTURE "###.###.###.###,@@"
END
STRING F_CC_CONT_SBF 20
BEGIN
PROMPT 2 12 "C/Contabile "
FIELD BNP->S4
FIELD S4
END
NUMBER F_GRUPPO_SBF 3
@ -277,26 +277,26 @@ END
GROUPBOX DLG_NULL 78 5
BEGIN
PROMPT 1 15 "Portafoglio Effetti allo sconto"
PROMPT 1 15 "@bPortafoglio Effetti allo sconto"
END
STRING F_CC_SCN 20
BEGIN
PROMPT 2 16 "C/C "
FIELD BNP->S2
FIELD S2
END
NUMBER F_FIDO_SCN 20 2
BEGIN
PROMPT 38 16 "Fido "
FIELD BNP->R2
FIELD R2
PICTURE "###.###.###.###,@@"
END
STRING F_CC_CONT_SCN 20
BEGIN
PROMPT 2 17 "C/Contabile "
FIELD BNP->S5
FIELD S5
END
NUMBER F_GRUPPO_SCN 3