Histórico da Página
...
- cnpj_empresa- Empresa logada no aplicativo - SIGAMAT
- cod_query- Código da Query que será executada para a exibição dos dados de retorno no APP, as queries são executadas juntamente com a rotina banco de queries do APP, rotina LOCA098 (neste caso sempre "11")
- tabela - alias da tabela, por exemplo: "SA2" (para fornecedores), "SE4" (para condição de pagamento), "SB1" (produtos), etc
- campopesq - nome do campo em que será pesquisado no banco de dados, por exemplo: "A2_NOME"
- referencia - o que será pesquisado no campopesq, por exemplo: "JOAO"
- retornos - os campos que a consulta deverá retornar, por exemplo: "A2_COD, A2_LOJA, A2_NOME"
- qtd - quantidade de registros que a consulta poderá retornar, por exemplo: "10"
Exemplo para a consulta de fornecedoresRequest:Requisição:
Para execução da Query 01 { |
...
"cnpj_empresa":"53485215000106", |
...
01", |
...
cod_cli":" |
...
000094", |
...
loj_cli": |
...
"01" Para execução da Query 02 { |
...
cod_query":" |
...
02", |
...
cod_cli":" |
...
000094", |
...
loj_cli":" |
...
01" |
...
Para execução da Query 03 |
...
{ |
...
cnpj_empresa":" |
...
53485215000106", |
...
cod_query": |
...
"03", |
...
000094", |
...
" |
...
loj_ |
...
cli":" |
...
01" |
...
Para execução da Query 04 { |
...
" |
...
cnpj_ |
...
empresa":" |
...
53485215000106" |
...
, |
...
...
|
...
" |
...
cod_ |
...
query":" |
...
04", |
...
" |
...
cod_ |
...
cli":" |
...
000094", |
...
" |
...
loj_ |
...
cli":"01" |
...
|
...
} Para execução da Query 05 { |
...
" |
...
loj_ |
...
cli":"01" |
...
} |
...
Para execução da Query 06 { |
...
"cnpj_empresa":"53485215000106", |
...
cod_ |
...
query":" |
...
05", |
...
" |
...
cod_ |
...
cli":" |
...
", |
...
" |
...
loj_ |
...
cli":" |
...
" |
...
} Para execução da Query 07 { |
...
Exemplo para a consulta de condição de pagamento:
Requisição:
...
|
...
07", |
...
cod_bem":" |
...
0000000002", |
...
placa":" |
...
EEEEEEEE" Para execução da Query 08 { |
...
53485215000106", |
...
cod_query":" |
...
08", |
...
cod_for":" |
...
000006", |
...
Resultado:
...
"loj_for":"01", |
...
dtini":" |
...
20160101", |
...
dtfim": |
...
"20251231" Para execução da Query 09 { |
...
" |
...
cnpj_ |
...
empresa":" |
...
53485215000106", |
...
" |
...
cod_ |
...
query":" |
...
09", |
...
|
...
" |
...
cod_ |
...
for":" |
...
000006", |
...
|
...
" |
...
loj_ |
...
for":" |
...
01" |
...
} |
...
Para execução da Query 10 { |
...
53485215000106", |
...
" |
...
cod_ |
...
query":" |
...
10", |
...
" |
...
cod_ |
...
bem":" |
...
0000000002", |
...
Para execução da Query 11 (Fornecedores) { |
...
53485215000106", |
...
11", |
...
|
...
" |
...
tabela":" |
...
SA2", |
...
" |
...
campopesq":" |
...
A2_NOME", |
...
" |
...
referencia":" |
...
JOAO", |
...
"retornos":"A2_COD,A2_NOME,A2_LOJA", Para execução da Query 11 (Condição de pagamento) |
...
Exemplo para a consulta de produtos:
...
{ |
...
SE4", |
...
E4_ |
...
CODIGO", |
...
01", |
...
E4_CODIGO,E4_TIPO,E4_COND,E4_DESCRI", |
...
30" |
...
Para execução da Query 11 (Produtos) |
...
{ |
...
cod_query":" |
...
11", |
...
" |
...
tabela": |
...
"SB1", | |
Retorno esperado:
Response:
cod_query = 01 { |
...
" |
...
MULTAS": |
...
1 |
...
}] |
...
cod_query = 02 { |
...
DA4_COD": " |
...
LOC001", |
...
DA4_ |
...
NOME": " |
...
DENNIS3", |
...
...
...
Para execução da Query 01 { Para execução da Query 02 { Para execução da Query 03 { cod_query = 03Para execução da Query 04 { Para execução da Query 05cod_query = 04 { cod_query = 05 {":"05", cod_query = Para execução da Query 06 { Retorno": " 53485215000106OK", Dados": [ ELEINS", T4_ cliNOME": "INSPECAO DE PECAS ELETRICAS", TE_ cliCARACTE": "C" Para execução da Query 07 {"cnpj_empresa , ELESUB", T4_ queryNOME": " 07SUBSTITICAO DE PECAS ELETRICAS", TE_ bemCARACTE": " 0000000002C" } Para execução da Query 08 { { T4_ empresaSERVICO": " 53485215000106MECANI", T4_ queryNOME": " 08SERVICO MECANICO", TE_ forCARACTE": " 000006C" T4_ forSERVICO": " 01CORMNT", T4_NOME": " 20160101CORRETIVA PADRAO MNT", TE_CARACTE": " 20251231C" } Para execução da Query 09cod_query = 07 { Retorno": " 53485215000106OK", Dados": [ { D MG 01", T9_ forCODBEM": " 0000060000000002", T9_ forNOME": " 01ATIVO 0000000002", Para execução da Query 10 {
" cnpjT9_ empresaPLACA": " 53485215000106EEEEEEEE", T9_ queryCODFAMI": " 10FAM01", T6_ bemNOME": " 0000000002FAMILIA DE BENS 01" ,
|
...
] cod_query = 0108 { NOTA": " MOTORISTA SIGALOC", OS": 1"", } cod_query = 02 {" RetornoPED_COMPRA": " OK", "VLR_TOTAL": 380.74, "EMISS_NOTA": "", "NUM_TITU": "FN430_002", EMISS_ CODTIT": " LOC00120230807", PARCELA": " DENNIS3", PREV_ CGCPAGTO": " 1234567890120230807", PAGO_ NUMCNHEM": " 1234567890" NOTA": " LOC005", OS": " DENNIS1", PED_ CGCCOMPRA": " 12345678901", VLR_ NUMCNHTOTAL": "1234567890"500, "EMISS_NOTA": "", "NUM_TITU": "FINA05001", EMISS_ CODTIT": " LOC00420160108", PARCELA": " DENNIS2", PREV_ CGCPAGTO": " 1234567890120160108", PAGO_ NUMCNHEM": " 1234567890" } cod_query = 03 { NOTA": " OK", "Dados": [ { " TRX_NOMEOS": " MOTORISTA SIGALOC", PED_ NOTIFICACOES_MULTASCOMPRA": 1"", } "VLR_TOTAL": 808.12, cod_query = 04 { cod_query = 05 { cod_query = 06 { } cod_query = 07 { cod_query = 08 { cod_query = 09 { cod_query = 10 { cod_query = 09 { cod_query = 11 (Fornecedores) "AIA_DATATE": "20491231", cod_query = 10 { cod_query = 11 (Condição de pagamento) { cod_query = 11 (Produtos) { |
04. DEMAIS INFORMAÇÕES
Para saber as queries que são executadas no app, seguem abaixo com seus respectivos códigos:
|
04. DEMAIS INFORMAÇÕES
Para saber as queries que são executadas no app, seguem abaixo com seus respectivos códigos:
cod 01
SELECT TRX_NOME, COUNT(*) MULTAS
FROM xEmp('TRX') TRX
INNER JOIN xEmp('FP0') FP0
ON FP0_FILIAL = xFilial('FP0')
AND FP0.D_E_L_E_T_ = ' '
AND FP0_CLI = '${CLIENT_ID}'
AND FP0_LOJA = '${CLIENT_LOJA}'
INNER JOIN xEmp('FPA') FPA
ON FPA_FILIAL = xFilial('FPA')
AND FPA_PROJET = FP0_PROJET
AND FPA.D_E_L_E_T_ = ' '
AND FPA_AS <> ''
WHERE TRX_FILIAL = xFilial('TRX')
AND TRX_AS = FPA_AS
AND TRX_TPMULT = 'TRANSITO'
AND TRX.D_E_L_E_T_ = ' '
GROUP BY TRX_NOME
ORDER BY TRX_NOME
cod 02
SELECT DA4_COD,DA4_NOME,DA4_CGC,DA4_NUMCNH
FROM "+RETSQLNAME("DA4")+" DA4 "
WHERE DA4_FILIAL = '" + xFilial('DA4') + "' "
AND DA4_CODCLI = '"+cCli+"' "
AND DA4_LOJCLI = '"+cLoja+"' "
AND DA4.D_E_L_E_T_ = ' ' "
cod03
SELECT COUNT(*) AS QTDE_NOTIFICACOES_MULTAS
FROM xEmp('TRX') TRX
INNER JOIN xEmp('FP0') FP0
ON FP0_FILIAL = xFilial('FP0')
AND FP0.D_E_L_E_T_ = ' '
AND FP0_CLI = '${CLIENT_ID}'
AND FP0_LOJA = '${CLIENT_LOJA}'
INNER JOIN xEmp('FPA') FPA
ON FPA_FILIAL = xFilial('FPA')
AND FPA_PROJET = FP0_PROJET
AND FPA.D_E_L_E_T_ = ' '
AND FPA_AS <> ''
AND TRX_TPMULT = 'NOTIFICACAO'
WHERE TRX_FILIAL = xFilial('TRX')
AND TRX_AS = FPA_AS
AND TRXcod 01
SELECT TRX_NOME, COUNT(*) MULTAS
FROM xEmp('TRX') TRX
INNER JOIN xEmp('FP0') FP0
ON FP0_FILIAL = xFilial('FP0')
AND FP0.D_E_L_E_T_ = ' '
cod04
SELECT COUNT(*) AS QTDE_BENS_MANUTENCAO AND FP0_CLI = '${CLIENT_ID}'
AND FP0_LOJA = '${CLIENT_LOJA}'FROM xEmp('FQF') FQF
INNER JOIN xEmp('FPAFP0') FPAFP0
ON FPAFP0_FILIAL = xFilial('FPAFP0')
AND FPAFQF_PROJET = FP0_PROJET
AND FPAFP0.D_E_L_E_T_ = ' '
AND FPAFP0_AS <> 'CLI = '${CLIENT_ID}'
WHERE TRX_FILIAL = xFilial('TRX') AND FP0_LOJA = '${CLIENT_LOJA}'
INNER JOIN xEmp('FQE') FQE
AND TRXON FQE_AS = FPA_ASFILIAL = xFilial('FQE')
AND TRXFQE_TPMULT = 'TRANSITO'CODIGO = FQF_SUBST
AND TRXFQE.D_E_L_E_T_ = ' '
GROUP BY TRX_NOME
ORDER BY TRX_NOMEcod 02
SELECT DA4_COD,DA4_NOME,DA4_CGC,DA4_NUMCNH
FROM "+RETSQLNAME("DA4")+" DA4 "
WHERE DA4' '
WHERE FQF_FILIAL = ' " + xFilial('DA4 ') + "' "
AND DA4_CODCLI = '"+cCli+"' "
AND DA4_LOJCLI = '"+cLoja+"' "
AND DA4
AND FQF_OS <> ''
AND FQF_DPRFIM = ''
AND FQF.D_E_L_E_T_ = ' ' "
cod05cod03
SELECT COUNT(*) AS QTDE_NOTIFICACOES_MULTASMOTORISTAS
FROM xEmp('TRX') TRX
INNER JOIN xEmp('FP0') FP0
ON FP0_FILIAL = xFilial('FP0')xEmp('DA4') DA4
AND FP0.D_E_L_E_T_ = ' 'WHERE DA4_FILIAL = xFilial('DA4')
AND FP0DA4_CLI CODCLI = '${CLIENT_ID}'
AND FP0DA4_LOJA LOJCLI = '${CLIENT_LOJA}'
INNER JOIN xEmp('FPA') FPA
ON FPA_FILIAL = xFilial('FPA')
AND FPA_PROJET = FP0_PROJET
AND FPA AND DA4.D_E_L_E_T_ = ' '
cod06
SELECT T4_SERVICO, T4_NOME,TE_CARACTE "
FROM "+RETSQLNAME("ST4")+" ST4 "
INNER JOIN "+RetSqlName("STE")+" STE ON TE_TIPOMAN = T4_TIPOMAN AND STE.D_E_L_E_T_ = ' '
AND FPA_AS <> ''
AND TRX_TPMULT = 'NOTIFICACAO'
WHERE TRX_FILIAL = xFilial('TRX')
AND TRX_AS = FPA_AS
AND TRX.D_E_L_E_T_ = ' '
TE_CARACTE = 'C' "
WHERE T4_FILIAL = '" + xFilial('ST4') + "' "
AND ST4.D_E_L_E_T_ = ' ' "
cod06
cQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME "
cQuery += "FROM "+RETSQLNAME("ST9")+" ST9 "
cQuery += "INNER JOIN "+RetSqlName("ST6")+" ST6 ON T6_CODFAMI = T9_CODFAMI AND ST6cod04
SELECT COUNT(*) AS QTDE_BENS_MANUTENCAO
FROM xEmp('FQF') FQF
INNER JOIN xEmp('FP0') FP0
ON FP0_FILIAL = xFilial('FP0')
AND FQF_PROJET = FP0_PROJET
AND FP0.D_E_L_E_T_ = '' "
AND FP0_CLI = '${CLIENT_ID}'cQuery += "WHERE T9_FILIAL = '" + xFilial('ST9') + "' "
If !Empty(cPlaca)
AND FP0_LOJA = '${CLIENT_LOJA}'
INNER JOIN xEmp('FQE') FQEcQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
ON FQE_FILIAL = xFilial('FQE')cQuery += "AND T9_CODBEM = '" + cBem + "' "
EndIf AND FQE_CODIGO = FQF_SUBST
cQuery += "AND FQEST9.D_E_L_E_T_ = ' ' "
EndIf
cod07
WHERE FQF_FILIAL = ' '
AND FQF_OS <> ''
AND FQF_DPRFIM = ''
AND FQFcQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME "
cQuery += "FROM "+RETSQLNAME("ST9")+" ST9 "
cQuery += "INNER JOIN "+RetSqlName("ST6")+" ST6 ON T6_CODFAMI = T9_CODFAMI AND ST6.D_E_L_E_T_ = '' "cod05
SELECT COUNT(*) AS QTDE_MOTORISTAS
FROM xEmpcQuery += "WHERE T9_FILIAL = '" + xFilial('DA4ST9') DA4+ "' "
WHERE DA4_FILIAL = xFilial('DA4'If !Empty(cPlaca)
AND DA4_CODCLI = '${CLIENT_ID}'
AND DA4_LOJCLI = '${CLIENT_LOJA}'cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
AND DA4.D_E_L_E_T_ = ' '
cod06
SELECT T4_SERVICO, T4_NOME,TE_CARACTE "
FROM "+RETSQLNAME("ST4")+" ST4 "
INNER JOIN "+RetSqlName("STE")+" STE ON TE_TIPOMAN = T4_TIPOMAN AND STEcQuery += "AND T9_CODBEM = '" + cBem + "' "
EndIf
cQuery += "AND ST9.D_E_L_E_T_ = ' ' AND TE_CARACTE = 'C' "
WHERE T4_FILIAL = '" + xFilial('ST4') + "' "
AND ST4.D_E_L_E_T_ = ' ' "
cod06
"
cod08
cQuery := "SELECT SF1.F1_DOC NOTA, "
cQuery += "MAX(FH1.FH1_ORDEM) OS, "
cQuery += "MAX(FH1.FH1_PEDCOM) PED_COMPRA, "
cQuery += "SE2.E2_VALOR VLR_TOTAL, "
cQuery += "MAX(SF1.F1_EMISSAO) EMISS_NOTA, SE2.E2_NUM NUM_TITU, "
cQuery += "MAX(SE2.E2_EMISSAO) EMISS_TIT, cQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME "
cQuery += "FROM "+RETSQLNAME("ST9")+" ST9 " (SE2.E2_PARCELA) PARCELA, "
cQuery += "INNER JOIN "+RetSqlName("ST6")+" ST6 ON T6_CODFAMI = T9_CODFAMI AND ST6.D_E_L_E_T_ = '' MAX(SE2.E2_VENCREA) PREV_PAGTO, "
cQuery += "MAX(SE2.E2_BAIXA) PAGO_EM "
cQuery += "WHERE T9_FILIAL = 'FROM "+ xFilial('ST9'RETSQLNAME("SE2")+" ' "
If !Empty(cPlaca)SE2 "
cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
cQuery += "AND T9_CODBEM = '" + cBem + "' "
EndIf
cQuery += "AND ST9LEFT JOIN "+RetSqlName("SD1")+" SD1 ON SD1.D1_FILIAL = SE2.E2_FILIAL "
cQuery += "AND SD1.D1_DOC = SE2.E2_NUM AND SD1.D_E_L_E_T_ = '' "
EndIf cod07
cQuery :+= "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME "
cQuery += "FROM "+RETSQLNAME("ST9")+" ST9 " AND SD1.D1_FORNECE = SE2.E2_FORNECE AND SD1.D1_LOJA = SE2.E2_LOJA "
cQuery += "INNER LEFT JOIN "+RetSqlName("ST6SF1")+" ST6 ON T6_CODFAMI = T9_CODFAMI AND ST6SF1 ON SF1.F1_FILIAL = SD1.D1_FILIAL "
//cQuery += "AND SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' "
cQuery += "WHERE T9_FILIAL = '" + xFilial('ST9') + "' "
If !Empty(cPlaca)
cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) '' AND SF1.F1_FORNECE = '"+ cPlaca cCodFor+"' "
EndIf
If !Empty(cBem)
cQuery += "AND T9_CODBEM AND SF1.F1_LOJA = '"+ cBem cLojFor+"' "
EndIf
cQuery += "AND ST9SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' "cod08
cQuery := "SELECT SF1.F1_DOC NOTA, "
cQuery += "MAX(FH1.FH1_ORDEM) OS, += "LEFT JOIN "+RetSqlName("FH1")+" FH1 ON FH1.FH1_FILIAL = SD1.D1_FILIAL "
cQuery += "MAX(AND FH1.FH1_PEDCOM ) PED_COMPRA, "
cQuery += "SE2.E2_VALOR VLR_TOTAL, = SD1.D1_PEDIDO AND FH1.FH1_CODIGO = SD1.D1_COD AND FH1.D_E_L_E_T_ = '' "
cQuery += "MAX(SF1.F1_EMISSAO) EMISS_NOTA, WHERE SE2.E2_NUM NUM_TITU, "
cQuery += "MAX(SE2.E2_EMISSAO) EMISS_TIT, FILIAL = '" + xFilial('SE2') + "' AND SE2.D_E_L_E_T_ = '' "
cQuery += "(AND SE2.E2_PARCELA) PARCELA, "
cQuery += "MAX(SE2.E2_VENCREA) PREV_PAGTO, FORNECE = '"+cCodFor+"' AND SE2.E2_LOJA = '"+cLojFor+"' "
cQuery += "MAX(AND SE2.E2_BAIXA) PAGO_EM "
cQuery += "FROM "+RETSQLNAME("SE2")+" SE2 EMISSAO >= '"+cdtini+"' AND SE2.E2_EMISSAO <= '"+cdtfim+"' "
cQuery += "LEFT JOIN "+RetSqlName("SD1")+" SD1 ON SD1.D1_FILIAL = GROUP BY SF1.F1_DOC,SE2.E2_VALOR,SE2.E2_PARCELA,SE2.E2_FILIAL NUM "
cod09
cQuery +:= "AND SD1.D1_DOC = SE2.E2_NUM AND SD1.D_E_L_E_T_ = '' SELECT AIA_DATATE,AIB.AIB_CODFOR,AIB.AIB_LOJFOR, AIB.AIB_CODPRO, "
cQuery += "AND SD1.D1_FORNECE = SE2.E2_FORNECE AND SD1.D1_LOJA = SE2.E2_LOJA "SB1.B1_DESC, SB1.B1_UM,AIB.AIB_PRCCOM,AIB_CODTAB, AIB.AIB_ITEM "
cQuery += "FROM "+RETSQLNAME("AIA")+" AIA "
cQuery += "LEFT INNER JOIN "+RetSqlName("SF1AIB")+" SF1 AIB ON SF1AIA.F1AIA_FILIAL CODTAB = SD1AIB.D1AIB_FILIAL CODTAB "
// cQuery += "AND SF1AIA.F1AIA_DOC = SD1.D1_DOC AND SF1FILIAL = AIB.AIB_FILIAL AND AIB.AIB_FILIAL = '" + xFilial('AIB') + "' AND AIB.D_E_L_E_T_ = '' AND SF1.F1_FORNECE "
cQuery += "AND AIB.AIB_CODFOR = '"+cCodFor+"' AND SF1AIB.F1AIB_LOJA LOJFOR = '"+cLojFor+"' "
cQuery += "AND SF1.F1_DOC = SD1.D1_DOC AND SF1AND AIB.D_E_L_E_T_ = '' "
cQuery += "LEFT INNER JOIN "+RetSqlName("FH1SB1")+" FH1 SB1 ON FH1AIB.FH1AIB_FILIAL CODPRO = SD1SB1.D1B1_FILIAL COD "
cQuery += "AND FH1SB1.FH1_PEDCOM = SD1.D1_PEDIDO AND FH1.FH1_CODIGO = SD1.D1_COD AND FH1.D_E_L_E_T_ = '' "
cQuery += "WHERE SE2.E2_B1_FILIAL = '" + xFilial('SE2SB1') + "'AND SE2SB1.D_E_L_E_T_ = '' "
cQuery += "AND SE2.E2_FORNECE = '"+cCodFor+"' AND SE2.E2_LOJA = '"+cLojFor+"' _T_ = '' "
cQuery += "AND SE2WHERE AIA.E2AIA_EMISSAO >FILIAL = '" + cdtinixFilial('AIA') + "' AND SE2.E2_EMISSAO <= '"+cdtfim+"AIA.D_E_L_E_T_ = '' "
cQuery += "GROUP BY SF1.F1_DOC,SE2.E2_VALOR,SE2.E2_PARCELA,SE2.E2_NUM "
cod09
cQuery := "SELECT AIA_DATATE,AIB.AIB_CODFOR,AIB.AIB_LOJFOR, AIB.AIB_CODPRO, AND AIA.AIA_DATATE >= '"+DTOS(dDataBase)+"' "
cQuery += "SB1.B1_DESC, SB1.B1_UM,ORDER BY AIB.AIB_PRCCOM,AIB_CODTAB , AIB.AIB_ITEM ""
cod10
cQuery +cQuer := "FROM "+RETSQLNAME("AIA")+" AIA " SELECT * "
cQuery cQuer += "INNER JOIN FROM "+RetSqlNameRETSQLNAME("AIBFQ4")+" AIB ON AIA.AIA_CODTAB = AIB.AIB_CODTAB FQ41 "
cQuery cQuer += "AND AIA.AIA_FILIAL = AIB.AIB_FILIAL AND AIB.AIB_FILIAL WHERE FQ41.FQ4_FILIAL = '" + xFilial('AIBFQ4') + "' AND AIBFQ41.D_E_L_E_T_ = '' "
cQuery cQuer += "AND AIB.AIB_CODFOR FQ41.R_E_C_N_O_ = '"+cCodFor+"' AND AIB.AIB_LOJFOR = '"+cLojFor+"' AND AIB.D_E_L_E_T_ = '' "
cQuery += "INNER JOIN "+RetSqlName("SB1")+" SB1 ON AIB.AIB_CODPRO = SB1.B1_COD "
cQuery += "AND SB1.B1_FILIAL = '" + xFilial('SB1') + "'AND SB1.D_E_L_E_T_ = '' "
cQuery += "WHERE AIA.AIA_FILIAL = '" + xFilial('str(TRBFQ4->RECNO)+"' "
cod11
If Upper(TCGetDB()) $ "MSSQL"
cLinha := "SELECT TOP "+alltrim(cQtd)+" "+cRetornos
cComando := 'cQuery += cLinha '
&(cComando)
else
cLinha := "SELECT "+cRetornos
cComando := 'cQuery += cLinha '
&(cComando)
EndIf
cLinha := " FROM "+retsqlname(cTabela)+" "+cTabela
cComando := 'cQuery += cLinha '
&(cComando)
cLinha := " WHERE "+alltrim(cTabela)+"AIA') + "' AND AIA.D_E_L_E_T_ = ' ' "
cComando := 'cQuery += cLinha '
&(cComando)
cLinha := " AND AIA.AIA_DATATE >= '"+DTOS(dDataBase)+"UPPER("+alltrim(cTabela)+"."+cCampoPesq+") LIKE '%"+cReferencia+"%' "
cComando := 'cQuery += "ORDER BY AIB.AIB_CODTAB "
cod10
cLinha '
&(cComando)
If Upper(TCGetDB()) $ "POSTGRES"
cQuery += " LIMIT "+alltrim(cQtd)
EndIF
If Upper(TCGetDB()) $ "ORACLE"
cQuery += " AND ROWNUM <= "+alltrim(cQtd)
EndIf cQuer := "SELECT * "
cQuer += "FROM "+RETSQLNAME("FQ4")+" FQ41 "
cQuer += "WHERE FQ41.FQ4_FILIAL = '" + xFilial('FQ4') + "' AND FQ41.D_E_L_E_T_ = '' "
cQuer += "AND FQ41.R_E_C_N_O_ = '"+str(TRBFQ4->RECNO)+"' "
05. ASSUNTOS RELACIONADOS
...