Histórico da Página
...
Nome do Ponto de Entrada: PLSCT11DTL
Parâmetros:
PARAMIXB[1] : Tipo do Lançamento - Numeric
- 9A1 = 1
- 9AX/9B6 = 2
- 9NX/9N6 = 3
- 9A2 = 4
- 9LC = 5
- 9LD = 6
- 9LC = 7
Retorno:
PARAMIXB[2] : Recno do Título (SE1)
Retorno: Data do Lote Contábil -
...
Date
Bloco de código | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
#Include "PROTHEUS.CH" #DEFINE LP_P9A1 1 #DEFINE LP_P9AX9B6 2 #DEFINE LP_P9NX9N6 3 #DEFINE LP_P9A2 4 #DEFINE LP_P9LC 5 #DEFINE LP_P9LD 6 #DEFINE LP_P9LC 7 User Function PLSCT11DTL() Local cTipCtb := PARAMIXB[1] Local nRecnoSE1 := PARAMIXB[2] Local dDataLote := CToD(" / / ") // Tratamento para retornar a data do lançamento contábil Do Case Case cTipCtb == LP_P9A1 // Tratamento para esse Lançamento Case cTipCtb == LP_P9AX9B6 // Tratamento para esse Lançamento Case cTipCtb == LP_P9NX9N6 // Tratamento para esse Lançamento Case cTipCtb == LP_P9A2 // Tratamento para esse Lançamento Case cTipCtb == LP_P9LC // Tratamento para esse Lançamento Case cTipCtb == LP_P9LD // Tratamento para esse Lançamento Case cTipCtb == LP_P9LC // Tratamento para esse Lançamento EndCase Return dDataLote |
...
Visão Geral
Import HTML Content
Conteúdo das Ferramentas
Tarefas