COGY47 - De-storicizza partite Clienti/Fornitori¶
Sorgente: cbl/cogy47.cbl | Program-ID: COGY47 | Tipo: Programma interattivo (mmmask)
Menu: Contabilita' > Bilancio > Operazioni Post Apertura
Scopo¶
Permette di de-storicizzare partite clienti o fornitori precedentemente
chiuse/storicizzate. Mostra la lista delle partite in griglia con tutti i
movimenti. Il tipo (C/F) viene passato via wo-parametro.
File e tabelle¶
| File/Tabella | Tipo | Modalita' | Descrizione |
|---|---|---|---|
| COGTABEL | Indexed | Input | Tabelle generiche (tipo 66: esercizio) |
| COGGEANA | Indexed | Input | Anagrafica clienti/fornitori |
| COGMAGAZ | Indexed | Input | Anagrafica magazzino |
| COGPNCON | Indexed | Input | Piano dei conti |
| COGPNONC | Indexed | Input | Movimenti per piano dei conti |
| COGFATTU | Indexed | Input | Archivio fatture |
| COGAPPOG | Indexed | Input/Output | File appoggio movimenti |
| COGPARTI | Indexed | Input/Output | Partite aperte clienti/fornitori |
| COGMOVPA | Indexed | Input | Movimenti partite |
| COGOLDPA | Indexed | Input | Partite storiche |
| COGWPNO | Indexed | Input | File appoggio selezione partite |
| COGTRANS | Indexed | I/O | Archivio appoggio temporaneo |
| EXP-GRID | Sequential | Output | Export griglia Excel |
Copybook utilizzate¶
| Copybook | Descrizione |
|---|---|
| wstato.cpy | Gestione status file |
| wgrave.cpy | Gestione errori gravi |
| wopenf.cpy | Apertura file generica |
| wnscr.cpy | Variabili di schermata |
| cogazien.cpy | Dati azienda |
| cogconta.cpy | Dati esercizio contabile |
| wgrid.cpy | Gestione griglia |
| utilgdad.cpy | Utility amministrazione griglia |
| utils51.cpy | Utility S51 |
| utils52.cpy | Utility calendario/data |
| utils65.cpy | Utility S65 (ricerca anagrafica) |
| utils77.cpy | Utility S77 (caricamento partite) |
| utilu10.cpy | Utility conversione valuta/importo |
| utilw19.cpy | Utility W19 |
| utilw62.cpy | Utility W62 |
| utilu49.cpy | Utility U49 |
| utilzs6.cpy | Utility ZS6 (cancellazione storico) |
| utilncnf.cpy | Utility configurazioni |
| utila043.cpy | Utility A043 |
| k-u10.cpy | Costanti U10 |
| cogwpno.cpy | Record cogwpno |
Logica di elaborazione¶
- All'avvio legge il parametro
wo-parametroper determinare il tipo (C=Clienti, F=Fornitori). - L'utente seleziona l'anagrafico e i filtri sulla partita.
- Alla conferma (F3) chiama
COGS77con funzioneR-PARTITAper caricare le partite storiche corrispondenti incogwpno. - Le partite vengono visualizzate in griglia (GRIDADMN).
- L'utente seleziona le partite; su conferma il programma aggiorna
cogpartiecogmovpariportando le partite allo stato attivo (cancella dacogoldpa, scrive incogparti). - Il programma tiene un contatore
w-mov-destor(movimenti) ew-par-destor(partite) de-storicizzate.
Modalita' di apertura file cogtrans: aperto in output per svuotarlo, poi riaperto in i-o come archivio temporaneo di lavoro. Viene rilasciato (cancel "COGZS6") alla chiusura.
Chiamate a sottoprogrammi¶
| Programma | Funzione |
|---|---|
| COGS65W | Ricerca anagrafica cliente/fornitore |
| COGS77 | Caricamento partite (funzione R-PARTITA) |
| GRIDADMN | Gestione griglia interattiva |
| COGU10W | Conversione/formattazione importi e valuta |
| COGS51 | Utility generica |
| COGZS6 | Cancellazione storico partite |
| WIN062 | Popup finestra |
| WIN019 | Popup finestra |