Histórico da Página
Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
Portuguese | ||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
Ponto-de-Entrada: M710NOPC - Detalha Saldo em Estoque
Descrição:
Eventos
Programa Fonte MATA710.PRX Sintaxe M710NOPC - Detalha Saldo em Estoque ( < PARAMIXB[1]> , [ PARAMIXB[2] ] ) --> aRet Parâmetros:
Retorno
Observações
Exemplos #include "rwmake.ch"User Function M710NOPCLOCAL aParâmetros:=PARAMIXBLOCAL cOpcRet:="",nz:=0,nSomaOk:=0,nDif:=0LOCAL cProduto:=aParametros[1]LOCAL nSaldoAtu:=aParametros[2] //Saldo inicial no SB2LOCAL aRet:={}If cProduto == ("PA1"+Space(12)) cOpcRet:="001AZUL/" AADD(aRet,{cOpcRet+Space(Len(SC2->C2_OPC)-Len(cOpcret)),300}) cOpcRet:="001BRAN/" ADD(aRet,{cOpcRet+Space(Len(SC2->C2_OPC)-Len(cOpcret)),700})EndIf// A somatoria do array do retorno deve "bater" com o saldo inicialIf Len(aRet) > 0 For nz:=1 to Len(aRet) nSomaOk+=aRet[nz,2] Next nz nDif:=QtdComp(nSomaOk)-QtdComp(nSaldoAtu) aRet[Len(aRet),2]-=nDifEndIfRETURN aRet |
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas