Histórico da Página

Descrição

Ponto de entrada criado com o intuito do usuário realizar a separação de solicitação de compras de acordo com o tipo de produto, sem a utilização da solicitação de armazém.

O Ponto de Entrada também pode ser utilizado para verificar quais registros foram incluídos na tabela SC1, através do array aCampo.
Parâmetros passados para o array aCampo:
1º - Numero da Solic.de Compra.
2º - Item da Solicitacao.
3º - Codigo do Produto.
4º - Quantidade da SC.

Observações

Exemplos

User Function NGSEPASC()

nNumero := PARAMIXB[1][1] //Numero da Solic.de Compra.
nItem := PARAMIXB[1][2] //Item da Solicitacao.
nProduto := PARAMIXB[1][3] //Codigo do Produto.
nQuant := PARAMIXB[1][4] //uantidade da SC.
dbSelectArea

dbSelectArea( "SC1" )
dbSetOrder( 01 ) //C1_FILIAL+C1_NUM+C1_ITEM
If dbSeek( xFilial( "SC1" )+nNumero+nItem )
RecLock( "SC1",.F. )
SC1->C1_NUM := nNumero
SC1->C1_ITEM := nItem
SC1->C1_PRODUTO := nProduto
SC1->C1_QUANT := nQuant
SC1->C1_EMISSAO := dDataBase
SC1->(MsUnlock())
EndIf

Return .T.