TEMPO812 - Inizializzazione nuovi campi su COGMOVCC¶
| Campo | Valore |
|---|---|
| Sorgente | cbl/tempo812.cbl |
| Tipo | Utility di conversione una-tantum (maschera) |
| Program-ID | TEMPO812 |
| Menu | Non a menu (utility tecnica da lanciare manualmente) |
| Righe sorgente | ~300 |
Descrizione¶
Utility di conversione una-tantum che inizializza i nuovi campi aggiunti al tracciato di COGMOVCC (movimenti centri di costo). Va eseguita una sola volta dopo l'estensione del tracciato, per allineare i record gia' presenti.
I programmi tempo* sono per convenzione utility tecniche temporanee: scorrono un archivio e
applicano una correzione/inizializzazione massiva, poi non vengono piu' utilizzati.
File e tabelle¶
| File/Tabella | Tipo | Descrizione |
|---|---|---|
| COGMOVCC (cdc) | I-O | Movimenti centri di costo. Il tracciato e' definito inline nel sorgente, con chiave primaria cdc-chia e chiavi alternate per centro di costo, conto, merce, reparto e magazzino |
| COGTABEL (feurtab) | Input | Tabella generica / parametri azienda |
I campi inizializzati sono:
| Campo | Descrizione |
|---|---|
cdc-ore |
Ore corso (pic 9(4)v99) |
cdc-costo-orario |
Costo orario (pic 9(4)v99) |
Logica di elaborazione¶
Il programma presenta una maschera di conferma ("Inizializza nuovi campi su COGMOVCC"); alla
conferma (F3) esegue il paragrafo elabora:
- Scorre tutti i record di COGMOVCC dalla prima posizione (
st-cogmovcc-notmin+rdnxt-cogmovcc). - Per ogni record azzera
cdc-oreecdc-costo-orarioe riscrive il record (rewrite). - Aggiorna a video il contatore dei record letti ogni 100 record.
Al termine mostra il messaggio "Elaborazione corretta." con il totale dei record elaborati.
Note¶
- L'esecuzione e' idempotente sul valore (riazzera i due campi), ma riscrive l'intero archivio: va lanciata una sola volta a ridosso della modifica del tracciato.
- I due campi inizializzati sono usati dalla gestione costi del personale della contabilita' analitica: vedere COGB74.
- All'avvio il programma verifica
az-personal: per il cliente Scuola Edile (az-personal = "SC") l'elaborazione e' gia' stata effettuata, quindi la utility esce subito senza riscrivere COGMOVCC.
Documentazione tecnica -- creata 2026-06-25