Linha Microsiga Protheus.

Home

Linha Microsiga Protheus

Páginas filhas
  • F040COM - Gravação dos dados do título -- 11584
  • Criado por Usuário desconhecido (andrea.santiago), última alteração por admin em 03 jul, 2012

Ponto-de-Entrada: F040COM - Gravação dos dados do título
Idiomas: Espanhol , Inglês
Descrição: 
O ponto de entrada F040COM é executado durante a gravação dos dados do título do contas a receber, com a finalidade de tratar a comissão de títulos RA. Só será executado quando E1_TIPO = "RA".
Programa Fonte 
FINA040.PRW
Sintaxe

F040COM - Gravação dos dados do título ( ) --> URET

Retorno
    URET(qualquer)
Exemplos 
User Function F040COM()     RecLock("SE3",.T.)SE3->E3_BASE    := SE1->E1_VALORSE3->E3_COMIS   := (SE1->E1_COMIS1*SE1->E1_VALOR/100)SE3->E3_FILIAL  := xFilial()          SE3->E3_VEND    := SE1->E1_VEND1SE3->E3_NUM     := SE1->E1_NUM        SE3->E3_SERIE   := SE1->E1_SERIESE3->E3_PORC    := SE1->E1_COMIS1SE3->E3_CODCLI  := SE1->E1_CLIENTE    SE3->E3_LOJA    := SE1->E1_LOJA       SE3->E3_EMISSAO := SE1->E1_EMISSAO    SE3->E3_PREFIXO := SE1->E1_PREFIXO    SE3->E3_PARCELA := SE1->E1_PARCELA SE3->E3_TIPO    := SE1->E1_TIPO       SE3->E3_ORIGEM  := "E"SE3->E3_VENCTO  := SE1->E1_VENCTOMsUnlock()Return