...
Producto: |
|---|
...
| Produto: | |||
|---|---|---|---|
| Solucoes_totvs_cross | TOTVS Backoffice | ||
| Linha Línea de Produtoproducto: | | Linhas_totvs | | Linha | Linha
Segmento: | | Segmentos_totvs | | Segmento |
Módulo: | Financeiro Financiero (SIGAFIN) | ||
| Função Función: | Faturas a Facturas por pagar (FINA290) | ||
País: | Brasil |
...
Ponto Punto de entrada executado durante a gravação dos dados da fatura e antes da contabilização que permite a inclusão de dados complementares na fatura geradaejecutado durante la grabación de los datos de la factura y antes de la contabilidad, que permite la inclusión de datos complementarios en la factura generada.
...
Não No se aplica.
...
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#INCLUDE "Protheus.ch"
User Function FA290()
Local nPosCodBar := aScan(aHeader,{|x| Alltrim(x[2]) == 'E2_CODBAR' })
Local nI := 0
Local cHistFat := "GRAVACAOGRABACIÓN COMPLEMENTARCOMPLEMENTARIA PE FA290"
For nI := 1 To Len(aCols)
If RecLock("SE2",.F.)
If !Empty(nPosCodBar)
SE2->E2_CODBAR := aCols[nI, nPosCodBar]
EndIf
SE2->E2_DATALIB := Date()
SE2->E2_HIST := cHistFat
SE2->(MsUnlock())
EndIf
Next nI
Return |
...