Histórico da Página
...
- cnpj_empresa- Empresa logada no aplicativo - SIGAMAT
- cod_query- Código da Query que será executada para a exbição dos dados de retorno no APP, as queries são executadas juntamente com a rotina banco de queries do APP, rotina LOCA098
- cod_for - Código do Fornecedor da filial logada
- loj_for - Loja do Fornecedor da filial logada
- cdtini - data de inicio da emissão do titulo - tem que ser no formato americano - yyyymmdd
- cdfin - data de fim da emissão do titulo - tem que ser no formato americano - yyyymmdd
Obrigatórios:
- cnpj_empresa
- cod_query
- cod_for
- loj_for
- cdtini
- cdtfim
...
Parâmetros de entrada para retornar a ultima AS, o ulitmo ultimo Projeto e Obra da FQ4 (10)
- cnpj_empresa- Empresa logada no aplicativo - SIGAMAT
- cod_query- Código da Query que será executada para a exbição exibição dos dados de retorno no APP, as queries são executadas juntamente com a rotina banco de queries do APP, rotina LOCA098
- cod_bem - código do Bem a ser filtrado
Obrigatórios:
- cnpj_empresa
- cod_query
- cod_bem
...
- tabela
- campopesq
- referencia
- retornos
- qtd
Parâmetros de entrada para retornar com a lista de uma tabela (11)
- 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"
Request:
Para execução da Query 01 Para execução da Query 01 { Para execução da Query 02 { Para execução da Query 03 { Para execução da Query 0402 { Para execução da Query 0503 { Para execução da Query 0604 { Para execução da Query 0705 { Para execução da Query 0806 { Para execução da Query 07 { Para execução da Query 0908 { Para execução da Query 1009 { |
Retorno esperado:
Response:
"loj_for":"01" Para execução da Query 10 { cod_query = 01 { cod_query = 02 Para execução da Query 11 (Fornecedores) { Para execução da Query 11 (Condição de pagamento) { Para execução da Query 11 (Produtos) { | |
Retorno esperado:
Response:
cod_query = 01cod_query = 03 { cod_query = 0402 { cod_query = 05 { cod_query = 06 {"Retorno": "OK", "Dados": [
DA4_ SERVICOCOD": " ELEINSLOC005", DA4_NOME": " INSPECAO DE PECAS ELETRICASDENNIS1", DA4_ CARACTENUMCNH": " C1234567890" DA4_ SERVICOCOD": " ELESUBLOC004", DA4_NOME": " SUBSTITICAO DE PECAS ELETRICASDENNIS2", DA4_ CARACTECGC": " C12345678901", "DA4_NUMCNH": "1234567890" ] cod_query = 03 { "Retorno": " MECANIOK", TRX_NOME": " SERVICO MECANICOMOTORISTA SIGALOC",
" TEQTDE_NOTIFICACOES_ CARACTEMULTAS": "C"1 }] cod_query = 04 { "Retorno": " CORMNTOK", "T4_NOME": "CORRETIVA PADRAO MNT", "TE_CARACTE": "C" "Dados": [{"QTDE_BENS_MANUTENCAO": 1}] cod_query = 05 { cod_query = 0706 { cod_query = 08 { } cod_query = 07 { cod_query = 08 { cod_query = 09 { cod_query = 1009 { cod_query = 10 { |
04. DEMAIS INFORMAÇÕES
Para saber as queries que são executadas no app, seguem abaixo com seus respectivos códigos:
", cod_query = 11 (Fornecedores) { 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:
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_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'_PROJET
AND TRXFPA.D_E_L_E_T_ = ' '
GROUP BY TRX_NOME AND FPA_AS <> ''
ORDER BY AND TRX_NOMETPMULT = 'NOTIFICACAO'
WHERE TRX_FILIAL = xFilial('TRX')
AND TRX_AS = FPA_AS
AND TRXcod 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_ = ' ' "
cod04cod03
SELECT COUNT(*) AS QTDE_NOTIFICACOESBENS_MULTASMANUTENCAO
FROM xEmp('TRXFQF') TRXFQF
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_ = ' '
WHERE FQF_FILIAL AND TE_CARACTE = 'C'
AND FQF_OS <> ''
AND FQF_DPRFIM = ''
AND FQF"
WHERE T4_FILIAL = '" + xFilial('ST4') + "' "
AND ST4.D_E_L_E_T_ = ' ' "
cod05
SELECT COUNT(*) AS QTDE_MOTORISTAS
FROM xEmp('DA4') DA4
WHERE DA4_FILIAL = xFilial('DA4')
AND DA4_CODCLI = '${CLIENT_ID}'
AND DA4_LOJCLI = '${CLIENT_LOJA}'
AND DA4.D_E_L_E_T_ = ' '
cod06
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_ = '' "
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 ST9SELECT 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_ = ' ' "
EndIf
cod06cod07
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_ = '' "
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 ST9.D_E_L_E_T_ = ' ' "
EndIf
cod07
cQuery := "SELECT T9_FILIAL, T9_CODBEM, T9_NOME, T9_PLACA, T9_CODFAMI, T6_NOME "
cBem)
cQuery += "FROM AND T9_CODBEM = '" + RETSQLNAME("ST9")cBem + " ST9 ' "
EndIf
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') + "' "
If !Empty(cPlaca)
SELECT SF1.F1_DOC NOTA, "
cQuery += "MAX(FH1.FH1_ORDEM) OS, "
cQuery += "AND LTRIM(RTRIM(REPLACE(T9_PLACA,'-',''))) = '" + cPlaca + "' "
EndIf
If !Empty(cBem)
cQuery += "AND T9_CODBEM = '" + cBem + "' "
EndIf 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 += "AND ST9(SE2.D_E_L_E_T_ = ' ' "
cod08
E2_PARCELA) PARCELA, "
cQuery :+= "SELECT SF1.F1_DOC NOTAMAX(SE2.E2_VENCREA) PREV_PAGTO, "
cQuery += "MAX(FH1SE2.FH1E2_ORDEM) OS, BAIXA) PAGO_EM "
cQuery += "MAX(FH1.FH1_PEDCOM) PED_COMPRA, += "FROM "+RETSQLNAME("SE2")+" SE2 "
cQuery += "LEFT JOIN "+RetSqlName("SD1")+" SD1 ON SD1.D1_FILIAL = SE2.E2_FILIAL "
cQuery += "AND SD1.D1_DOC = SE2.E2_VALOR VLR_TOTAL, NUM AND SD1.D_E_L_E_T_ = '' "
cQuery += "MAX(SF1.F1_EMISSAO) EMISS_NOTA, AND SD1.D1_FORNECE = SE2.E2_FORNECE AND SD1.D1_LOJA = SE2.E2_NUM NUM_TITU, LOJA "
cQuery += "MAX(SE2.E2_EMISSAO) EMISS_TIT, LEFT JOIN "+RetSqlName("SF1")+" SF1 ON SF1.F1_FILIAL = SD1.D1_FILIAL "
//cQuery += "(SE2.E2_PARCELA) PARCELA, "
cQuery += "MAX(SE2.E2_VENCREA) PREV_PAGTO, 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 += "MAX(SE2.E2_BAIXA) PAGO_EM AND SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' "
cQuery += "FROM LEFT JOIN "+RETSQLNAMERetSqlName("SE2FH1")+" SE2 FH1 ON FH1.FH1_FILIAL = SD1.D1_FILIAL "
cQuery += "LEFT JOIN "+RetSqlName("SD1")+" SD1 ON AND FH1.FH1_PEDCOM = SD1.D1_PEDIDO AND FH1.FH1_CODIGO = SD1.D1_FILIAL = SE2.E2_FILIAL COD AND FH1.D_E_L_E_T_ = '' "
cQuery += "WHERE SE2.E2_FILIAL = '" + xFilial('SE2') + "' AND SD1.D1_DOC = SE2.E2_NUM AND SD1.D_E_L_E_T_ = '' "
cQuery += "AND SD1.D1_FORNECE = SE2.E2_FORNECE AND SD1.D1_LOJA = = '"+cCodFor+"' AND SE2.E2_LOJA "
cQuery += "LEFT JOIN "+RetSqlName("SF1")+" SF1 ON SF1.F1_FILIAL = SD1.D1_FILIAL = '"+cLojFor+"' "
// cQuery += "AND SF1SE2.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' AND SF1.F1_FORNECE E2_EMISSAO >= '"+cCodForcdtini+"' AND SF1SE2.F1E2_LOJA EMISSAO <= '"+cLojForcdtfim+"' "
cQuery += "AND GROUP BY SF1.F1_DOC = SD1.D1_DOC AND SF1.D_E_L_E_T_ = '' ",SE2.E2_VALOR,SE2.E2_PARCELA,SE2.E2_NUM "
cod09
cQuery := "SELECT AIA_DATATE,AIB.AIB_CODFOR,AIB.AIB_LOJFOR, AIB.AIB_CODPRO, "
cQuery += "SB1.B1_DESC, SB1.B1_UM,AIB.AIB_PRCCOM,AIB_CODTAB, AIB.AIB_ITEM "
cQuery += "FROM "+RETSQLNAME("AIA")+" AIA "
cQuery += "LEFT INNER JOIN "+RetSqlName("FH1AIB")+" FH1 AIB ON FH1AIA.FH1AIA_FILIAL CODTAB = SD1AIB.D1AIB_FILIAL CODTAB "
cQuery += "AND FH1AIA.FH1AIA_PEDCOM FILIAL = SD1AIB.D1AIB_PEDIDO FILIAL AND FH1 AIB.FH1AIB_CODIGO = SD1.D1_COD AND FH1FILIAL = '" + xFilial('AIB') + "' AND AIB.D_E_L_E_T_ = '' "
cQuery += "WHERE SE2.E2_FILIAL AND AIB.AIB_CODFOR = '"+cCodFor+"' AND AIB.AIB_LOJFOR = '"+ xFilial('SE2') cLojFor+"' AND SE2AIB.D_E_L_E_T_ = '' "
cQuery += "AND SE2.E2_FORNECE = '"+cCodFor+"' AND SE2.E2_LOJA = '"+cLojFor+"' INNER JOIN "+RetSqlName("SB1")+" SB1 ON AIB.AIB_CODPRO = SB1.B1_COD "
cQuery += "AND SE2SB1.E2B1_EMISSAO >FILIAL = '" + cdtinixFilial('SB1') + "'AND SE2SB1.E2_EMISSAO <= '"+cdtfim+"' "
cQuery += "GROUP BY SF1.F1_DOC,SE2.E2_VALOR,SE2.E2_PARCELA,SE2.E2_NUM "cod09D_E_L_E_T_ = '' "
cQuery :+= "SELECT AIA_DATATE,AIB.AIB_CODFOR,AIB.AIB_LOJFOR, AIB.AIB_CODPRO, WHERE AIA.AIA_FILIAL = '" + xFilial('AIA') + "' AND AIA.D_E_L_E_T_ = '' "
cQuery += "SB1AND AIA.B1_DESC, SB1.B1_UM,AIB.AIB_PRCCOM,AIB_CODTAB, AIA_DATATE >= '"+DTOS(dDataBase)+"' "
cQuery += "ORDER BY AIB.AIB_ITEM CODTAB "
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_T_ = '' "
cQuer += "AND FQ41.R_E_C_N_O_ = '"+str(TRBFQ4->RECNO)+"' "
cod11
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 = '" + xFilialIf 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 += "AND AIA.AIA_DATATE >= '"+DTOS(dDataBasecLinha '
&(cComando)
cLinha := " AND 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