Linha Microsiga Protheus

Árvore de páginas

Versões comparadas

Versão antiga 2

changes.mady.by.user admin

Gravado em

comparado com

Nova versão Atual

changes.mady.by.user admin

Gravado em

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
TM370COD - Gravação do Novo Fornecedor
TM370COD - Gravação do Novo Fornecedor

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:
NomeTipoDescriçãoDefaultObrigatórioReferência
cCGCArray 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