Linha de Produto: | Protheus | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Segmento: | Manufatura | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Módulo: | SIGAPCP - Planejamento e Controle da Produção | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Parâmetro(s): |
| |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
| Idiomas: | Português (Brasil) | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
País(es): | Todos | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Banco(s) de Dados: | Todos | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Sistema(s) Operacional(is): | Todos |
| Descrição: | A rotina de apontamento de perda, além de apontar a perda dos materiais durante todo o processo de movimentação, também os classifica por motivo, referenciando-se às OPs. Este apontamento gera uma devolução para um produto e um armazém previamente cadastrados, permitindo que a perda seja direcionada para um produto e um armazém que caracterizem "Sucata". Exemplo: USER FUNCTION TMATA685()
Local nOpc := 3 //-Opção de execução da rotina, informado nos parametros quais as opções possiveis
Local cEnvMod := "PCP"
Local aCabec := {}
Local aItens := {}
Local aLinha := {}
RpcSetEnv( "99","01",,,cEnvMod,,,,,,)
aCabec := {{"BC_OP","00000201001 ",NIL}}
aItens := {{"BC_QUANT",10,NIL},;
{"BC_PRODUTO","TESTE ",NIL},;
{"BC_LOCORIG","01",NIL},;
{"BC_TIPO","R",NIL},;
{"BC_DTVALID",dDatabase,NIL},;
{"BC_MOTIVO","FH",NIL}}
AAdd(aLinha ,aItens)
MsExecAuto ( {|x,y,z| MATA685(x,y,z) }, aCabec, aLinha, 3)
Return
Obs1: Para utilizar o estorno (opc = 6), além das informações do produto, é necessário informar o numero de documento (campo: BC_NUMSEQ) nos parâmetros do MsExecAuto conforme exemplo: Local cNumDoc := '999999'
MsExecAuto ( {|x,y,z,n| MATA685(x,y,z,n) }, aCabec, aLinha, 6, cNumDoc)
|
Sintaxe: | MATA685 - Apontamento de Perda ( [ aCabec ] [ aLinha ] [ nOpc ] ) |
| Programa Fonte: | MATA685.PRX |
| Retorno: | () |
| Observações: |
|
