Linha Microsiga Protheus

Árvore de páginas

Ponto-de-Entrada: TM200DEB - Criação Filial de Débito
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: 
O ponto de entrada TM200DEB foi criado para que o caso em que o usuário queira criar uma outra regra para definir a filial de débito do conhecimento. Esta filial de débito será usada como parâmetro para gerar as quebras de fatura na rotina 'Fatura automática'.
Eventos


 

Programa Fonte 
TMSA200.PRW
Sintaxe

TM200DEB - Criação Filial de Débito ( < cCliDev> , < cLojDev> , < cTipTra> , < cTipFre> , < cFilDeb> ) --> cRet

Parâmetros:
Nome Tipo Descrição Default Obrigatório Referência
cCliDev Array of Record X
cLojDev Array of Record Loja do cliente devedor. X
cTipTra Array of Record X
cTipFre Array of Record Tipo de frete do conhecimento.
1=Cif
2=Fob		 X
cFilDeb Array of Record X
Retorno
    cRet(caracter)
  • O ponto de entrada deve retornar o código de uma filial válida no sistema.Caso a filial não seja válida será ignorado o retorno do ponto de entrada.
Observações


 

Exemplos 
User Function TM200DEB()Local cCliDev := ParamIxb[1]Local cLojDev := ParamIxb[2]Local cTipTra := ParamIxb[3]Local cTipFre := ParamIxb[4]Local cFilDeb := ParamIxb[5]Local cRet    := ''If cFilDeb == '01' cRet := '02'EndIfMsgStop(' Ponto de entrada TM200DEB, parâmetros  Devedor:' + cCliDev + ' Loja:' + cLojDev + ' Tipo Transporte:' + cTipTra + ' Tipo de frete:' + cTipFre + ' Filial de debito: ' + cFilDeb)Return cRet