Patch level : 12.0 no-patch

Files correlati     :
Commento            :

Custom Dinamica e CRPA
This commit is contained in:
Alessandro Bonazzi 2020-12-14 00:23:02 +01:00
parent 4eebec9e7e
commit a4621be2a9
10 changed files with 921 additions and 0 deletions

View File

@ -0,0 +1,255 @@
TOOLBAR "" 0 20 0 2
BU 18 10 2
BE
PR -16 -1 "~Registra"
ME EXIT,20082
PI 103
PI 153
EN
BU 16 10 2
BE
PR -26 -1 "~Nuovo"
ME EXIT,312
PI 105
PI 155
EN
BU 17 10 2
BE
PR -36 -1 "~Elimina"
ME EXIT,127
PI 104
PI 154
EN
BU 19 10 2
BE
PR -46 -1 "Ri~cerca"
ME EXIT,339
PI 126
EN
BU 2 10 2
BE
PR -56 -1 "~Annulla"
ME EXIT,27
PI 102
EN
BU 9 10 2
BE
PR -66 -1 "~Fine"
ME EXIT,20334
PI 114
PI 164
EN
EN
PA "Commesse" -1 -1 78 8
ST 101 20
BE
PR 4 2 "Codice Commessa "
FI CODTAB
FL "UZ"
KE 1
US CMS
IN CODTAB 101
DI "Codice@20" CODTAB
DI "Descrizione@70" S0
OU 101 CODTAB
OU 102 S0
CH REQUIRED
EN
ST 151 4
BE
PR 4 3 "Anno "
FI I3
GR 10
EN
ST 152 8
BE
PR 20 3 "Prot "
FI I4
GR 10
EN
BO 111
BE
PR 50 2 "Chiusa "
FI B2
ME 0 ENABLE,10@
ME 1 DISABLE,10@
EN
ST 102 70
BE
PR 4 4 "Desc. "
FI S0
KE 2
US CMS KE 2
IN S0 102
DI "Descrizione@70" S0
DI "Codice@20" CODTAB
CO OU 101
CH REQUIRED
WA "Manca la descrizione"
GR 10
EN
ST 202 70
BE
PR 4 5 "Agg. "
FI S1
GR 10
EN
NU 103 6
BE
PR 4 7 "Codice cliente "
FI I0
US 20
IN TIPOCF "C"
IN CODCF 103
DI "Codice@6R" CODCF
DI "Sospeso" SOSPESO
DI "Ragione sociale@50" RAGSOC
DI "Codice fiscale@16" COFI
DI "Partita IVA@11" PAIV
OU 103 CODCF
OU 301 RAGSOC
CH NORMAL
WA "Cliente assente"
ADD RU cg0 -1
GR 10
EN
ST 301 50
BE
WA "Cliente assente"
HE "Ragione sociale del cliente del documento"
PR 30 7 ""
US 20 KEY 2
IN TIPOCF "C"
IN RAGSOC 301
DI "Ragione Sociale@50" RAGSOC
DI "Partita IVA@12" PAIV
DI "Codice" CODCF
OU 103 CODCF
OU 301 RAGSOC
CH NORMAL
ADD RU cg0 -1 C
GR 10
EN
LI 104 20
BE
PR 4 8 "Regime IVA "
FI S7
HE "Indicare il tipo di regime IVA"
IT " |IVA normale"
IT "NR|Non rilevante"
IT "ES|Operazioni esenti"
IT "NI|Non imponibili"
IT "NS|Non soggetti"
IT "FC|Fuori campo"
GR 10
EN
NU 106 8
BE
PR 4 9 "Avanzamento "
FI I2
GR 10
EN
BO 105
BE
PR 50 9 "Da rendicontare"
FI B1
GR 10
EN
NU 306 15 4
BE
PR 4 11 "Costo km "
FI R10
GR 10
EN
DA 107
BE
PR 4 12 "Data inizio "
FI D0
GR 10
EN
DA 108
BE
PR 40 12 "Data fine "
FI D1
GR 10
EN
BO 109
BE
PR 4 13 "Prorogata"
FI B4
GR 10
ME 0 DISABLE,11@
ME 1 ENABLE,11@
EN
DA 158
BE
PR 40 13 "Data fine prorogata "
FI D2
GR 11
EN
DA 159
BE
PR 4 14 "Data lim. Doc Spe "
FI D3
GR 10
EN
DA 160
BE
PR 40 14 "Data lim.Ord e Inc. "
FI D4
GR 10
EN
ST 110 8
BE
PR 4 15 "Responsabile "
FL "U"
US 2 SE ISGROUP!="X"
IN USERNAME 110
DI "Utente@8" USERNAME
DI "Gruppo@8" GROUPNAME
DI "Descrizione@50" USERDESC
OU 110 USERNAME
// OU 170 USERDESC
CH SE
FI S4
GR 10
EN
ST 170 40
BE
PR 40 15 ""
FL "H"
EN
ST 171 20
BE
PR 40 15 "Settore "
FI S5
GR 10
EN
ST 173 70
BE
PR 4 16 "Cont. e Rev. "
FI S2
GR 10
EN
ST 174 70
BE
PR 4 17 "Note Gener. "
FI S3
GR 10
EN
EN
ENDMASK

