COGDB6 -- Aggiorna Qta. Scomparti/Articoli (Modula)¶
Sorgente: cbl/cogdb6.cbl | Tipo: Programma batch con interfaccia | Program-ID: COGDB6
Menu: - Magazzino > Modula > Aggiorna Qta. Scomparti/Articoli
Scopo¶
Aggiorna le quantita' scomparto per articoli Modula leggendo dal database di frontiera Modula tramite il programma DFNM02. Puo' operare su un singolo articolo o su tutti. Supporta la modalita' called (da COGSKP o altri) per esecuzione automatica senza interfaccia.
File e tabelle¶
| File/Tabella | Tipo | Modalita' | Descrizione |
|---|---|---|---|
| COGMERCI | Indicizzato | Input | Anagrafica merci (verifica esistenza e flag Modula) |
| COGMDLCS | Indicizzato | I-O | Scomparti Modula (azzeramento qta, tipo "S") |
| FEURTAB | Indicizzato | I-O | File configurazioni generali |
Programmi chiamati¶
| Programma | Scopo |
|---|---|
| DFNM02 | Aggiornamento qta. scomparto da DB Frontiera Modula |
| RNEWCONF | Lettura configurazioni |
| C$CALLEDBY | Identificazione programma chiamante |
Copybook principali¶
cogdb6.select,cogdb6.fd,cogdb6.wrk,cogdb6.prc-- screen-generatedutilcogdb6.cpy-- linkage per modalita' calledutildfnm02.cpy-- interfaccia DFNM02costanti-modula.cpy-- costanti Modulautilncnf.cpy-- interfaccia RNEWCONFcogazien.cpy-- dati azienda (az-mag-modula)utilgesdebug.cpy-- debug logging
Configurazioni RNEWCONF¶
| Gruppo | Chiave | Scopo |
|---|---|---|
| sistmga001 | modula-db-frontiera | Flag abilitazione DB Frontiera Modula |
Struttura del programma¶
Flusso principale¶
- apri: inizializzazione, identificazione chiamante (C$CALLEDBY), lettura configurazione modula-db-frontiera
- Verifica prerequisiti: DB Frontiera abilitato, magazzino Modula definito in azienda
- Se called con operazione "agg-qta-scomparto": esegue direttamente
b-esegui-dfnm02e esce - Se interattivo: mostra maschera con selezione merce
Modalita' called¶
Quando richiamato da COGSKP o altri, il programma riceve l'operazione tramite cogdb6-i-operazione. Se "agg-qta-scomparto", esegue direttamente l'aggiornamento senza interfaccia.
Logica di aggiornamento¶
- b-esegui-dfnm02: chiama DFNM02 passando magazzino Modula, data corrente, merce (se specificata) e operazione "agg-qta-scomparto"
- Il blocco b-10 (azzeramento qta scomparto) e' presente ma bypassato: su richiesta utente, si aggiorna direttamente da DB Frontiera senza azzerare prima
Documentazione tecnica -- 2026-04-29