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, 15 de novembro de 2018 at 08:12


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