Vai al contenuto

COGQ51 -- Spostamento Manuale Fasi

Sorgente: cbl/cogq51.cbl | Tipo: Launcher (sottomodulo) | Program-ID: COGQ51

Menu: Magazzino > Produzione > Cicli di Lavorazione > Operativo > Spostamento Manuale Fasi


Scopo

Programma "launcher" che innesca COGQ60 in modalita' spostamento manuale fasi. Non esegue elaborazioni proprie: imposta i parametri di chiamata e delega tutta la logica a COGQ60.


File utilizzati

Nessun file diretto: tutta l'I/O e' delegata a COGQ60.


Copybook principali

Copybook Descrizione
WSTATO.CPY Stato operazioni
WOPENF.CPY Gestione apertura file
WGRAVE.CPY Errori gravi
WNSCR.CPY Numero schermo
COGAZIEN.CPY Dati azienda corrente
utilq60.CPY Utility interfaccia COGQ60
WCONT.CPY Area comunicazione con chiamante
WCONT1.CPY Area comunicazione con chiamante (ext)

Chiamate a sottoprogrammi

Programma Scopo
COGQ60 Gestione cicli lavorazione - modalita' spostamento manuale

Flusso di elaborazione

  1. Inizializzazione (ctr-abil, rd-azi).
  2. Impostazione parametri in utilq60 per la modalita' spostamento manuale.
  3. CALL a COGQ60 con i parametri impostati.
  4. Uscita.

Note implementative

  • Programma di sola orchestrazione: la logica risiede interamente in COGQ60.
  • Usa la struttura linkage standard (WCONT/WCONT1).