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 { |
...
"cnpj_empresa":"53485215000106", |
...
" |
...
cod_ |
...
query":" |
...
05", |
...
" |
...
cod_ |
...
cli":" |
...
000094", |
...
" |
...
loj_ |
...
cli":"01" |
...
} |
...
Para execução da Query 06 { |
...
" |
...
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" |
...
...
Exemplo para a consulta de produtos:
Requisição:
|
...
} Para execução da Query 10 { Para execução da Query 11 (Fornecedores) { Para execução da Query 11 (Condição de pagamento) |
{ |
...
SE4", |
...
E4_ |
...
CODIGO", |
...
01", |
...
E4_CODIGO,E4_TIPO,E4_COND,E4_DESCRI", |
...
30" |
...
Para execução da Query 11 (Produtos) |
...
{ |
...
" |
...
cnpj_empresa":" |
...
53485215000106", |
...
" |
...
cod_query":"11", |
...
" |
...
, |
...
"retornos":"B1_COD,B1_DESC", |
...
10" |
...
...
} | |
Retorno esperado:
Response:
cod_query = 01 { |
...
" |
...
Retorno": " |
...
OK", |
...
"Dados": [ { |
...
" |
...
TRX_ |
...
NOME": " |
...
MOTORISTA SIGALOC", |
...
"MULTAS": 1 |
...
] |
...
...
} cod_query = 02 Para execução da Query 01 { Para execução da Query 02 { Para execução da Query 03 { Para execução da Query 04 , cod_query = 03Para execução da Query 05 { cod_query = 04Para execução da Query 06 { cod_query = 05 { Para execução da Query 07cod_query = 06 { " cnpj_empresaRetorno": " 53485215000106OK", Dados": "07","cod_bem":"0000000002", "placa":"EEEEEEEE" } Para execução da Query 08 [ T4_ empresaSERVICO": " 53485215000106ELEINS", T4_ queryNOME": " 08INSPECAO DE PECAS ELETRICAS", TE_ forCARACTE": " 000006C" { ELESUB", "T4_NOME": " 20160101SUBSTITICAO DE PECAS ELETRICAS", "TE_CARACTE": " 20251231C" Para execução da Query 09 , T4_ empresaSERVICO": " 53485215000106MECANI", T4_ queryNOME": " 09SERVICO MECANICO", TE_ forCARACTE": " 000006C" ,
} Para execução da Query 10 {"cnpj_empresa , CORMNT", T4_ queryNOME": " 10CORRETIVA PADRAO MNT", TE_ bemCARACTE": " 0000000002C" ,} Para execução da Query 11 (Fornecedores) {"cnpj_empresa cod_query = 07 { OK", Dados": "11","tabela [ { D MG 01", T9_CODBEM": " A2_NOME0000000002", T9_NOME": " JOAOATIVO 0000000002", T9_PLACA": " A2_COD,A2_NOME,A2_LOJAEEEEEEEE", T9_CODFAMI": " 10FAM01",
Para execução da Query 11 (Condição de pagamento) {
" cnpjT6_ empresaNOME": " 53485215000106FAMILIA DE BENS 01" ,
}] cod_query = 08 { OK", Dados": "SE4","campopesq [ ", OS": " 01", PED_COMPRA": " E4_CODIGO,E4_TIPO,E4_COND,E4_DESCRI", } Para execução da Query 11 (Produtos) {"cnpj_empresa":"53485215000106 "VLR_TOTAL": 380.74, NUM_ queryTITU": " 11FN430_002", EMISS_TIT": " SB120230807", PARCELA": " B1_DESC", PREV_PAGTO": " BASE20230807", "qtd":"10" } |
Retorno esperado:
Response:
cod_query = 01 "PAGO_EM": "" NOTA": " OK", OS": [ {"", PED_ NOMECOMPRA": " MOTORISTA SIGALOC", VLR_TOTAL": 1500, } cod_query = 02 {" RetornoEMISS_NOTA": " OK", [ { "NUM_TITU": "FINA05001", EMISS_ CODTIT": " LOC00120160108", PARCELA": " DENNIS3", PREV_ CGCPAGTO": " 1234567890120160108", PAGO_ NUMCNHEM": " 1234567890" NOTA": " LOC005", OS": " DENNIS1", PED_ CGCCOMPRA": " 12345678901", VLR_ NUMCNHTOTAL": "1234567890"} 808.12, "EMISS_NOTA": "", NUM_ CODTITU": " LOC004FN430_007", EMISS_ NOMETIT": " DENNIS220230807", PARCELA": " 12345678901", PREV_ NUMCNHPAGTO": " 123456789020230807", ] } cod_query = 03 {"Retorno": "OK "PAGO_EM": "" OS": [ {"", PED_ NOMECOMPRA": " MOTORISTA SIGALOC", VLR_ NOTIFICACOES_MULTASTOTAL": 1985, } cod_query = 04 {" RetornoEMISS_NOTA": " OK", } cod_query = 05 {"Retorno": "OK "NUM_TITU": "FINR15006", "PREV_PAGTO": [{" QTDE_MOTORISTAS": 4}]} cod_query = 06 { } cod_query = 07 { cod_query = 08 },{ cod_query = 09 { cod_query = 10 { cod_query = 09 BEM 174LOC - 174LOC - STATUS: L1-CONTRATO GERADO - CHECKLIST - CONTRATO: 202500319 - OBRA: Obr - STATUS ATUAL: L2-NF DE REMESSA GERADA - - / / -", cod_query = 11 (Fornecedores) { cod_query = 11 (Condição de pagamento) { cod_query = 10 { ... 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:
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
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_ = ' ' "
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 TRX_TPMULT = 'TRANSITO'
AND TRX.D_E_L_E_T_ = ' '
GROUP BY TRX_NOME
cod04
SELECT COUNT(*) AS QTDE_BENS_MANUTENCAO
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')
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}'
AND FP0_LOJA = '${CLIENT_LOJA}'
INNER JOIN xEmp('FPAFQE') FPAFQE
ON FPAFQE_FILIAL = xFilial('FPAFQE')
AND FPAFQE_PROJET CODIGO = FP0FQF_PROJETSUBST
AND FPAFQE.D_E_L_E_T_ = ' '
AND FPA_AS <> WHERE FQF_FILIAL = ' '
AND TRXFQF_TPMULT = OS <> 'NOTIFICACAO'
WHERE TRX_FILIAL = xFilial('TRX') AND FQF_DPRFIM = ''
AND TRX_AS = FPA_AS
AND TRXFQF.D_E_L_E_T_ = ' 'cod04
cod05
SELECT COUNT(*) AS QTDE_BENS_MANUTENCAOMOTORISTAS
FROM xEmp('FQFDA4') FQFDA4
INNER JOIN xEmpWHERE DA4_FILIAL = xFilial('FP0DA4') FP0
ON FP0AND DA4_FILIAL CODCLI = xFilial('FP0')'${CLIENT_ID}'
AND FQFDA4_PROJET = FP0_PROJETLOJCLI = '${CLIENT_LOJA}'
AND FP0DA4.D_E_L_E_T_ = ' '
AND FP0_CLI = '${CLIENT_ID}'
AND FP0_LOJA = '${CLIENT_LOJA}'
INNER JOIN xEmp('FQE') FQE
ON FQE_FILIAL = xFilial('FQE')
AND FQE_CODIGO = FQF_SUBST
AND FQE
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 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 ST6.D_E_L_E_T_ = '' "
WHERE FQFcQuery += "WHERE T9_FILIAL = '" + xFilial('ST9') + "' "
AND FQF_OS <> ''If !Empty(cPlaca)
AND FQF_DPRFIM = ''
AND FQF.D_E_L_E_T_ = ' 'cod05
SELECT COUNT(*) AS QTDE_MOTORISTAS
FROM xEmp('DA4') DA4
WHERE DA4_FILIAL = xFilial('DA4'cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
cQuery += "AND DA4T9_CODCLI CODBEM = '${CLIENT_ID}'" + cBem + "' "
EndIf AND DA4_LOJCLI = '${CLIENT_LOJA}'
cQuery += "AND DA4ST9.D_E_L_E_T_ = ' ' "
cod06
EndIf
cod07
cQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME "
cQuery += "SELECT T4_SERVICO, T4_NOME,TE_CARACTE "
FROM "+RETSQLNAME("ST4ST9")+" ST4 ST9 "
cQuery += "INNER JOIN "+RetSqlName("STEST6")+" STE ST6 ON TET6_TIPOMAN CODFAMI = T4T9_TIPOMAN CODFAMI AND STEST6.D_E_L_E_T_ = '' AND TE_CARACTE = 'C' "
WHERE T4"
cQuery += "WHERE T9_FILIAL = '" + xFilial('ST4ST9') + "' "
AND ST4.D_E_L_E_T_ = ' ' "
cod06
If !Empty(cPlaca)
cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
cQuery += "AND T9_CODBEM = '" + cBem + "' "
EndIf 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 ST6AND ST9.D_E_L_E_T_ = ' ' "
cod08
cQuery +:= "WHERE T9_FILIAL = '" + xFilial('ST9') + "' SELECT SF1.F1_DOC NOTA, "
If !Empty(cPlaca)
cQuery += "MAX(FH1.FH1_ORDEM) OS, "
cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
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 += "AND T9_CODBEM = '" + cBem + "' "
EndIf MAX(SE2.E2_EMISSAO) EMISS_TIT, "
cQuery += "(SE2.E2_PARCELA) PARCELA, "
cQuery += "AND ST9.D_E_L_E_T_ = ' ' "
EndIf
cod07
cQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME MAX(SE2.E2_VENCREA) PREV_PAGTO, "
cQuery += "MAX(SE2.E2_BAIXA) PAGO_EM "
cQuery += "FROM "+RETSQLNAME("ST9SE2")+" ST9 SE2 "
cQuery += "INNER LEFT JOIN "+RetSqlName("ST6SD1")+" ST6 ON T6_CODFAMI = T9_CODFAMI AND ST6SD1 ON SD1.D1_FILIAL = SE2.E2_FILIAL "
cQuery += "AND SD1.D1_DOC = SE2.E2_NUM AND SD1.D_E_L_E_T_ = '' "
cQuery += "WHERE T9_FILIAL = '" + xFilial('ST9') + "' "
If !Empty(cPlaca)
cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
cQuery += "AND T9_CODBEM = '" + cBem + "' "
EndIf
cQuery += "AND ST9AND SD1.D1_FORNECE = SE2.E2_FORNECE AND SD1.D1_LOJA = SE2.E2_LOJA "
cQuery += "LEFT JOIN "+RetSqlName("SF1")+" SF1 ON SF1.F1_FILIAL = SD1.D1_FILIAL "
//cQuery += "AND SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' AND SF1.F1_FORNECE = '"+cCodFor+"' AND SF1.F1_LOJA = '"+cLojFor+"' "
cQuery += "AND SF1.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, "
cQuery += "MAX(SF1.F1_EMISSAO) EMISS_NOTA, SE2.E2_NUM NUM_TITU, = SD1.D1_PEDIDO AND FH1.FH1_CODIGO = SD1.D1_COD AND FH1.D_E_L_E_T_ = '' "
cQuery += "MAX(WHERE SE2.E2_EMISSAO) EMISS_TIT, "
cQuery += "(SE2.E2_PARCELA) PARCELA, "
cQuery += "MAX(SE2.E2_VENCREA) PREV_PAGTO, FILIAL = '" + xFilial('SE2') + "' AND SE2.D_E_L_E_T_ = '' "
cQuery += "MAX(AND SE2.E2_BAIXA) PAGO_EM "
cQuery += "FROM "+RETSQLNAME("SE2")+" SE2 FORNECE = '"+cCodFor+"' AND SE2.E2_LOJA = '"+cLojFor+"' "
cQuery += "LEFT JOIN "+RetSqlName("SD1")+" SD1 ON SD1.D1_FILIAL = AND SE2.E2_EMISSAO >= '"+cdtini+"' AND SE2.E2_FILIAL EMISSAO <= '"+cdtfim+"' "
cQuery += "AND SD1.D1_DOC = GROUP BY SF1.F1_DOC,SE2.E2_VALOR,SE2.E2_NUM AND SD1.D_E_L_E_T_ = '' PARCELA,SE2.E2_NUM "
cod09
cQuery := "SELECT AIA_DATATE,AIB.AIB_CODFOR,AIB.AIB_LOJFOR, AIB.AIB_CODPRO, "
cQuery += "AND SD1SB1.D1_FORNECE = SE2.E2_FORNECE AND SD1.D1_LOJA = SE2.E2_LOJA B1_DESC, SB1.B1_UM,AIB.AIB_PRCCOM,AIB_CODTAB, AIB.AIB_ITEM "
cQuery += "LEFT JOIN FROM "+RetSqlNameRETSQLNAME("SF1AIA")+" SF1 ON SF1.F1_FILIAL = SD1.D1_FILIAL "" AIA "
// cQuery += "AND SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' AND SF1.F1_FORNECE = '"+cCodFor+"' AND SF1.F1_LOJA = '"+cLojFor+"' "INNER JOIN "+RetSqlName("AIB")+" AIB ON AIA.AIA_CODTAB = AIB.AIB_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_ = '' "
cQuery += "LEFT JOIN "+RetSqlName("FH1")+" FH1 ON FH1.FH1_FILIAL = SD1.D1_FILIAL "
cQuery += "AND FH1.FH1_PEDCOM = SD1.D1_PEDIDO AND FH1.FH1_CODIGO = SD1.D1_COD AND FH1AND AIB.AIB_CODFOR = '"+cCodFor+"' AND AIB.AIB_LOJFOR = '"+cLojFor+"' AND AIB.D_E_L_E_T_ = '' "
cQuery += "WHERE SE2.E2INNER JOIN "+RetSqlName("SB1")+" SB1 ON AIB.AIB_CODPRO = SB1.B1_COD "
cQuery += "AND SB1.B1_FILIAL = '" + xFilial('SE2SB1') + "'AND SE2SB1.D_E_L_E_T_ = '' "
cQuery += "AND SE2WHERE AIA.E2AIA_FORNECE FILIAL = '" + cCodFor+"' AND SE2.E2_LOJA = '"+cLojFor+"' "
cQuery += "AND SE2.E2_EMISSAO >= '"+cdtini+"' AND SE2.E2_EMISSAO <= '"+cdtfimxFilial('AIA') + "' AND AIA.D_E_L_E_T_ = '' "
cQuery += "AND AIA.AIA_DATATE >= '"+DTOS(dDataBase)+"' "
cQuery += "GROUP BY SF1.F1_DOC,SE2.E2_VALOR,SE2.E2_PARCELA,SE2.E2_NUM "
cod09
cQuery := "SELECT AIA_DATATE,ORDER BY AIB.AIB_CODFOR,AIB.AIB_LOJFOR, AIB.AIB_CODPRO, CODTAB " cQuery += "SB1.B1_DESC, SB1.B1_UM,AIB.AIB_PRCCOM,AIB_CODTAB, AIB.AIB_ITEM
cod10
cQuer := "SELECT * "
cQuery cQuer += "FROM "+RETSQLNAME("AIAFQ4")+" AIA FQ41 "
cQuery cQuer += "INNER JOIN WHERE FQ41.FQ4_FILIAL = '" + RetSqlName("AIB"xFilial('FQ4') + " AIB ON AIA.AIA_CODTAB = AIB.AIB_CODTAB "
cQuery += "AND AIA.AIA_FILIAL = AIB.AIB_FILIAL AND AIB.AIB_FILIAL = '" + xFilial('AIB') + "' AND AIB.D_E_L_E_T_ = '' "
cQuery += "AND AIB.AIB_CODFOR = '"+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('' AND FQ41.D_E_L_E_T_ = '' "
cQuer += "AND FQ41.R_E_C_N_O_ = '"+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
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas