Patch level : 2.0 242

Files correlati     : ef0.exe
Ricompilazione Demo : [ ]
Commento            :

PG200007
Presupposti: fattura accompagnatoria passiva da ordine fornitore: creato
tipo documento fattura accompagnatoria con causale di magazzino di carico
merce da ordine,utilizzo dello stesso numeratore delle fatture da d.d.t.ed
elaborazione differita di tipo "consegna ordini" che parte dall'ordine
fornitore ed arriva alla fattura (stato 1).La funzione di "elabora"  dai
documenti interattivi (ordine ) pur riscontrando che le elaborazioni sono
due non modifica la destinazione mentre per il documento interattivo
(fattura) non è presente nessun tipo di elaborazione


git-svn-id: svn://10.65.10.50/trunk@11356 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
guy 2003-07-30 10:59:43 +00:00
parent 8ee4750f53
commit ff6d6fbbcb
4 changed files with 774 additions and 222 deletions

View File

@ -153,7 +153,7 @@ BEGIN
DRIVENBY F_CODVAL
END
BUTTON F_IMPBUTTON 9 2
BUTTON F_IMPBUTTON 10 2
BEGIN
PROMPT 50 7 "~Selezione"
PICTURE BMP_SELECT

File diff suppressed because it is too large Load Diff

View File

@ -8,14 +8,24 @@
#define F_DUMMYDIST 208
#define F_DATADIST 209
#define F_CODVAL 210
#define F_CAMBIO 211
#define F_CLIFO 212
#define F_TIPOPAG 213
#define F_TOTAL 220
#define F_EURO 211
#define F_CAMBIO 212
#define F_DATACAMBIO 213
#define F_DESCAB 214
#define F_SORT 215
#define F_CLIFO 220
#define F_RAGSOCCF 221
#define F_TIPOPAG 222
#define F_TOTAL 230
#define F_SPESE 231
#define F_TIPOEFF 232
#define F_SHEET 300
#define F_AGGIORNA 301
#define F_CONTABILI 302
#define F_UNCONTABIL 303
#define F_TIPOPAGEFF 401
#define F_PAGA 100
#define F_IMPORTO 101
@ -30,4 +40,4 @@
#define F_DATA 110
#define F_RIGADIST 111
#define F_RIGAEFF 112
#define F_DESC_TIPO 113

View File

