GFEXFB09 - Define Pagador do Cálculo
Características do Requisito
Linha de Produto: | Microsiga Protheus |
Segmento: | Supply Chain - Logística |
Módulo: | SIGAGFE |
Ponto de Entrada: | GFEXFB09 | ||||||||||||||||||||
Descrição: | Possibilidade de definir o pagador do cálculo. | ||||||||||||||||||||
Localização: | Chamado ao definir qual é o código do pagador do cálculo (GWF_EMIPAG). | ||||||||||||||||||||
Programa Fonte: | GFEXFUNB - Funções Genéricas do Cálculo | ||||||||||||||||||||
Parâmetros: |
| ||||||||||||||||||||
Retorno: | Código do pagador.
|
Exemplo: GFEXFB09
User Function GFEXFB09() Local cCdTpDc := PARAMIXB[1] Local cEmisDc := PARAMIXB[2] Local cSerDc := PARAMIXB[3] Local cNrDc := PARAMIXB[4] Local cPagador := "" Local aAreaGW1 := GW1->(GetArea()) dbSelectArea('GW1') GW1->(dbSetOrder(1)) //GW1_FILIAL+GW1_CDTPDC+GW1_EMISDC+GW1_SERDC+GW1_NRDC If GW1->(dbSeek(xFilial('GW1')+cCdTpDc+cEmisDc+cSerDc+cNrDc)) cPagador := GW1->GW1_EMISDC EndIf RestArea(aAreaGW1) Return cPagador
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas