fbce256e5d
Files correlati : pr0.exe pr0700b.msk pr1.exe pr1100.msk pr1100a.frm pr1300a.frm pr1300a.msk Ricompilazione Demo : [ ] Commento : GF20035 Le stampe vengono visualizzate, ma se vengono inviate alla stampante non stampa nulla e poi uscendo dalle voci di menù appare il messaggio: "PR1 questo programma ha eseguito un'operazione non valida e sarà terminato". GF20036 Vengono riportati gli importi solo delle provvigioni da liquidare al momento della fatturazione, mentre per quelli da liquidare al momento del pagamento non viene riporatto nulla. GF20037 Se clicco due volte sulla riga che riporata gli estremi della fattura sulla quale la provvigione è stata calcolata i tasti ANNULLA / CONFERMA / ELIMINA non sono allineati correttamente. GF20038 La % di provvigione che mi presenta nella relativa colonna in riferimento in corrispondenza della rata non numerata non è corretta. (allego l'area dati d'esempio sulla quale si può notare l'errore). Secondo me dovrebbe essere zero git-svn-id: svn://10.65.10.50/trunk@11233 c028cbd2-c16b-5b4b-a496-9718f37d4682
131 lines
2.1 KiB
Plaintext
Executable File
131 lines
2.1 KiB
Plaintext
Executable File
#include "pr1300a.h"
|
|
|
|
PAGE "Stampa schede di provvigione" -1 -1 78 18
|
|
|
|
STRING F_DAAGE 5
|
|
BEGIN
|
|
PROMPT 2 1 "Da agente "
|
|
FLAGS "UZ"
|
|
USE LF_AGENTI
|
|
INPUT CODAGE F_DAAGE
|
|
DISPLAY "Codice" CODAGE
|
|
DISPLAY "Descr@50" RAGSOC
|
|
OUTPUT F_DAAGE CODAGE
|
|
GROUP G_CODAGE
|
|
END
|
|
|
|
STRING F_AAGE 5
|
|
BEGIN
|
|
PROMPT 35 1 "A agente "
|
|
FLAGS "UZ"
|
|
COPY USE F_DAAGE
|
|
INPUT CODAGE F_AAGE
|
|
COPY DISPLAY F_DAAGE
|
|
OUTPUT F_AAGE CODAGE
|
|
GROUP G_CODAGE
|
|
END
|
|
|
|
LIST F_DEFINITIVA 15
|
|
BEGIN
|
|
PROMPT 2 3 "Stampa "
|
|
ITEM "P|provvisoria"
|
|
MESSAGE ENABLE,F_FILTRO
|
|
ITEM "D|definitiva"
|
|
MESSAGE "D",F_FILTRO|DISABLE,F_FILTRO
|
|
END
|
|
|
|
LIST F_FILTRO 30
|
|
BEGIN
|
|
PROMPT 35 3 "Stampo "
|
|
ITEM "|tutte le provvigioni"
|
|
ITEM "D|solo le provv. da pagare"
|
|
ITEM "P|solo le provv. gia' pagate"
|
|
END
|
|
|
|
BOOL F_RAGGCLI
|
|
BEGIN
|
|
PROMPT 2 5 "Raggruppo i clienti"
|
|
MESSAGE TRUE "X",F_RAGGDOC|DISABLE,F_RAGGDOC
|
|
MESSAGE FALSE ENABLE,F_RAGGDOC
|
|
END
|
|
|
|
BOOL F_RAGGDOC
|
|
BEGIN
|
|
PROMPT 35 5 "Raggruppo i documenti"
|
|
MESSAGE TRUE "X",F_RAGGRATE|DISABLE,F_RAGGRATE|"",F_TIPODOC|DISABLE, F_TIPODOC
|
|
MESSAGE FALSE ENABLE,F_RAGGRATE|ENABLE,F_TIPODOC
|
|
END
|
|
|
|
BOOL F_RAGGRATE
|
|
BEGIN
|
|
PROMPT 2 7 "Raggruppo le rate"
|
|
END
|
|
|
|
BOOL F_NOZERO
|
|
BEGIN
|
|
PROMPT 35 7 "Non stampare doc. con provvigione nulla"
|
|
END
|
|
|
|
STRING F_TIPODOC 4
|
|
BEGIN
|
|
PROMPT 2 9 "Tipo doc. "
|
|
HELP "Codice tipo documento"
|
|
USE %TIP SELECT B3=="X"
|
|
INPUT CODTAB F_TIPODOC
|
|
DISPLAY "Codice" CODTAB
|
|
DISPLAY "Descrizione@50" S0
|
|
OUTPUT F_TIPODOC CODTAB
|
|
CHECKTYPE NORMAL
|
|
FLAG "UP"
|
|
END
|
|
|
|
DATE F_DADATA
|
|
BEGIN
|
|
PROMPT 2 11 "Da data "
|
|
END
|
|
|
|
DATE F_ADATA
|
|
BEGIN
|
|
PROMPT 35 11 "A data "
|
|
END
|
|
|
|
STRING F_FORMULA 10
|
|
BEGIN
|
|
PROMPT 2 13 "Stampa "
|
|
USE %FRD
|
|
FLAG "U"
|
|
CHECKTYPE NORMAL
|
|
INPUT CODTAB F_FORMULA
|
|
DISPLAY "Codice@10" CODTAB
|
|
DISPLAY "Descrizione@50" S0
|
|
OUTPUT F_FORMULA CODTAB
|
|
OUTPUT F_D_FORMULA S0
|
|
END
|
|
|
|
STRING F_D_FORMULA 50
|
|
BEGIN
|
|
PROMPT 25 13 ""
|
|
FLAG "D"
|
|
END
|
|
|
|
STRING F_PROFILO 50
|
|
BEGIN
|
|
PROMPT 2 15 "Profilo "
|
|
PSELECT
|
|
//MESSAGE K_SPACE,F_ORDINAMENTO|K_SPACE,F_VAL2PRINT
|
|
END
|
|
|
|
BUTTON DLG_PRINT 10 2
|
|
BEGIN
|
|
PROMPT -12 -1 ""
|
|
END
|
|
|
|
BUTTON DLG_QUIT 10 2
|
|
BEGIN
|
|
PROMPT -22 -1 ""
|
|
END
|
|
|
|
|
|
ENDPAGE
|
|
ENDMASK
|