COGP13 - Creazione Lavorazione / Stampa Lista di Prelievo¶

Scopo¶

Programma principale per il lancio di produzione. Partendo da un ordine cliente con consegna, esplode le distinte base dei prodotti finiti e genera: la stampa della lista di prelievo, le prime note di scarico componenti e carico prodotti finiti, i movimenti di conto lavorazione e i lotti di produzione.

Struttura¶

Tipo: Programma standalone (procedure division non-GUI, maschera testuale)
Righe: ~4.790
Program-ID: COGP13 (k-program-id)
Interfaccia: Maschera testuale 22x80 con griglia incorporata

Flusso principale¶

a000 - Inizializzazione, apertura file, lettura configurazione. Gestisce anche la modalita' automatica (chiamata da COGD51).
a4 - Inizializzazione maschera, data di sistema.
a7-gg - Accept data lavorazione con controllo consolidato.
a10 / a15 / a20 - Accept campi ordine (anno/numero/progressivo).
a20-ord - Ricerca e validazione ordine su COGTESOR.
a20-check - Controlli di lancio configurabili (livello 1 e 2).
a20-ana - Lettura anagrafica cliente.
a50 .. - Lettura righe consegna da COGCONOR, esplosione distinte, generazione movimenti.
Stampa lista di prelievo.

Modalita' automatica¶

Se p13-called = "COGP13-CALLED" e p13-caller = "COGD51", il programma opera in modalita' automatica senza interazione utente, ricevendo ordine e consegna dalla linkage.

Tabelle/File utilizzati¶

Tabella	Tipo	Utilizzo
FEURTAB	Input	Archivio nomi file
COGTABEL	Input/External	Tabelle generali
COGMERCI	Input/External	Anagrafica merci
COGGEANA	Input	Anagrafica clienti/fornitori
COGMAGAZ (COGMAGA2)	Input	Magazzini
COGTESBO	Input	Testata bolle
COGSLMAG	Input	Saldi magazzino
COGTESOR	Input	Testata ordini
COGRIGOR	Input	Righe ordini
COGLAVOR	I/O	Lavorazioni di produzione
COGCONOR	I/O	Consegne ordini
COGMOVDB	I/O	Movimenti distinta base
COGDBAGG	Input	Distinta base aggregata
COGLGMER	Input	Legami merci
COGDESAG	Input	Descrizioni aggiuntive
COGGENER	I/O	Prime note magazzino
COGLEGOR	Input	Legami ordini
COGMTPRE	I/O	Matricole/pre-matricole
COGDBASE	Input	Distinta base
COGLAVLA	I/O	Lavorazioni lavoranti
FLSTA	I/O	File stampa
COGTRANS	Transito	File temporaneo per componenti da stampare
COGTRANS2	Transito	File temporaneo merci aggregate
TRDN-V21	Transito	File temporaneo V21
TRAN-W51	Transito	File temporaneo W51

Struttura COGTRANS (record di transito)¶

Chiave composta:

trs-mdb-tip-mov    x(02)    tipo movimento
trs-mdb-rif-mov    x(20)    riferimento movimento
trs-mdb-db         x(09)    merce distinta base
trs-mdb-fas        9(04)    fase
trs-mdb-pos        9(04)    posizione
trs-mdb-sl         x(09)    merce semilavorato
trs-dba-prog       9(05)    progressivo DB
trs-mer-descr      x(36)    descrizione merce
trs-mdb-comp       x(09)    merce componente

Logica di elaborazione¶

Ciclo principale¶

Per ogni riga della consegna (COGCONOR) che ha un macrocodice (prodotto finito):

Esplosione distinta: legge COGDBAGG per esplodere la distinta base del prodotto finito, accumulando i componenti nel file COGTRANS
Creazione lotto: genera un record su COGLAVOR con anno/numero progressivo
Prima nota scarico: crea una prima nota di magazzino per lo scarico dei componenti (COGGENER)
Prima nota carico: crea una prima nota per il carico del prodotto finito
Aggiornamento giacenze: decrementa le giacenze dei componenti e incrementa quella del PF su COGSLMAG
Aggiornamento impegni: scala gli impegni relativi ai componenti
Conto lavorazione: alimenta COGLAVOR con i dati di valore

