Vai al contenuto

COGV78 - Giornale Movimenti Magazzino

Funzione

Programma selettore per la stampa del giornale movimenti di magazzino (stampa bollato). Determina la versione corretta del programma di stampa da lanciare in base alla configurazione dell'azienda e ad eventuali personalizzazioni.

  • Magazzino > Stampe > Giornale Movimenti

Tabelle e file principali

Tabella/File Descrizione Accesso
COGAZIEN Anagrafica azienda (per az-personal, az-ges-qta-2) Lettura

Logica principale

  1. Inizializzazione: z-99-init-program, ctr-abil, lettura azienda (rd-azi).
  2. Selezione programma personalizzato: se az-personal non e' vuoto, costruisce il nome programma come COGV78 + az-personal (es. COGV78XX) e tenta di chiamarlo. Se il CALL riesce, il programma personalizzato gestisce tutto.
  3. Programma standard: se non c'e' personalizzazione o il CALL fallisce:
  4. Se az-ges-qta-2 = 'S' (gestione doppia UM): chiama COGV78F (suffisso "F " con spazio).
  5. Altrimenti: chiama COGV78NO.
  6. Errore: se anche il CALL al programma standard fallisce, mostra messaggio "Manca programma x stampa magazzino !!".
  7. Chiusura: cancella il programma chiamato (cancel name-prog) e termina.

Copybook principali

  • costanti.cpy - Costanti generali
  • wstato.cpy, wgrave.cpy, wopenf.cpy, wnscr.cpy - Working standard
  • cogazien.cpy - Dati azienda
  • wcont.cpy, wcont1.cpy - Linkage section
  • stato.cpy, stato1.cpy, util1.cpy, winmsg.cpy, grave.cpy, mmsubw.cpy - Procedure standard

Note

  • Il programma non ha screen section ne' file propri: e' puramente un dispatcher.
  • I programmi effettivi di stampa sono COGV78NO (standard) e COGV78F (con doppia UM).
  • La logica di personalizzazione tramite az-personal e' un pattern standard del gestionale: il suffisso viene dal campo azienda e permette versioni custom per cliente.
  • Usa mmsubw.cpy (sottoprogramma), non mmmask.cpy.