Vai al contenuto

COGQ45 - Liste di Produzione (Preparazione)

Campo Valore
Sorgente cbl/cogq45.cbl
Tipo Programma interattivo (schermo carattere su finestra 80x25)
Posizione menu Magazzino > Produzione > Produzione 2 > Liste di Produzione

Scopo

Costruisce una lista di produzione raggruppando righe consegna ordine non ancora evase. L'utente indica la quantita' da produrre, il sistema seleziona automaticamente le consegne evadibili (per data e prodotto), permette di modificarle/escluderle/spezzarle, salva la lista (coglptes + coglprig) e puo' lanciarla in produzione (creando i lotti) o stamparla.

File e tabelle

  • FEURTAB: parametri azienda
  • COGTABEL (is external, con cnfgprnt): tabelle generali
  • COGMERCI (is external): merci
  • COGGEANA: anagrafica clienti/fornitori
  • COGMAGAZ: magazzini
  • COGSLMAG: saldi magazzino
  • COGTESOR / COGRIGOR: ordini cliente (testa e righe)
  • COGMERAP (is external): distinta base
  • COGLAVOR: lotti gia' in produzione
  • COGCONOR: consegne ordine
  • COGMOVDB: movimenti dbf
  • COGLPTES / COGLPRIG: testata e righe lista di produzione (output)
  • COGTORAG: torre raggruppamento
  • File di transito: TRAN-Q45 (ordini), TRBN-Q45 (righe da bilanciare); FLSTA per stampa

Programmi chiamati

Programma Scopo
COGQ47 Modifica/spezzamento riga ordine in lista
COGQ48 Stampa lista
COGQ46 Lancio lista in produzione (creazione lotti)
COGF30 / COGF32 Utility (interfacce linkage)

Configurazioni RNEWCONF

Nessuna esplicita nel sorgente.

Note implementative

  • Controllo consolidato (leggi-consolidato): blocca esecuzione se data sistema <= mese consolidato.
  • Gestione lista gia' attiva: all'avvio, se esiste lista con plt-stato = "A", propone apertura (F3) o eliminazione (F4) con conferma.
  • Modalita' "spezza quantita'" (fl-spezza-qta): scompone la quantita' richiesta in piu' consegne parziali fino a completare il totale.
  • Salvataggio operatore (plr-da-ope) su ciascuna riga lista.
  • Routine principali:
  • c-carica-consegne: carica le consegne non in produzione nel file di transito
  • e-evadibilita: marca righe evadibili (data + disponibilita')
  • b-aggiorna: scrive testata e righe lista
  • Pattern legacy: accept/display su mm-1 80x25, non usa controlli grafici.