Histórico da Página

LOCALIZAÇÃO : Function A093VldCod - Valida se um codigo inteligente é valido. 

EM QUE PONTO : O ponto se encontra após a validação do código inteligente e /ou inclusão de código não padrão. Este PE permite que o código do produto informado pelo operador seja manipulado, porém esta alteração deve se executada com muita cautela, pois após a execução deste ponto não existe mais nenhuma validação do código informado.

MATA093.PRW

A093ACOD - Validação de Código Inteligente ( < ParamIXB[1]> , < ParamIXB[2]> , < ParamIXB[3]> , < ParamIXB[4]> , < ParamIXB[5]> ) --> cRet

cRet(caracter)
• Novo código do produto.

ParamIXB[3] = Array contendo:
        * ID da característica
        * Código da opção selecionada
        * Descrição da opção
        * Descrição da opção a ser usada na descrição do produto

User Function A093ACOD()Local cCodPrd := PARAMIXB[1]Local cDesPrd := PARAMIXB[2]Local aCod    := PARAMIXB[3]Local aCodGrd := PARAMIXB[4]Local lGera   := PARAMIXB[5]Local aArea   := GetArea()Local cNewCod := Nil                If Substr(cCodPrd,1,3)=='MIC' cNewCod := cCodPrd + '090'Else cNewCod := cCodPrd + '001'EndIf       RestArea(aArea)Return (cNewCod)