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

Corretto errore aga0193

Browse Source 
Aggiunta copia da F_CODVAL a f_CODVAL1


git-svn-id: svn://10.65.10.50/trunk@5712 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
alex 1997-12-09 10:53:43 +00:00
parent 3467281fc2
commit 20f50689d7
1 changed files with 43 additions and 40 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

83
ve/ve0300a.src
View File

@ -62,49 +62,51 @@
#include "veuml1.h" #include "veuml1.h"
#include "veini.h" #include "veini.h"
[TIPOCF] // non dovrebbero piu' servire !!!!!
GROUP=101 //
X=1 //[TIPOCF]
Y=1 //GROUP=101
FIELDNAME=TIPOCF //X=1
MSKID=F_TIPOCF //Y=1
TYPE=T_STRINGA //FIELDNAME=TIPOCF
SIZE=1 //MSKID=F_TIPOCF
PROMPT=Tipo cliente/fornitore //TYPE=T_STRINGA
//SIZE=1
//PROMPT=Tipo cliente/fornitore
[CODCF] //[CODCF]
GROUP=100 //GROUP=100
X=1 //X=1
Y=1 //Y=1
FIELDNAME=CODCF //FIELDNAME=CODCF
MSKID=F_CODCF //MSKID=F_CODCF
TYPE=T_NUMERO //TYPE=T_NUMERO
// se CODCF="F" cioe' fornitore il PROMPT=Fornitore // se CODCF="F" cioe' fornitore il PROMPT=Fornitore
PROMPT=Cliente //PROMPT=Cliente
SIZE=6 //SIZE=6
FLAG=R //FLAG=R
USE=20~JO LF_CFVEN TO LF_CLIFO INTO TIPOCF=TIPOCF CODCF=CODCF //USE=20~JO LF_CFVEN TO LF_CLIFO INTO TIPOCF=TIPOCF CODCF=CODCF
INPUT=TIPOCF F_TIPOCF SELECT~CODCF F_CODCF //INPUT=TIPOCF F_TIPOCF SELECT~CODCF F_CODCF
DISPLAY="Codice" CODCF~"Ragione sociale@50" RAGSOC~"Indirizzo@35" INDCF //DISPLAY="Codice" CODCF~"Ragione sociale@50" RAGSOC~"Indirizzo@35" INDCF
OUTPUT=F_CODCF CODCF~F_RAGSOC RAGSOC~F_INDCF INDCF~F_CIVCF CIVCF~F_CODAG CODAG~F_CODVAL CODVAL~F_OCCAS OCCAS~F_CODLIN CODLIN~F_CODABIA CODABI~F_CODCABA CODCAB~F_CODLIST LF_CFVEN->CODLIST~F_CODPAG CODPAG //OUTPUT=F_CODCF CODCF~F_RAGSOC RAGSOC~F_INDCF INDCF~F_CIVCF CIVCF~F_CODAG CODAG~F_OCCAS OCCAS~F_CODLIN CODLIN~F_CODABIA CODABI~F_CODCABA CODCAB~F_CODLIST LF_CFVEN->CODLIST~F_CODPAG CODPAG
SPECIAL=ME 9,F_CODVAL~ME 9,F_CODLIN~ME 9,F_CODABIA~ME 9,F_CODCABA~ME 9,F_CODPAG //SPECIAL=ME 9,F_CODLIN~ME 9,F_CODABIA~ME 9,F_CODCABA~ME 9,F_CODPAG
WARNING=Cliente non presente //WARNING=Cliente non presente
HELP=Inserire il codice del cliente //HELP=Inserire il codice del cliente
[RAGSOC] //[RAGSOC]
// il campo e' letto nel file 20 clifo /// il campo e' letto nel file 20 clifo
GROUP=100 //GROUP=100
X=15 //X=15
Y=1 //Y=1
MSKID=F_RAGSOC //MSKID=F_RAGSOC
TYPE=T_STRINGA //TYPE=T_STRINGA
SIZE=50 //SIZE=50
USE=LF_CLIFO KE 2 //USE=LF_CLIFO KE 2
INPUT=TIPOCF F_TIPOCF SELECT~RAGSOC F_RAGSOC //INPUT=TIPOCF F_TIPOCF SELECT~RAGSOC F_RAGSOC
DISPLAY="Ragione sociale@50" RAGSOC~"Codice" CODCF~"Indirizzo@35" INDCF //DISPLAY="Ragione sociale@50" RAGSOC~"Codice" CODCF~"Indirizzo@35" INDCF
OUTPUT=F_CODCF CODCF~F_RAGSOC RAGSOC //OUTPUT=F_CODCF CODCF~F_RAGSOC RAGSOC
WARNING=Ragione sociale non trovata //WARNING=Ragione sociale non trovata
HELP=Inserire la ragione sociale della ditta //HELP=Inserire la ragione sociale della ditta
[OCCASEDIT] [OCCASEDIT]
GROUP=100 GROUP=100
@ -301,6 +303,7 @@ DISPLAY="Codice" CODTAB~"Descrizione@50" S0~"Cambio@15" R10~"Data valuta" D0
OUTPUT=F_CODVAL CODTAB~F_NOMEVAL S0~F_CAMBIO R10~F_DATACAMBIO D0 OUTPUT=F_CODVAL CODTAB~F_NOMEVAL S0~F_CAMBIO R10~F_DATACAMBIO D0
WARNING=Codice valuta non trovato WARNING=Codice valuta non trovato
HELP=Inserisci il codice della valuta HELP=Inserisci il codice della valuta
SPECIAL=ME CO,F_CODVAL1
[CODVAL2] [CODVAL2]
//se codice=LIT il campo cambio e' di sola visualizzazione //se codice=LIT il campo cambio e' di sola visualizzazione