Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user Michele Lais Girardi

Gravado em

comparado com

Nova versão 3

changes.mady.by.user Michele Lais Girardi

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

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 de entrada não existe mais  validação do código informado.


Localização

Validação se o código inteligente é válido, na função A093VldCod.

Parâmetro

Nome

Tipo

Descrição

Default

Obrigatório

ParamIXB[1]CaracterCódigo do produto a ser gerado
Sim
ParamIXB[2]CaracterDescrição padrão para o produto gerado
Sim
ParamIXB[3]Array of RecordArray com informações das características selecionadas: (Vide Observações)
Sim
ParamIXB[4]Array of RecordArray com os IDs de características tipo grade.
Sim
ParamIXB[5]LógicoVerifica se gera SB1 e SG1 do código fornecido
Sim


Observações:

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


Retorno

Nome

Tipo

Descrição

Obrigatório

cRet Caracter

Novo código do produto.

Sim


03. DEMAIS INFORMAÇÕES

Exemplo:

Card documentos
InformacaoUse esse box para destacar informações relevantes e/ou de destaque.
TituloIMPORTANTE!


Bloco de código
languagec#
firstline1
titleExemplo
linenumberstrue
#INCLUDE 'Protheus.ch'

User Function A093ACOD()

Local cCodPrd := PARAMIXB[1]
Local cDesPrd := PARAMIXB[2]
Local aCod    := PARAMIXB[3]
Local aCodGrd := PARAMIXB[4]
Local aArea   := GetArea()
Local cNewCod := Nil

If Substr(cCodPrd,1,3)=='305'
	cNewCod := cCodPrd + '32'
Else
	cNewCod := cCodPrd + '001'
EndIf

Help( ,, 'PE A093ACOD',, "TESTE P.E. A093ACOD - Novo código do produto: "+cNewCod , 1, 0 )

RestArea(aArea)

Return (cNewCod)


04. ASSUNTOS RELACIONADOS

  • Não se aplica.

...



Templatedocumentos