Vai al contenuto

COGP11 - Stampa Merci con Fornitore

Sorgente: cbl/cogp11.cbl | Tipo: Programma a menu (stampa) | Program-ID: COGP11

Menu: Magazzino > Archivi & Tabelle > Stampe > Merci > Con Fornitore


Scopo

Stampa l'elenco delle merci con il rispettivo fornitore di riferimento, codice merce del fornitore e prezzo di acquisto/listino. Supporta ordinamento per fornitore o per merce e filtri (range merci, fornitore singolo, classe, solo preferenziale, riferimento). Usa un file SORT esterno (flsort) per ordinare i dati.

File e Tabelle

File/Tabella Uso
FEURTAB Parametri generali
File da cogp11.select Anagrafica merci, fornitori, listini
FLSTA Output stampa
FLSORT File SORT temporaneo per ordinamento

Programmi chiamati

Programma Scopo
COGS54 Selezione stampante
COGU10 / COGU16W Utility input divisa
COGS50 Apertura file divisa (gestita da s50-fl-opn)
COGS65 / COGS68 Utility ricerca/combo (per selezione merci/fornitori)
COGS60 Combo standard

Copybook principali

  • File: feurtab.fd, cogp11.select, cogp11.fd, flsta.fd
  • Record: cogfiles.cpy, flsta.cpy
  • Working: cogp11.wrk, k-u10.cpy
  • Utility: utils54, utilu10, utilu16, utils50, utils65, utils68, utilf60
  • Standard: wstato, wgrave, wopenf, wnscr, cogazien
  • Linkage: wcont, util021, wcont1
  • Screen: cogp11-01.scr

Costanti

  • k-chr-stampa = 183
  • w-siz-merce = 42
  • w-cur-id = "SRMF" — ID cursore SORT

Struttura SORT (recsort)

Campo Descrizione
s-codfor Codice fornitore + ragione sociale
s-merce Descrizione merce interna
s-cod-mer-for Codice merce assegnato dal fornitore (gru/sot/cod)
s-merce-inter Codice merce interna (gru/sot/cod)
s-c-merce-f / s-d-merce-f Codice e descrizione fornitore
s-divisa / s-divisa-lfo Divise
s-listino / s-lis-val Prezzo listino e valorizzato

Logica di elaborazione

  1. Apertura (apro): apre file, attiva tasti, prepara mask.
  2. Input parametri (multipli accept): ordinamento, range merci, fornitore, tipo elaborazione, valorizzazione, solo preferenziale, classe, riferimento.
  3. Selezione del SORT:
  4. Se tm-elab = 'F': SORT su s-codfor s-merce (per fornitore)
  5. Altrimenti: SORT su s-merce (per merce)
  6. Input procedure (elabora): scansione anagrafica fornitori-merci (definita in select), filtraggio in base ai parametri, popolamento recsort e release al SORT. Lookup divisa, listino, ricarico.
  7. Output procedure (stampa): return dei record ordinati e produzione del report con intestazione, righe di dettaglio, totali e cambio pagina.
  8. Chiusura: COGS54 finalizzazione, cancel programmi.

Note

  • Il SORT esterno permette di gestire grandi volumi senza limiti di memoria.
  • I parametri di filtro modificano sia la fase di elaborazione (skip dei record non rilevanti) sia la presentazione (intestazione del report).
  • Convenzioni standard Eurocoge GUI.