PC Toledo

... d.serie
AND b.ordem = d.ordem

WHERE
d.docum = :docum
AND d.codfor = :codfor
AND d.tpnota = :tpnota
AND d.serie = :serie
AND d.ordem = :ordem

GROUP BY
d.valor;

Índices recomendados no Firebird 2.5:

CREATE INDEX IDX_PAGARD_CHAVE ON PAGARD
(DOCUM, CODFOR, TPNOTA, SERIE, ORDEM);

CREATE INDEX ...

... serie AND d.ordem = :order
WHERE
b.docum = :docum AND b.codfor = :codfor AND b.tpnota = :tpnota AND b.serie = :serie AND b.ordem = :ordem
GROUP BY 1, 2, 3, 4

## Por que isso fica mais rápido?

1. SARGability: Ao usar coluna = :valor, o Firebird usa o índice da chave primária ou ...

... dc = 'D' and trim(b.nrecibo)<>'' )
from "+pagarb+" b
INNER JOIN "+pagard +" d
on d.docum||d.codfor||d.tpnota||d.serie||d.ordem = '"+xchave+"'
group by b.valor,b.dc, b.nrecibo , d.valor

Foi isto que eu quis sugerir. Não alterei nada. Pode deletar o outro tópico.

Talvez melhore com una ou ...

... from "+pagarb +" b where b.docum||b.codfor||b.tpnota||b.serie||b.ordem = '"+xchave+"' and b.dc = 'D' and trim(b.nrecibo)<>'' ) ";
+" from "+pagarb+" b INNER JOIN "+pagard +" d on d.docum||d.codfor||d.tpnota||d.serie||d.ordem = '"+xchave+"'" ;
+" group by b.valor,b.dc, b.nrecibo , d.valor;"

Poka

... ld returned 1 exit status
hbmk2: Erro: Executando linkeditor. 1
gcc '/tmp/hbmk_4wziap.dir/t.o' '/tmp/hbmk_4wziap.dir/hbmk_23of1w.o' -Wl,--start-group -lhbextern -lhbdebug -lhbvm -lhbrtl -lhblang -lhbcpage -lgtcgi -lgtpca -lgtstd -lgttrm -lhbrdd -lhbuddall -lhbusrrdd -lrddntx -lrddcdx -lrddnsx ...

... 4

/* ADO Cursor Location */
#define AD_USE_NONE 1
#define AD_USE_SERVER 2
#define AD_USE_CLIENT 3
#define AD_USE_CLIENTBATCH 3

/* Constant Group: ObjectStateEnum */
#define AD_STATE_CLOSED 0
#define AD_STATE_OPEN 1
#define AD_STATE_CONNECTING 2
#define AD_STATE_EXECUTING 4
#define AD_STATE ...

... o .hbm
/win/mingw/TRAARQUI.o .hbmk/win/mingw/BAPEDIDO.o .hbmk/win/mingw/REL_PROV.o .hb
k/win/mingw/_hbmkaut_GASP40HB.o -mwindows -Wl,--start-group -lxhb -lhbwin -l
bct -lhbziparc -lhbmzip -lminizip -lhbnf -lhbhpdf -llibhpdf -lpng -lhbzebra -lh
extern -lhbdebug -lhbvmmt -lhbrtl -lhblang ...

... 510','550', '620', '800', '810', '820', '830'
CST=
cClassTrib=
; Reforma tributaria
;gIBSCBS001, gIBSCBSMono001 e gTransfCred001 é um "Choice Group" no Layout, ou seja, apenas uma das seções deve constar no arquivo INI
; Reforma tributaria
[gIBSCBS001]
vBC=
vIBS=
[gIBSUF001]
pIBSUF=
vIBSUF ...

... Paper Width (User PaperSize)
* _HMG_SYSDATA [ 119 ] -> Current Report Paper Length (User paperSize)
* _HMG_SYSDATA [ 120 ] -> Current Report Group Count
* _HMG_SYSDATA [ 121 ] -> Current Report Group Header Array
* _HMG_SYSDATA [ 122 ] -> Current Report Group Footer Array
* _HMG_SYSDATA ...

... para gravação em uma view:
Para que uma view seja modificável (updatable), ela precisa:
- Ser baseada em uma única tabela
- Não usar JOINs, GROUP BY, DISTINCT, UNION, subqueries no SELECT
- Não ter funções agregadas como SUM(), COUNT(), etc.
- Ter todos os campos da tabela original e não usar ...

... using
emscripten, using these settings:
HB_PLATFORM=wasm HB_COMPILER=emcc HB_BUILD_3RDEXT=no

* {abstr} is now a hbmk2 keyword to possibly group all
toolsets similar in flavour: WASI/clang, JS/emscripten
[center][/center] These most likely will be targeting plaforms which are not
full ...

... TUTOR04.rc %mingw%\bin\gcc -oTUTOR04.exe TUTOR04.o -Wall -s -mwindows -L%mingw%\lib -L%hlibs% -L%fwh%\lib -Wl,--enable-stdcall-fixup -Wl,--start-group -lfivehg -lfivehgc -llibmysql32 -lgtgui -luser32 -lshell32 -lwinspool -lkernel32 -lcomctl32 -lcomdlg32 -lgdi32 -lgdiplus -lole32 -loleaut32 -lpsapi ...

... C:/Users/joseq/AppData/Local/Temp/hbmk_e4kkvy.dir/xmltree.o C:/Users/joseq/AppData/Local/Temp/hbmk_e4kkvy.dir/hbmk_bz8kgv.o -mconsole -Wl,--start-group -lfivehg -lfivehgc -lhbextern -lhbdebug -lhbvm -lhbrtl -lhblang -lhbcpage -lgtcgi -lgtpca -lgtstd -lgtwin -lgtwvt -lgtgui -lhbrdd -lhbuddall ...

... C:/Users/joseq/AppData/Local/Temp/hbmk_vggs6m.dir/xmltree.o C:/Users/joseq/AppData/Local/Temp/hbmk_vggs6m.dir/hbmk_zvjfpx.o -mconsole -Wl,--start-group -lhbextern -lhbdebug -lhbvm -lhbrtl -lhblang -lhbcpage -lgtcgi -lgtpca -lgtstd -lgtwin -lgtwvt -lgtgui -lhbrdd -lhbuddall -lhbusrrdd -lrddntx ...

... if not exist %1.rc %mingw%\bin\gcc -o%1.exe %1.o -Wall -s -mwindows -L%mingw%\lib -L%hlibs% -L%fwh%\lib -Wl,--enable-stdcall-fixup -Wl,--start-group -lfivehg -lfivehgc -lgtgui -luser32 -lshell32 -lwinspool -lkernel32 -lcomctl32 -lcomdlg32 -lgdi32 -lgdiplus -lole32 -loleaut32 -lpsapi -loledlg ...