Este ponto de entrada permite determinar o código contabilístico a reter no momento da geração de registos. Este ponto de entrada foi reacrescentado na origem para os Estados Unidos que reacrescentam e modificam certos tipos de códigos contabilísticos no quadro da sua localização do Wip Costing.
Existe uma transação em curso.
Existe geralmente um ficheiro rasto aberto (pode depender do contexto)
O ponto de entrada "INIACCCOD" está colocado no anel feito sobre a parametrização dos códigos contabilísticos definidos sobre a linha de documento automático que estão em vias de gerar. Está chamada justo após a inicialização do código contabilístico para a geração de um registo. Permite então destruir a inicialização feita pelo standard por um tipo de código contabilístico. Permite igualmente inicializar o código contabilístico por um tipo de código contabilístico que foi reacrescentado e que utiliza os documentos automáticos.
O documento está guardado antes a sua validação nos ecrãs GACCENT0 [HAE0], GACCENT1 [HAE1] e GACCENT2 [HAE2]. Todos os campos destes ecrãs estão acessíveis e podem ser modificados na condição de respeitar as regras gerais de validação de um documento, se novos campos são acrescentados às tabelas de documentos estes devem ser acrescentados nestes ecrãs.
O ponto de entrada "INIACCCOD" está chamado no anel dos códigos contabilísticos parametrizados sobre a linha de documento automático. K é o índice de percurso (For K=0 To [F :GAD]NBRTYP-1). [F:GAD]TYPACCCOD(K) corresponde ao tipo de código contabilistico definido sobre a linha K-1 do quadro da parametrização dos códigos contabilísticos para linha de documento automático que se está em vias de gerar.
A variável local "CLECPT" contém o valor da chave da tabela cujo se pesquisa o código contabilístico.
A variável local "CODCPT" é aquela que vai conter o código contabilístico a utilizar para a geração da linha de registo.
Assim, para modificar a inicialização feita o standard ou inicializar o código contabilistico de um novo tipo de código contabilístico definido e não gerado pelo standard, é suficiente de escrever o tratamento específico :
Case [F:GAD]TYPACCCOD(K)
when 20
Call LECTURE("ONA",CLECPT,"") from CONTOBJ
If fstat : CODCPT = "" : Else : CODCPT = [F:ONA]ACCCOD : Endif
when ...
Endcase
Todas as tabelas relativas à criação de um documento são abertos.
Tabela | Conteúdo significativo | Título Tabela |
GAUTACE [GAU] | Sim | Documentos automáticos |
GAUTACED [GAD] | Sim | Linhas documentos automáticos |
GACCOUNT [GAC] | Não | Contas |
GACCCODE [CAC] | Não | Linhas facturas vendas |
CACNA [CNA] | Não | Natures |
COMPANY [CPY] | Não | Sociedades |
FACILITY [FCY] | Não | Estabelecimentos : |
De mais a tabela desencadeante e as linhas ligadas estão em linha.
Outras tabelas podem estar em linha segundo o contexto de chamada.