Stampa lista di prelievo¶

Due formati possibili (configurabili): - Standard (83 colonne): w-cur-id1 = "LSPR" - Esteso (133 colonne): w-cur-id1-ext = "LSPE"

La stampa include: - Testata: prodotto finito, quantita', lotto, data consegna, cliente, ordine - Righe: componente, qta unitaria, qta totale, mancante, magazzino, ubicazione - Tabella firme operatore (se attiva la configurazione) - Note distinta e note ordine (se presenti) - Barcode componenti (se attiva la configurazione)

Controlli di lancio¶

Configurabili su tm-cfg-check-level: - Livello 0: nessun controllo - Livello 1: controlli base (controlli-lancio-livello1) - Livello 2: controlli base + avanzati (controlli-lancio-livello2, usa TRDN-V21)

Chiamate a sottoprogrammi¶

Programma	Funzione
COGS52	Gestione campo anno/data
COGS68W	Gestione campo merce
COGS14	Ricerca ordini
COGS18	Utility S18
COGS25	Utility S25
COGS50	Utility S50
COGU10	Utility U10
COGU20	Utility U20
COGU65	Gestione ubicazioni
COG021	Configurazione dettaglio stampa
WIN028	Ricerca consegne
COGCRMK10	Gestione CRM
COGW83	Ricerca lotti
COGD002	Utility display

Configurazione (x99-confi)¶

Parametri da COGCONFI: - tm-cfg-prn - configurazione stampante - tm-cfg-check-level - livello controllo lancio (0/1/2) - tm-cfg-ord-not / tm-cfg-ord-cnf - gestione note e conferme ordine - tm-cfg-tab / tm-cfg-bar - tabella firme e barcode - tm-cfg-loc - gestione ubicazioni - tm-cfg-mag-stoc - magazzino di stoccaggio - tm-cfg-ordinam - ordinamento componenti - tm-cfg-scarico-con-bdp - scarico con buono di prelievo - tm-cfg-tipo-dossier - tipo dossier

COPY utilizzate¶

File section¶

cogfiles.cpy, cogtabel.cpy, cnfgprnt.cpy, cogmerci.cpy, coggeana.cpy, cogmaga2.cpy, cogtesbo.cpy, cogslmag.cpy, cogtesor.cpy, cogrigor.cpy, coglavor.cpy, cogconor.cpy, cogmovdb.cpy, cogdbagg.cpy, coglgmer.cpy, cogdesag.cpy, coggener.cpy, coglegor.cpy, cogmtpre.cpy, cogdbase.cpy, coglavla.cpy, flsta.cpy, trdn-v21.cpy, tran-w51.cpy

Working-storage¶

k-u10.cpy, k-personal.cpy, wopenf.cpy, wstato.cpy, wgrave.cpy, wnscr.cpy, utilf23.cpy, utilp13a.cpy, utilp13b.cpy, utils17l.cpy, utils18.cpy, utils21.cpy, utils25.cpy, utils50.cpy, utils52.cpy, utils54.cpy, utils68.cpy, utilu10.cpy, utilw28.cpy, utilcrmk10.cpy, wdisp002.cpy, cogazien.cpy, utilncnf.cpy

Linkage¶

wcont.cpy, utilg46.cpy, utill14.cpy, utilp09.cpy, utilp13.cpy, utils16.cpy, utils17c.cpy, util021.cpy, wcont1.cpy

Note¶

Il programma e' uno dei piu' complessi del ciclo produttivo (~4.790 righe).
Supporta la personalizzazione k-personal-alfaoerre per gestioni specifiche cliente (Alfa O'Erre): gestione matricole con chiamata a COGP09 dopo il primo scarico.
I file di transito sono nominati per operatore: #COGP13.{oper}, #BOGP13.{oper}, #PCOGW51.{oper}.
Il file TRDN-V21 viene derivato dal path di COGTESOR sostituendo il nome.
Gestisce il consolidamento: blocca operazioni su date precedenti al periodo consolidato.