@ -2,9 +2,21 @@
TOOLBAR "Toolbar" 0 -3 0 3
BUTTON F_UNCONTABIL 30
BEGIN
PROMPT -12 0 "~Annulla contabilizzazione"
FLAGS "H"
END
BUTTON F_CONTABILI 30
BEGIN
PROMPT -22 0 "~Contabilizzazione"
GROUP 5
END
BUTTON DLG_NEWREC 10 2
BEGIN
PROMPT -16 -11 "~Nuovo"
PROMPT -16 -1 "~Nuovo"
PICTURE BMP_NEWREC
PICTURE BMP_NEWRECDN
GROUP 3
@ -12,15 +24,16 @@ END
BUTTON DLG_SAVEREC 10 2
BEGIN
PROMPT -26 -11 ""
PROMPT -26 -1 "~Registra"
PICTURE BMP_SAVEREC
PICTURE BMP_SAVERECDN
GROUP 5
END
BUTTON DLG_DELREC 10 2
BEGIN
PROMPT -36 -11 ""
PROMPT -36 -1 "~Elimina"
PICTURE BMP_DELREC
PICTURE BMP_DELRECDN
GROUP 5
@ -28,25 +41,25 @@ END
BUTTON DLG_PRINT 10 2
BEGIN
PROMPT -46 -11 ""
PROMPT -46 -1 ""
PICTURE BMP_PRINT
END
BUTTON DLG_CANCEL 10 2
BEGIN
PROMPT -56 -11 ""
PROMPT -56 -1 ""
END
BUTTON DLG_QUIT 10 2
BEGIN
PROMPT -66 -11 ""
PROMPT -66 -1 ""
END
ENDPAGE
PAGE "Distite Pagamento" -1 -1 78 19
PAGE "Disposizioni incassi/pagamenti" -1 -1 78 19
GROUPBOX DLG_NULL 78 5
GROUPBOX DLG_NULL 78 6
BEGIN
PROMPT 1 0 "@bDistinta"
END
@ -55,8 +68,11 @@ LIST F_TIPODIST 1 15
BEGIN
PROMPT 2 1 "Tipo "
ITEM "I|All'incasso"
ITEM "B|Salvo buon fine"
MESSAGE ENABLE,F_TIPOEFF
ITEM "B|Salvo buon fine"
MESSAGE RESET,F_TIPOEFF|DISABLE,F_TIPOEFF
ITEM "S|Allo sconto"
MESSAGE RESET,F_TIPOEFF|DISABLE,F_TIPOEFF
GROUP 3
END
@ -69,7 +85,7 @@ END
NUMBER F_DIST 5
BEGIN
PROMPT 30 1 "Numero "
PROMPT 28 1 "Numero "
USE LF_EFFETTI KEY 4 SELECT NRIGADIST==1
INPUT TIPODIST F_TIPODIST
INPUT NDIST F_DIST
@ -85,27 +101,40 @@ BEGIN
OUTPUT F_DIST NDIST
OUTPUT F_DATADIST DATADIST
OUTPUT F_CODVAL CODVAL
OUTPUT F_CAMBIO CAMBIO
OUTPUT F_DATACAMBIO DATACAMBIO
OUTPUT F_EURO CONTROEURO
OUTPUT F_TIPOCF TIPOCF
OUTPUT F_ABI CODABIP
OUTPUT F_CAB CODCABP
OUTPUT F_TIPOPAG TIPOPAG
OUTPUT F_SPESE SPESE
CHECKTYPE SEARCH
GROUP 4
END
STRING F_CODVAL 3
BEGIN
PROMPT 53 1 "Valuta "
PROMPT 50 1 "Valuta "
FLAGS "UZ"
USE %VAL
INPUT CODTAB F_CODVAL
DISPLAY "Codice" CODTAB
DISPLAY "Codice" CODTAB
DISPLAY "Cambio\nStandard" S4
DISPLAY "Contro\nEuro@6" B1
DISPLAY "Denominazione@50" S0
OUTPUT F_CODVAL CODTAB
OUTPUT F_EURO B1
CHECKTYPE NORMAL
GROUP 3
MESSAGE EMPTY CLEAR,F_CAMBIO
MESSAGE ENABLE,F_CAMBIO
MESSAGE EMPTY CLEAR,6@
MESSAGE ENABLE,6@
END
BOOLEAN F_EURO
BEGIN
PROMPT 64 1 "Contro Euro"
FLAGS "D"
END
DATE F_DATADIST
@ -115,9 +144,29 @@ BEGIN
CHECKTYPE REQUIRED
END
NUMBER F_CAMBIO 15 5
DATE F_DATACAMBIO
BEGIN
PROMPT 53 2 "Cambio "
PROMPT 23 2 "Data cambio "
FLAGS "R"
USE CAM
JOIN %VAL ALIAS 104 INTO CODTAB[1,3]==CODTAB[1,3]
INPUT CODTAB[1,3] F_CODVAL SELECT
INPUT CODTAB[4,11] F_DATACAMBIO
DISPLAY "Cod" CODTAB[1,3]
DISPLAY "Data@10" D0
DISPLAY "Cambio" S4
DISPLAY "Parita'\nEuro@6" B1
DISPLAY "Valuta@50" 104@->S0
OUTPUT F_DATACAMBIO D0
OUTPUT F_CAMBIO S4
CHECKTYPE SEARCH
GROUP 6
END
NUMBER F_CAMBIO 15 6
BEGIN
PROMPT 50 2 "Cambio "
GROUP 6
END
NUMBER F_ABI 5
@ -133,7 +182,8 @@ BEGIN
DISPLAY "Denominazione@50" 100@->S0
OUTPUT F_ABI CODTAB[1,5]
OUTPUT F_CAB CODTAB[6,10]
CHECKTYPE REQUIRED
OUTPUT F_DESCAB 100@->S0
CHECKTYPE SEARCH
END
NUMBER F_CAB 5
@ -144,9 +194,24 @@ BEGIN
CHECKTYPE REQUIRED
END
STRING F_DESCAB 50 48
BEGIN
PROMPT 26 3 ""
USE %BAN KEY 2 SELECT 100@->CODTAB!=""
JOIN BNP ALIAS 100 INTO CODTAB==CODTAB
INPUT S0 F_DESCAB
DISPLAY "Denominazione@50" S0
DISPLAY "ABI@5" CODTAB[1,5]
DISPLAY "CAB@5" CODTAB[6,10]
OUTPUT F_ABI CODTAB[1,5]
OUTPUT F_CAB CODTAB[6,10]
OUTPUT F_DESCAB S0
CHECKTYPE SEARCH
END
LIST F_TIPOPAG 1 30
BEGIN
PROMPT 35 3 "Pagamento "
PROMPT 2 4 "Pagamento "
ITEM "1|Rimessa Diretta"
ITEM "2|Tratta"
ITEM "3|Ricevuta Bancaria"
@ -158,50 +223,77 @@ BEGIN
ITEM "9|Bonifico"
END
LIST F_TIPOCF 1 10
LIST F_TIPOEFF 1 10
BEGIN
PROMPT 2 5 "Seleziona "
PROMPT 50 4 "Tipo effetti "
ITEM "C|Attivi"
MESSAGE COPY,F_TIPOCF
ITEM "F|Passivi"
MESSAGE COPY,F_TIPOCF
END
LIST F_TIPOCF 1 9
BEGIN
PROMPT 2 6 ""
ITEM "C|Cliente"
ITEM "F|Fornitore"
GROUP 3
FLAGS "D"
//GROUP 3
END
NUMBER F_CLIFO 6
BEGIN
PROMPT 38 5 ""
PROMPT 15 6 ""
USE LF_CLIFO
INPUT TIPOCF F_TIPOCF SELECT
INPUT CODCF F_CLIFO
DISPLAY "Codice" CODCF
DISPLAY "Ragione Sociale@50" RAGSOC
OUTPUT F_CLIFO CODCF
OUTPUT F_RAGSOCCF RAGSOC
CHECKTYPE NORMAL
END
STRING F_RAGSOCCF 50 37
BEGIN
PROMPT 25 6 ""
USE LF_CLIFO KEY 2
INPUT TIPOCF F_TIPOCF SELECT
INPUT RAGSOC F_RAGSOCCF
DISPLAY "Ragione Sociale@50" RAGSOC
DISPLAY "Codice" CODCF
COPY OUTPUT F_CLIFO
CHECKTYPE NORMAL
GROUP 4
END
DATE F_DA_DATA
BEGIN
PROMPT 2 6 "Dalla data "
GROUP 4
PROMPT 2 7 "Dal "
END
DATE F_A_DATA
BEGIN
PROMPT 28 6 "Alla data "
PROMPT 20 7 "Al "
FLAGS "A"
GROUP 4
END
LISTBOX F_SORT 10
BEGIN
PROMPT 35 7 "Ordinamento "
ITEM " |Standard"
ITEM "1|Scadenza"
ITEM "2|Residuo"
END
BUTTON F_AGGIORNA 10 2
BEGIN
PROMPT 66 5 ""
PROMPT 66 6 ""
PICTURE BMP_SELECT
GROUP 4
END
END
SPREADSHEET F_SHEET 0 -2
BEGIN
PROMPT 0 7 ""
PROMPT 0 8 ""
ITEM "Importo@18"
ITEM "A/S@3"
ITEM "Residuo@18"
@ -211,25 +303,46 @@ BEGIN
ITEM "Partita"
ITEM "Riga"
ITEM "Rata"
ITEM "Data@10"
ITEM "Scadenza@10"
ITEM "Riga"
ITEM "Effetto"
ITEM "Effetto"
ITEM "Tipo Pagamento@20"
END
CURRENCY F_TOTAL 18
BEGIN
PROMPT 2 -1 "Totale "
PROMPT 1 -1 "Totale "
DRIVENBY F_CODVAL
FLAGS "D"
END
BUTTON F_CONTABILI 30
CURRENCY F_SPESE 18
BEGIN
PROMPT 41 -1 "~Contabilizzazione"
GROUP 5
PROMPT 28 -1 "Spese "
END
ENDPAGE
PAGE "Selezione effetti" -1 -1 78 19
LIST F_TIPOPAGEFF 1 30
BEGIN
PROMPT 2 1 "Solo effetti con tipo pagamento "
ITEM " | "
ITEM "1|Rimessa Diretta"
ITEM "2|Tratta"
ITEM "3|Ricevuta Bancaria"
ITEM "4|Cessione"
ITEM "5|Paghero'"
ITEM "6|Lettera di credito"
ITEM "7|Tratta accettata"
ITEM "8|Rapporti interbancari diretti"
ITEM "9|Bonifico"
END
ENDPAGE
ENDMASK
PAGE "Rate" -1 -1 60 9
@ -267,7 +380,7 @@ END
STRING F_PARTITA 7
BEGIN
PROMPT 21 3 "Partita "
FLAGS "D"
FLAGS "D_"
END
NUMBER F_RIGA 4
@ -284,7 +397,7 @@ END
DATE F_DATA
BEGIN
PROMPT 1 4 "Data "
PROMPT 1 4 "Scadenza"
FLAGS "D"
END
@ -308,6 +421,12 @@ BEGIN
ITEM "S|Saldo"
END
STRING F_DESC_TIPO 20
BEGIN
PROMPT 1 7 "Tipo pagamento "
FLAGS "D"
END
BUTTON F_PAGA 10 2
BEGIN
PROMPT -13 -1 "~Paga"
@ -325,4 +444,4 @@ END
ENDPAGE
ENDMASK
ENDMASK