| Linha de Produto: | Microsiga Protheus® |
|---|---|
| Segmento: | Backoffice |
| Módulo: | Financeiro |
| Função: | FINA040 – Contas a Receber |
O ponto de entrada F040GER permite gravar dados complementares nos títulos de impostos, desde que estas informações sejam idênticas para todos os impostos (por exemplo, um código específico do cliente para amarração de pedido, NF e impostos).
Nome | Tipo | Descrição |
|---|---|---|
| PARAMIXB | Array | Contendo o Alias onde foi gravado o imposto e o Recno do titulo do imposto. |
Não se aplica.
#INCLUDE "TOTVS.CH"
User Function F040GER()
Local aRegImp := PARAMIXB as array
Local nx := 0 as numeric
Local aAreaRdm := GetArea() as array
If Len(aRegImp) > 0
For nX := 1 To Len(aRegImp)
dbSelectArea(aRegImp[nX][1])
dbGoto(aRegImp[nX][2])
// Gravar os dados necessários
Next nX
EndIf
RestArea(aAreaRdm)
Return |