Descrição

Ponto de Entrada para levantamento dos Hits e Níveis de Atendimento de Peças.
Este PE não incrementa o levantamento, ele desvia do levantamento padrão, sendo então necessário que todo o levantamento seja feito no PE.

Observações

Exemplos

/*
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
±±ÚÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÂÄÄÄÄÄÄÂÄÄÄÄÄÄÄÄÄÄ¿±±
±±³Funcao ³ OJD12LV1 ³ Autor ³ MIL Data ³ 05/09/13 ³±±
±±ÃÄÄÄÄÄÄÄÄÄÄÅÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄ´±±
±±³Descricao ³ PE para desvio no Levantamento dos Niveis de Atendimento ³±±
±±ÃÄÄÄÄÄÄÄÄÄÄÅÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ´±±
±±³Uso ³ Veiculos ³±±
±±ÀÄÄÄÄÄÄÄÄÄÄÁÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙ±±
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
*/
User Function OJD12LV1()
Local lRet := .f.

Preview

Veja também

Idioma

Português(Brasil)

Versões

Todas

Sistemas Operacionais Suportados

Todos

Compatível com as Bases de Dados

Todas

Updates

Parâmetros

n/a

Retorno

Retorno lógico. Indica se deve ou não gravar o Flag de registro lido no item do Orçamento

Eventos de chamada do Ponto de Entrada

cQuery := "SELECT VS3.VS3_QTDPED, VS3.VS3_QESTNA, VS3.VS3_QTDELI, VS3.R_E_C_N_O_ VS3RECNO, VS1.VS1_TIPORC, VS1.VS1_FILIAL, VS1.VS1_NUMORC, VS1.VS1_DATORC, VOI.VOI_SITTPO, VQ3.R_E_C_N_O_ VQ3RECNO, SB1.B1_COD, SB2.B2_QATU FROM "RetSQLName("VS3")" VS3 "
cQuery = "INNER JOIN "+RetSQLName("VS1")" VS1 ON VS1.VS1_FILIAL = VS3.VS3_FILIAL AND VS1.VS1_NUMORC = VS3.VS3_NUMORC AND VS1.VS1_TIPORC = 'P' AND VS1.D_E_L_E_T_=' ' "
cQuery = "LEFT JOIN "+RetSQLName("VOI")" VOI ON VOI.VOI_FILIAL = '"xFilial("VOI")"'AND VOI.VOI_TIPTEM = VS1.VS1_TIPTEM AND VOI.VOI_SITTPO = '3' AND VOI.D_E_L_E_T_=' ' "
cQuery = "INNER JOIN "+RetSQLName("SB1")" SB1 ON SB1.B1_FILIAL = '"xFilial("SB1")"' AND SB1.B1_GRUPO = VS3.VS3_GRUITE AND SB1.B1_CODITE = VS3.VS3_CODITE AND SB1.D_E_L_E_T_=' ' "
cQuery = "INNER JOIN "+RetSQLName("SB2")" SB2 ON SB2.B2_FILIAL = '"xFilial("SB2")"' AND SB2.B2_COD = SB1.B1_COD AND SB2.B2_LOCAL = SB1.B1_LOCPAD AND SB2.D_E_L_E_T_=' ' "
cQuery = "LEFT JOIN "+RetSQLName("VQ3")" VQ3 ON VQ3.VQ3_FILIAL = '"xFilial("VQ3")"' AND VQ3.VQ3_PRODUT = SB1.B1_COD AND VQ3.VQ3_ANO"FG_CONVSQL("CONCATENA")"VQ3.VQ3_MES = LEFT(VS1.VS1_DATORC,6) AND VQ3.D_E_L_E_T_=' ' "
cQuery = "WHERE VS3.VS3_FILIAL = '"+xFilial("VS3")"' AND VS3.VS3_FLGNAT <> '1' AND VS3.D_E_L_E_T_=' ' "

Variáveis

Programa Fonte

OFINJD12.PRW