Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: TM370COD - Gravação do Novo Fornecedor
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Ponto de entrada antes da gravação do novo do fornecedor com os dados do cliente na rotina de aprovação de pagamento de indenização para o a cliente (TMSA370), no momento que for gerado título a pagar de indenização pro cliente.
Eventos


 

Programa Fonte 
TMSA370.PRW
Sintaxe

TM370COD - Gravação do Novo Fornecedor ( [ cCGC ] ) --> cCodForn

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cCGC Array of Record
Retorno
    cCodForn()
  • O ponto de entrada deverá retornar o código/loja que será usado para gravar o novo fornecedor.
Observações


 

Exemplos 
User Function TM370COD()Local cCGC := PARAMIXB //recebe CGC do clienteLocal cCodForn := Substr(cCGC,1,Len(SA2->A2_COD))//Se não informado, a Loja do fornecedor sera igual ao do cliente.cCodFon += SA2->A2_LOJAMsgStop('cCGC do cliente:' + cCGC )Return cCodForn //devolve codigo do novo fornecedor