Imprimi Página | Fechar janela |
Filtro por legenda - Ordem de Produção Impresso de: Helpfacil - Portal do conhecimento Nome do Forum: Qualidade Descrição do Forum: Dúvidas Módulos de Qualidade (Celerina) URL:http://www.helpfacil.com.br/display_topic_threads.asp?ForumID=12&TopicID=42304 Data da Impressão: quinta-feira, 28 de março de 2024 at 20:36 Topico: Filtro por legenda - Ordem de Produção Postado por: SHCMOTTA Assunto: Filtro por legenda - Ordem de Produção Data Postagem: quinta-feira, 8 de novembro de 2018 at 14:18 Olá. Preciso criar filtros baseados nas legendas da rotina de Ordem de Produção no Protheus. Podem me orientar na construção das expressões? Sou iniciante. OP Prevista - Expressão do filtro? OP Em aberto - Expressão do filtro? OP Iniciada - Expressão do filtro? OP Ociosa - Expressão do filtro? OP Encerrada parcialmente - Expressão do filtro? OP Encerrada totalmente - Expressão do filtro? ____________________________ Att, Sérgio Motta Respostas: Postado Por: EMERSON.EN Data Postagem: terça-feira, 13 de novembro de 2018 at 12:20 SC2->C2_TPOP == "P" //Prevista SC2->C2_TPOP == "F" .And. Empty(SC2->C2_DATRF) .And. (nRegSD3 < 1 .And. nRegSH6 < 1) .And. (Max (dDataBase - SC2->C2_DATPRI,0) < If(SC2->C2_DIASOCI==0,1,SC2->C2_DIASOCI)) //Em aberto SC2->C2_TPOP == "F" .And. Empty(SC2->C2_DATRF) .And. (nRegSD3 > 0 .Or. nRegSH6 > 0) .And. (Max ((ddatabase - dEmissao),0) > If(SC2->C2_DIASOCI >= 0,-1,SC2->C2_DIASOCI)) //Iniciada SC2->C2_TPOP == "F" .And. Empty(SC2->C2_DATRF) .And. (Max ((ddatabase - dEmissao),0) > SC2->C2_DIASOCI .Or. Max ((ddatabase - SC2->C2_DATPRI),0) >= SC2->C2_DIASOCI) //Ociosa SC2->C2_TPOP == "F" .And. !Empty(SC2->C2_DATRF) .And. SC2->(C2_QUJE < C2_QUANT) //Enc.Parcialmente SC2->C2_TPOP == "F" .And. !Empty(SC2->C2_DATRF) .And. SC2->(C2_QUJE >= C2_QUANT) //Enc.Totalmente Postado Por: EMERSON.EN Data Postagem: terça-feira, 13 de novembro de 2018 at 12:26 Ou, dependendo de como você vai utilizar, pode chamar a função A650DefLeg(). A650DefLeg(1) // Prevista A650DefLeg(2) //"Em aberto" A650DefLeg(3) //"Iniciada" A650DefLeg(4) //"Ociosa" A650DefLeg(5) //"Encerrada parcialmente" A650DefLeg(6) //"Encerrada totalmente" |
Imprimir Página | Fechar Janela |