Vai al contenuto

COGG59 -- Elenco Commesse con Valori (lanciatore)

Sorgente: cbl/cogg59.cbl (76 righe) | Tipo: Wrapper/launcher (dispatcher) | Program-ID: COGG59

Menu:

  • Vendite > Commesse > Stampe > Elenco Commesse con Valori

Scopo

Lanciatore della stampa "Elenco Commesse con Valori". Non contiene logica di stampa: sceglie il programma da eseguire in base alla personalizzazione azienda e gli passa l'area stringhe. La logica di stampa reale e' in COGG59NO (cbl/cogg59no.cbl).

File e tabelle

Nessun file dati proprio. Usa solo COGAZIEN.CPY (dati azienda: az-personal, azien-area -> az-rec).

Copybook principali

Working: WSTATO.CPY, WGRAVE.CPY, WOPENF.CPY, WSCREE.CPY, COGAZIEN.CPY. Linkage: WCONT.CPY, WCONT1.CPY (procedure division using stringhe). Fine: STATO.CPY, WINMSG.CPY, GRAVE.CPY.

Chiamate ad altri programmi

  • Call dinamica name-call = "COGG59" + az-personal (variante personalizzata), solo se az-personal not = spaces.
  • COGG59NO.COB (programma standard di stampa; fallback su ambiente non personalizzato o on overflow).

Flusso / Paragrafi principali

  • a000: azien-area -> az-rec; se az-personal = spaces -> st-80-standard; altrimenti compone e chiama la variante personalizzata (on overflow -> standard); poi st-90-ok.
  • st-80-standard/st-80-no: chiama COGG59NO.COB; on overflow -> messaggio "Non trovo il programma di fatturazione!" (box-msg).
  • st-90-ok: cancel name-call. fine: exit program.

Non legge configurazioni RNEWCONF.

Note

  • Pattern di dispatch standard/personalizzato via az-personal, comune ad altri lanciatori del gestionale.