Linha de Produto: | Protheus | ||||||||||||
Segmento: | Manufatura | ||||||||||||
Módulo: | SIGAPCP - Planejamento e Controle da Produção | ||||||||||||
Parâmetro(s): |
| ||||||||||||
Idiomas: | Todos | ||||||||||||
País(es): | Todos | ||||||||||||
Banco(s) de Dados: | Todos | ||||||||||||
Sistema(s) Operacional(is): | Todos |
| Descrição: | O ponto de entrada P145GDOC é executado durante a geração de documentos do MRP. |
| Localização: | Function PCPA145JOB - Geração de documentos do MRP. |
| Eventos: | Durante a criação dos documentos do MRP. |
| Programa Fonte: | PCPA145JOB.PRW |
Sintaxe: | P145GDOC( [ [ aDados ] ) --> lRet |
| Retorno: | lRet - Indica se o documento será gerado ou não.
|
| Observações: | Este ponto de entrada é chamado para cada documento durante a geração de documento do MRP. O ponto de entrada recebe o array aDados, com as informações do documento que será gerado e seu retorno indica se o documento será gerado pelo MRP ou não. As posições do array a dados seguem os defines com prefixo RASTREIO_ no arquivo PCPA145DEF.ch. |
#INCLUDE "TOTVS.CH"
#DEFINE RASTREIO_POS_PRODUTO 1 // HWC_PRODUT - Produto
#DEFINE RASTREIO_POS_FILIAL 25 // HWC_FILIAL - Filial
User Function P145GDOC()
Local aDados := PARAMIXB
Local cFilAux := aDados[RASTREIO_POS_FILIAL]
Local cProduto := aDados[RASTREIO_POS_PRODUTO]
Local lGeraDoc := .T.
// Gera documentos apenas de produtos do tipo PA.
If SB1->(dbSeek(xFilial("SB1", cFilAux) + cProduto))
lGeraDoc := SB1->B1_TIPO == "PA"
EndIf
Return lGeraDoc |
#DEFINE RASTREIO_POS_PRODUTO 1 // HWC_PRODUT - Produto #DEFINE RASTREIO_POS_TRT 2 // HWC_TRT - TRT #DEFINE RASTREIO_POS_DATA_ENTREGA 3 // HWC_DATA - Data de Entrega #DEFINE RASTREIO_POS_DATA_INICIO 4 // HWB_DTINIC - Data de Início #DEFINE RASTREIO_POS_TIPODOC 5 // HWC_TPDCPA - Tipo do Documento Pai #DEFINE RASTREIO_POS_DOCPAI 6 // HWC_DOCPAI - Documento Pai (MRP) #DEFINE RASTREIO_POS_DOCFILHO 7 // HWC_DOCFIL - Documento (MRP) #DEFINE RASTREIO_POS_NECES_ORIG 8 // HWC_QTNEOR - Necessidade Original #DEFINE RASTREIO_POS_SALDO_EST 9 // HWC_QTSLES - Saldo Estoque #DEFINE RASTREIO_POS_BAIXA_EST 10 // HWC_QTBXES - Baixa Estoque #DEFINE RASTREIO_POS_QTD_SUBST 11 // HWC_QTSUBS - Quantidade Substituição #DEFINE RASTREIO_POS_EMPENHO 12 // HWC_QTEMPE - Empenho #DEFINE RASTREIO_POS_NECESSIDADE 13 // HWC_QTNECE - Necessidade (Quantidade que será gerado o documento) #DEFINE RASTREIO_POS_REVISAO 14 // HWC_REV - Revisão #DEFINE RASTREIO_POS_ROTEIRO 15 // HWC_ROTEIR - Roteiro do Documento Pai #DEFINE RASTREIO_POS_OPERACAO 16 // HWC_OPERAC - Operação #DEFINE RASTREIO_POS_ROTEIRO_DOCUMENTO_FILHO 17 // HWC_ROTF - Roteiro do Documento #DEFINE RASTREIO_POS_SEQUEN 18 // HWC_SEQUEN - Sequência #DEFINE RASTREIO_POS_NIVEL 19 // HWB_NIVEL - Nível #DEFINE RASTREIO_POS_LOCAL 20 // HWC_LOCAL - Armazém #DEFINE RASTREIO_POS_CHAVE 21 // HWC_CHAVE - Chave #DEFINE RASTREIO_POS_CHAVE_SUBST 22 // HWC_CHVSUB - Chave Substituição #DEFINE RASTREIO_POS_OPC_ID 23 // HWC_IDOPC - Opcional Id #DEFINE RASTREIO_POS_CONTRATO 24 // HWA_CONTRA - Contrato #DEFINE RASTREIO_POS_FILIAL 25 // HWC_FILIAL - Filial #DEFINE RASTREIO_POS_QTD_TRANSF_ENT 27 // HWC_QTRENT - Transferência de Entrada #DEFINE RASTREIO_POS_RECNO 26 // R_E_C_N_O_ - Recno HWC |