View File

@ -0,0 +1,21 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="cmscav08">
<description>
</description>
<tables>
<table Name="COMMESSE" Num="147" />
<table Name="FASI" Num="148" Father="COMMESSE">(CODCMSFAS=CODCMS)AND(CODFASE=CODRESP)</table>
</tables>
<fields>
<field Name="CODCMS" Table="COMMESSE" />
<field Name="ANNO" Table="COMMESSE" />
<field Name="DATAINIZIO" Table="COMMESSE" />
<field Name="DATAFINE" Table="COMMESSE" ExprFrom="2009" />
<field Name="DATAPROR" Table="COMMESSE" />
</fields>
<sql>SELECT COMMESSE.CODCMS,COMMESSE.DESCRIZ, CODFASE, FASI.DESCRIZ, COMMESSE.ANNO,COMMESSE.DATAINIZIO,COMMESSE.DATAFINE,COMMESSE.DATAPROR,COMMESSE.CODCOSTO
FROM COMMESSE, FASI
WHERE (COMMESSE.DATAFINE &#3E; 20081231) AND (COMMESSE.DATAINIZIO &#3C; 20100101)
and fasi.codcmsfas=commesse.codcms
and codfase not like "%ED%";</sql>
</query>

View File

@ -0,0 +1,13 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="controllopartite">
<description>
</description>
<tables>
<table Name="PART" Num="28" />
</tables>
<sql>USE PART
FROM TIPOC=F SOTTOCONTO=#CLI
TO TIPOC=F SOTTOCONTO=#CLI
</sql>
</query>

View File

@ -0,0 +1,8 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="CONTR_ANNOES_MOV">
<description>CONTR_ANNOES_MOV</description>
<sql>SELECT NUMREG,ANNOES,DATAREG,SUBSTR(DATAREG,1,4)
FROM MOV
WHERE ANNOES&#3C;&#3E;SUBSTR(DATAREG,1,4)
</sql>
</query>

View File

@ -0,0 +1,22 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="clienti movimentati dal 2012">
<description>Clienti movimentati dal 2012</description>
<tables>
<table Name="CLIFO" Num="20" />
<table Name="DOC" Num="33" Father="CLIFO">(PROVV=TIPOCF)AND(ANNO= )AND(CODNUM=COMCF)AND(NDOC= )</table>
</tables>
<fields>
<field Name="TIPOCF" Table="CLIFO" ExprFrom="C" />
<field Name="CODCF" Table="CLIFO" />
<field Name="RAGSOC" Table="CLIFO" />
<field Name="COFI" Table="CLIFO" />
<field Name="PAIV" Table="CLIFO" />
<field Name="DOCMAIL" Table="CLIFO" />
<field Name="MAIL" Table="CLIFO" />
<field Name="PEC" Table="CLIFO" />
<field Name="ANNO" Table="DOC" ExprFrom="&#3E;2009" />
</fields>
<sql>SELECT CLIFO.TIPOCF,CLIFO.CODCF,CLIFO.RAGSOC,CLIFO.COFI,CLIFO.PAIV,CLIFO.UTENTE,CLIFO.DATAAGG,CLIFO.DATARFSO,CLIFO.DOCMAIL,CLIFO.MAIL,CLIFO.PEC FROM CLIFO
WHERE (CLIFO.TIPOCF='C')AND CLIFO.CODCF in (Select distinct DOC.CODCF from DOC where (DOC.TIPOCF="C") AND(DOC.ANNO&#3E;2009))
;</sql>
</query>

View File

@ -0,0 +1,81 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="Clienti">
<description>Clienti</description>
<tables>
<table Name="CLIFO" Num="20" />
</tables>
<fields>
<field Name="TIPOCF" ExprTo="C" Table="CLIFO" ExprFrom="C" />
<field Name="CODCF" Table="CLIFO" />
<field Name="RAGSOC" Table="CLIFO" />
<field Name="GRUPPO" Table="CLIFO" />
<field Name="CONTO" Table="CLIFO" />
<field Name="COFI" Table="CLIFO" />
<field Name="STATOPAIV" Table="CLIFO" />
<field Name="PAIV" Table="CLIFO" />
<field Name="RICALT" Table="CLIFO" />
<field Name="ALLEG" Table="CLIFO" />
<field Name="BYMAIL" Table="CLIFO" />
<field Name="CAPCF" Table="CLIFO" />
<field Name="CIVCF" Table="CLIFO" />
<field Name="CODABI" Table="CLIFO" />
<field Name="CODALLEG" Table="CLIFO" />
<field Name="CODANAGPER" Table="CLIFO" />
<field Name="CODCAB" Table="CLIFO" />
<field Name="CODCFASS" Table="CLIFO" />
<field Name="CODCFFATT" Table="CLIFO" />
<field Name="CODLIN" Table="CLIFO" />
<field Name="CODPAG" Table="CLIFO" />
<field Name="CODRFSO" Table="CLIFO" />
<field Name="CODSTAT" Table="CLIFO" />
<field Name="CODVAL" Table="CLIFO" />
<field Name="COMCF" Table="CLIFO" />
<field Name="COMNASC" Table="CLIFO" />
<field Name="CONTORIC" Table="CLIFO" />
<field Name="DATAAGG" Table="CLIFO" />
<field Name="DATANASC" Table="CLIFO" />
<field Name="DATARFSO" Table="CLIFO" />
<field Name="DIPPUBB" Table="CLIFO" />
<field Name="DIRTY" Table="CLIFO" />
<field Name="DOCMAIL" Table="CLIFO" />
<field Name="ENTE" Table="CLIFO" />
<field Name="FAX" Table="CLIFO" />
<field Name="FIDO" Table="CLIFO" />
<field Name="GRUPPORIC" Table="CLIFO" />
<field Name="IBAN" Table="CLIFO" />
<field Name="INDCF" Table="CLIFO" />
<field Name="INIFATTEL" Table="CLIFO" />
<field Name="INIREVCHG" Table="CLIFO" />
<field Name="LOCALITACF" Table="CLIFO" />
<field Name="MAIL" Table="CLIFO" />
<field Name="NUMCC" Table="CLIFO" />
<field Name="OCCAS" Table="CLIFO" />
<field Name="OGGETTI" Table="CLIFO" />
<field Name="PEC" Table="CLIFO" />
<field Name="PFAX" Table="CLIFO" />
<field Name="PTEL" Table="CLIFO" />
<field Name="PTEL2" Table="CLIFO" />
<field Name="PTEL3" Table="CLIFO" />
<field Name="PTELEX" Table="CLIFO" />
<field Name="REFERENTE" Table="CLIFO" />
<field Name="SESSO" Table="CLIFO" />
<field Name="SOSPESO" ExprTo="falso" Table="CLIFO" ExprFrom="falso" />
<field Name="SOTTOCRIC" Table="CLIFO" />
<field Name="SPLITPAY" Table="CLIFO" />
<field Name="STATO" Table="CLIFO" />
<field Name="STATOCF" Table="CLIFO" />
<field Name="STATONASC" Table="CLIFO" />
<field Name="TEL" Table="CLIFO" />
<field Name="TEL2" Table="CLIFO" />
<field Name="TEL3" Table="CLIFO" />
<field Name="TELEX" Table="CLIFO" />
<field Name="TIPOAPER" Table="CLIFO" />
<field Name="TIPOPERS" Table="CLIFO" />
<field Name="UTENTE" Table="CLIFO" />
<field Name="VALINTRA" Table="CLIFO" />
</fields>
<sql>SELECT TIPOCF,CODCF,RAGSOC,GRUPPO,CONTO,COFI,STATOPAIV,PAIV,RICALT,ALLEG,BYMAIL,CAPCF,CIVCF,CODABI,CODALLEG,CODANAGPER,CODCAB,CODCFASS,CODCFFATT,CODLIN,CODPAG,CODRFSO,CODSTAT,CODVAL,COMCF,COMNASC,CONTORIC,DATAAGG,DATANASC,DATARFSO,DIPPUBB,DIRTY,DOCMAIL,ENTE,FAX,FIDO,GRUPPORIC,IBAN,INDCF,INIFATTEL,INIREVCHG,LOCALITACF,MAIL,NUMCC,OCCAS,OGGETTI,PEC,PFAX,PTEL,PTEL2,PTEL3,PTELEX,REFERENTE,SESSO,SOSPESO,SOTTOCRIC,SPLITPAY,STATO,STATOCF,STATONASC,TEL,TEL2,TEL3,TELEX,TIPOAPER,TIPOPERS,UTENTE,VALINTRA
FROM CLIFO
WHERE (TIPOCF='C')AND(SOSPESO='')
;</sql>
</query>

View File

@ -0,0 +1,20 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="commesse dell'esercizio">
<description>Commesse attive in un esercizio</description>
<tables>
<table Name="COMMESSE" Num="147" />
</tables>
<fields>
<field Name="CODCMS" Table="COMMESSE" />
<field Name="DESCRIZ" Table="COMMESSE" />
<field Name="ANNO" Table="COMMESSE" />
<field Name="CODCOSTO" Table="COMMESSE" />
<field Name="DATAINIZIO" ExprTo="20140101" Table="COMMESSE" />
<field Name="DATAFINE" Table="COMMESSE" ExprFrom="20130101" />
<field Name="DATAPROR" Table="COMMESSE" ExprFrom="20130101" />
</fields>
<sql>SELECT CODCMS,DESCRIZ,ANNO,CODCOSTO,DATAINIZIO,DATAFINE,DATAPROR
FROM COMMESSE
WHERE (DATAINIZIO&#3C;=20140101)AND(DATAFINE&#3E;=20130101)AND(DATAPROR&#3E;=20130101)
;</sql>
</query>

View File

@ -0,0 +1,27 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="doc non scollegati">
<description>DOC non scollegati</description>
<tables>
<table Name="DOC" Num="33" />
</tables>
<fields>
<field Name="ANNO" ExprTo="2017" Table="DOC" ExprFrom="2017" />
<field Name="CODNUM" ExprTo="'O'" Table="DOC" />
<field Name="NDOC" Table="DOC" />
<field Name="CODCF" Table="DOC" />
<field Name="TIPOCF" Table="DOC" />
<field Name="DATADOC" Table="DOC" />
<field Name="NUMREG" Table="DOC" />
<field Name="NUMREGCA" ExprTo="0" Table="DOC" ExprFrom="0" />
<field Name="CAUSMAG" Table="DOC" />
<field Name="CODCMS" Table="DOC" />
<field Name="CODCONT" Table="DOC" />
<field Name="CODCOSTO" Table="DOC" />
<field Name="NUMDOCRIF" Table="DOC" />
<field Name="G1" Table="DOC" />
</fields>
<sql>SELECT ANNO,CODNUM,NDOC,CODCF,TIPOCF,DATADOC,NUMREG,NUMREGCA,CAUSMAG,CODCMS,CODCONT,CODCOSTO,NUMDOCRIF,G1
FROM DOC
WHERE (ANNO=2017)AND(CODNUM&#3C;'O')AND(NUMREGCA=0)
;</sql>
</query>

View File

@ -0,0 +1,455 @@
USE 31
JOIN 14 INTO NPROGTR==NPROGTR
JOIN 20 INTO TIPOCF=="F" CODCF==CODCF
JOIN 17 TO 20 INTO TIPOCF==TIPOCF CODCF==CODCF
JOIN 16 TO 17 INTO TIPOCF==TIPOCF CODCF==CODCF CODIND==CODINDEFF
JOIN 13 TO 20 INTO COM==COMCF
JOIN 13 TO 16 ALIAS 213 INTO COM==COM
JOIN %BAN TO 20 ALIAS 201 INTO CODTAB[1,5]==CODABI
JOIN %BAN TO 20 ALIAS 203 INTO CODTAB==CODABI+CODCAB
JOIN %BAN ALIAS 202 INTO CODTAB==CODABIP+CODCABP
JOIN %BAN ALIAS 204 INTO CODTAB[1,5]==CODABIP
JOIN BNP ALIAS 205 INTO CODTAB==CODABIP+CODCABP
END
DESCRIPTION
BEGIN
31->* "Effetti"
14->* "Righe effetto"
20->* "Clienti e Fornitori"
13->* "Comuni"
201@->* "Tabella banche"
202@->* "Tabella banche"
203@->* "Tabella banche"
204@->* "Tabella banche"
END
GENERAL
BEGIN
OFFSET 0 0
END
SECTION GRAPHICS ODD 4
FIGURA 1 1 1
BEGIN
PROMPT 1 1 ""
END
END
SECTION HEADER ODD 8
STRING 1 80
BEGIN
KEY "denominazione banca presentazione"
PROMPT 38 1 "Al/Alla @B"
FIELD 202@->S0
// MESSAGE _BANCAP
END
STRING 2 30
BEGIN
KEY "scritta elenco riba"
PROMPT 2 1 "@BORDINI DI BONIFICO"
END
NUMBER 3 8
BEGIN
KEY "numero di pagina"
PROMPT 129 1 "pag. "
MESSAGE _PAGENO
END
DATA 4 20
BEGIN
KEY "data emissione"
PROMPT 2 2 "Presentati il : "
MESSAGE _DATA
END
STRING 5 130
BEGIN
KEY "ditta"
PROMPT 2 4 "Vi preghiamo di disporre per ordine e per conto @B"
MESSAGE _DITTA,!RAGSOC
END
STRING 5 130
BEGIN
KEY "ditta"
PROMPT 2 5 "i bonifici di seguito indicati:"
END
STRING 6 20
BEGIN
KEY "scritta titolo righe del body"
PROMPT 2 7 "CREDITORE"
END
STRING 7 10
BEGIN
KEY "scritta titolo righe del body"
PROMPT 32 7 "INDIRIZZO"
END
STRING 8 17
BEGIN
KEY "scritta titolo righe del body"
PROMPT 62 7 "BANCA D'APPOGGIO"
END
STRING 9 11
BEGIN
KEY "scritta titolo righe del body"
PROMPT 94 7 "FATTURA NUM"
END
STRING 10 8
BEGIN
KEY "scritta titolo righe del body"
PROMPT 111 7 "DATA FATT."
END
STRING 11 7
BEGIN
KEY "scritta titolo righe del body"
PROMPT 129 7 "IMPORTO"
END
STRING 12
BEGIN
KEY "riga separazione dalle righe del body"
PROMPT 2 8 "---------------------------------------------------------------------------------------------------------------------------------------------"
END
STRING 13 25
BEGIN
KEY "Numero distinta"
PROMPT 100 2 "Distinta N. @B"
FIELD NDIST
END
END
SECTION BODY ODD 6
STRING 15 2 1
BEGIN
KEY "creditore"
PROMPT 1 1 "@B"
END
STRING 16 25 2
BEGIN
KEY "creditore"
PROMPT 2 1 ""
FIELD 20->RAGSOC
MESSAGE INC,FL->2
END
STRING 27 21
BEGIN
KEY "codice fiscale"
PROMPT 2 3 "P.I. "
FIELD 20->PAIV
// FIELD 20->COFI
END
STRING 28 2 1
BEGIN
KEY "indirizzo normale"
PROMPT 25 1 "@R"
END
STRING 17 25 2
BEGIN
KEY "Indirizzo debitore + nr. civico"
PROMPT 27 1 ""
MESSAGE _CLI,!IND
END
STRINGA 18 25 2
BEGIN
KEY "PIAZZA(LOCALITA+PROV)"
PROMPT 27 3 ""
MESSAGE _CLI,!PIAZZA
END
STRING 117 6
BEGIN
KEY ""
PROMPT 2 17 ""
MESSAGE _NUMEXPR, 20->CODABI==99999
MESSAGE COPY,118
FLAGS "H"
END
NUMBER 118 5
BEGIN
KEY ""
PROMPT 55 4 ""
MESSAGE ENABLE,119|DISABLE,19
MESSAGE ENABLE,120|DISABLE,20|DISABLE,21
MESSAGE ENABLE,134|DISABLE,22|DISABLE,34
MESSAGE EMPTY ENABLE,19|DISABLE,119
MESSAGE EMPTY ENABLE,20|DISABLE,120
FLAGS "H"
END
STRING 119 40 2
BEGIN
KEY "banca d'appoggio denominazione"
PROMPT 55 1 ""
FIELD 203@->S0
FLAGS "D"
END
STRING 120 40 1
BEGIN
KEY "banca d'appoggio denominazione"
PROMPT 55 3 ""
FIELD 203@->S2
FLAGS "D"
END
STRING 19 40 2
BEGIN
KEY "banca d'appoggio denominazione"
PROMPT 55 1 ""
FIELD 201@->S0
END
STRING 20 40 1
BEGIN
KEY "banca d'appoggio succursale"
PROMPT 55 3 ""
FIELD 203@->S0
END
STRING 221 7
BEGIN
KEY "ABI presentazione"
PROMPT 55 4 "@B"
END
STRING 21 5
BEGIN
KEY "ABI presentazione"
PROMPT 20 4 "ABI: "
FIELD 20->CODABI
END
STRING 22 5
BEGIN
KEY "CAB succursale"
PROMPT 31 4 "CAB: "
FIELD 20->CODCAB
END
LISTA 23 8
BEGIN
KEY "a saldo/in conto"
FIELD 31->ULTRATA
PROMPT 95 1 ""
ITEM " |IN CONTO"
ITEM "X|A SALDO"
flags "H"
END
STRING 24 17 5
BEGIN
KEY "dati fattura"
PROMPT 92 1 ""
// MESSAGE _FATT,!DATIFATT
END
DATA 25 10
BEGIN
KEY "data scadenza"
PROMPT 112 1 ""
// FIELD 31->DATASCAD
END
STRING 34 20
BEGIN
KEY "Conto Corrente"
PROMPT 43 4 "C/C "
FIELD 20->NUMCC
END
STRING 133 1
BEGIN
KEY "Conto Corrente"
PROMPT 5 4 ""
FIELD 20->NUMCC
MESSAGE EMPTY DISABLE,134
FLAGS "H"
END
STRING 134 35
BEGIN
KEY "Conto Corrente"
PROMPT 43 4 "ACCOUNT NUM. "
FIELD 20->NUMCC
FLAGS "D"
END
STRING 135 35
BEGIN
KEY "Conto Corrente"
PROMPT 61 4 "IBAN "
FIELD 20->IBAN
END
STRING 35 3
BEGIN
KEY "test sulla valuta"
PROMPT 2 8 ""
FIELD CODVAL
FLAGS "H"
MESSAGE EMPTY ENABLE,4@|DISABLE,3@
END
STRING 36 17 1
BEGIN
KEY "cod cliente"
PROMPT 2 4 "@RCod. For: "
FIELD 20->CODCF
END
SECTION RIGHE_EFFETTO 5 1 1 FILE 14 GROUP NPROGTR
STRINGA 1
BEGIN
PROMPT 92 1 "Ft. n."
FIELD 14->NFATT
END
DATA 2
BEGIN
PROMPT 107 1 "del "
FIELD 14->DATAFATT
END
VALUTA 3 21 3
BEGIN
PROMPT 124 1 ""
FIELD 14->IMPORTOVAL
// PICTURE "###.###.###.###,@@#"
GROUP 3
END
VALUTA 4 18
BEGIN
PROMPT 124 1 ""
FIELD 14->IMPORTO
// PICTURE "###.###.###.###"
GROUP 4
FLAGS "D"
END
END
STRINGA 31 32
BEGIN
PROMPT 110 5 "--------------------------------"
END
STRINGA 32 10
BEGIN
PROMPT 109 6 "@B Totale"
END
STRINGA 33 2
BEGIN
PROMPT 114 6 "@B"
END
VALUTA 26 18
BEGIN
KEY "importo"
PROMPT 124 6 ""
MESSAGE _IMPORTO
MESSAGE ADD,FL->3
PICTURE "###.###.###.###"
END
END
SECTION FOOTER ODD 5
STRINGA 99
BEGIN
KEY "riga separazione dalle righe del body"
PROMPT 2 1 "---------------------------------------------------------------------------------------------------------------------------------------------"
END
STRINGA 100 12 1
BEGIN
KEY "stampa 'segue' in coda"
PROMPT 120 3 "-- SEGUE --"
END
END
SECTION FOOTER LAST 5
STRINGA 1
BEGIN
KEY "riga separazione dalle righe del body"
PROMPT 2 1 "---------------------------------------------------------------------------------------------------------------------------------------------"
END
NUMERO 2 25
BEGIN
KEY "scritta n. documenti"
PROMPT 5 2 "ORDINI DI BONIFICO N. "
END
NUMERO 3 50
BEGIN
KEY "Totale"
PROMPT 5 3 "Dell' importo complessivo di L.@B"
PICTURE "###.###.###.###,@@#"
END
STRING 93 3
BEGIN
KEY "test sulla valuta"
PROMPT 34 3 ""
FIELD CODVAL
// MESSAGE EMPTY ENABLE,4@|DISABLE,3@
GROUP 4
END
STRINGA 4 40
BEGIN
KEY "NUMERO C/C"
PROMPT 60 3 "@Raddebiterete il C/C N. @B"
FIELD 205@->S0
END
STRINGA 5 80
BEGIN
KEY "firma "
PROMPT 5 4 "presso di Voi, intestato a: @B"
MESSAGE _DITTA,!RAGSOC
END
STRINGA 6 40
BEGIN
KEY "firma "
PROMPT 65 5 "------------------------------------"
END
DATA 7 34
BEGIN
KEY "data valuta"
PROMPT 100 3 "@Rcon valuta per noi: @B"
FIELD 31->DATADIST
FL "D"
END
END
END

View File

@ -0,0 +1,19 @@
<?xml version="1.0" encoding="UTF-8" ?>
<query Name="doc_cms_div">
<description>Documenti con commessa diversa in testata e nelle</description>
<tables>
<table Name="DOC" Num="33" />
<table Name="RDOC" Num="34" Father="DOC">(CODNUM=CODNUM)AND(ANNO=ANNO)AND(PROVV=PROVV)AND(NDOC=NDOC)AND(NRIGA= )</table>
</tables>
<fields>
<field Name="CODNUM" Table="DOC" />
<field Name="ANNO" ExprTo="2010" Table="DOC" ExprFrom="2019" />
<field Name="NDOC" Table="DOC" />
<field Name="NRIGA" Table="DOC" />
<field Name="CODCMS" Table="DOC" />
<field Name="CODCMS" Table="RDOC" />
</fields>
<sql>ODBC(DINAMICA) SELECT DOC.CODNUM,DOC.ANNO,DOC.NDOC,DOC.CODCMS,RDOC.CODCMS,RDOC.CODART,RDOC.TIPORIGA
FROM DOC,RDOC
WHERE (DOC.ANNO=2019)AND(RDOC.CODNUM=DOC.CODNUM)AND(RDOC.ANNO=DOC.ANNO)AND(RDOC.PROVV=DOC.PROVV)AND(RDOC.NDOC=DOC.NDOC)AND(RDOC.CODCMS&#3C;&#3E;DOC.CODCMS )AND (DOC.CODNUM='F01')AND (RDOC.TIPORIGA &#3C;&#3E; '05');</sql>
</query>