Identificador de Regra

PCP-900CCOCS01

Módulo: PCP - Planejamento e Controle Produção.

Finalidade: Através da regra associada a este identificador, é possível definir qual centro de custos deve ser atribuído a cada item de serviço da ordem de compra que está sendo gerada.

Tela: Geração de ordens de compras de serviço via produção

Transação: Não se aplica.

Regra:

Deve estar ligado a uma regra.

Exemplo de regra:

@ Regra que pega o centro de custos definido no modelo @

Definir Alfa VSCodOri;
Definir Numero VSNumOrp;
Definir Alfa VSCodPro;
Definir Alfa VSCodSer;
Definir Numero VSCodEtg;
Definir Alfa VSCodCcu;

Definir Alfa VSCodMod;

Definir Cursor Cur_E700Cmm;
Definir Cursor Cur_E900Cop;
Definir Cursor Cur_E075Pro;

@ Primeiro, busca o produto da OP @
Cur_E900Cop.SQL "SELECT CODPRO FROM E900COP WHERE CODORI = :VSCodOri AND NUMORP = :VsNumOrp";
Cur_E900Cop.AbrirCursor();
VSCodPro = Cur_E900Cop.CodPro;

@ Pega o modelo do produto @
Cur_E075Pro.SQL "SELECT CODMOD FROM E075PRO WHERE CODPRO = :VSCodPro";
Cur_E075Pro.AbrirCursor();
VSCodMod = Cur_E075Pro.CodMod;

@ Pega o centro de custos do serviço no modelo @
Cur_E700cmm.SQL "SELECT CODCCU FROM E700CMM WHERE CODMOD = :VSCodMod AND CODETG = :VSCodEtg and CODCMP = :VSCodSer";
Cur_E700cmm.AbrirCursor();
VSCodCcu = Cur_E700cmm.CodCcu;

Variáveis Disponibilizadas: