Vai al contenuto

COSO26 - Gestione Tabella Zone

Scopo

Gestione della tabella zone dell'unione soci (inserimento, modifica, cancellazione). I record sono memorizzati sulla tabella COGTABEL con tipo=06 e codso1=90. Il programma presenta i dati in formato griglia e supporta sia la modalita' di aggiornamento che la modalita' selezione (quando richiamato da altri programmi come lookup).

File e tabelle

File Tipo Descrizione
COGTABEL Indicizzato Tabella generica - record tipo 06, codso1=90
COGPNCON Indicizzato Piano dei conti (per descrizione conto cassa)
FEURTAB Indicizzato File tabelle parametri

Copybook

Copybook Sezione Utilizzo
coso26.select FILE-CONTROL SELECT dei file
coso26.fd FILE SECTION FD dei file
coso26.wrk WORKING-STORAGE Variabili di lavoro
coso26-01.scr SCREEN SECTION Maschera video
coso26.decla PROCEDURE Declaratives
cogfiles.cpy FILE SECTION Record FEURTAB
wstato.cpy WORKING-STORAGE Gestione stato file
wgrave.cpy WORKING-STORAGE Gestione errori gravi
wgrid.cpy WORKING-STORAGE Gestione griglia
wopenf.cpy WORKING-STORAGE Gestione apertura file
wnscr.cpy WORKING-STORAGE Variabili screen
cogazien.cpy WORKING-STORAGE Dati azienda
utilgdad.cpy WORKING-STORAGE Utility grid admin
utils99.cpy WORKING-STORAGE Utility codifiche
utils67.cpy WORKING-STORAGE Utility piano conti
utilw67.cpy WORKING-STORAGE Utility piano conti (wrk)
wcont.cpy LINKAGE Struttura stringhe
wcont1.cpy LINKAGE Struttura stringhe aggiuntiva
utilo26.cpy LINKAGE Parametri input/output per modalita' called

CALL

Programma Funzione
GRIDADMN Gestione griglia (ordinamento, export, amministrazione colonne)

Logica di elaborazione

Struttura dati

Record COGTABEL con tipo=06, codso1=90: - euta-codso2 = codice zona - euta-0690-desc = descrizione zona - euta-0690-cassa = conto cassa (10 char: mastro 2 + conto 2 + sottoconto 6) - euta-0690-cc = codice competenza (2 cifre) - euta-0690-doc-iva = tipo documento IVA (2 char) - euta-0690-cau-inca = causale incasso (3 char) - euta-0690-livello = livello (1 char)

Flusso principale

  1. Apertura: init programma, lettura azienda, apertura file
  2. Se richiamato come lookup (o26-called = k-program-id), attiva modalita' "Selezione"
  3. Caricamento griglia (a10/a10-loop): lettura sequenziale COGTABEL tipo=06, codso1=90; per ogni record legge la descrizione del conto cassa da COGPNCON
  4. Visualizzazione griglia (a30): display della griglia con tutti gli elementi caricati
  5. Gestione interazione:
  6. Invio in modalita' Aggiornamento: apre dettaglio riga in modifica
  7. Invio in modalita' Selezione: restituisce codice e descrizione al chiamante
  8. Ctrl+A: inserimento nuova riga
  9. Ctrl+E: cancellazione riga con conferma

Dettaglio riga (a-riga-dettaglio)

Apre il frame di dettaglio per inserimento o modifica: - In modifica: lock del record con rd-cogtabel-lk - Accept campi: codice (solo in inserimento), descrizione, conto cassa (con ricerca su piano conti), causale incasso, competenza, tipo documento IVA, livello - F3: salvataggio (WRITE o REWRITE su COGTABEL)

Cancellazione

  1. Controllo abilitazione
  2. Controllo prerequisiti cancellazione (c1-ctrl-canc)
  3. Richiesta conferma
  4. DELETE su COGTABEL
  5. Ricompattazione array griglia

Note tecniche

  • Massimo 900 righe (k-max-ele-tab = 900)
  • Il parametro di linkage utilo26.cpy definisce: o26-called, o26-caller, o26-out-cod, o26-out-des
  • La modalita' si commuta con F3: in modalita' Aggiornamento F3 passa a Selezione (se called), in Selezione F3 passa ad Aggiornamento
  • Il conto cassa e' validato tramite lettura su COGPNCON con utility s67
  • Utilizza PERFORM ... THRU in alcuni punti (c-cancella/ex-c, c1-ctrl-canc/ex-c1)