Vai al contenuto

COGV65 - Inserimento buoni di consegna (launcher)

Intestazione

Campo Valore
Programma COGV65
Titolo Inserimento buoni di consegna (programma di lancio)
Modulo Magazzino / Lab.Odont.
Tipologia Launcher
Posizione menu Magazzino > Uscite > Buoni di Consegna > Inserimento ; Lab.Odont. > Buoni Consegna > Inserimento

Scopo

COGV65 e' il launcher per l'inserimento di buoni di consegna. In base al parametro di configurazione gestbuonic/versione-programmi:

  • valore "GRAFICA" -> chiama COGV68W (lo stesso worker grafico usato per la gestione, marcando il campo v68-da-cogv65 = "S" per richiedere il modo "nuovo inserimento")
  • altri valori -> chiama il worker carattere COGV65C

Nella versione grafica inserimento e gestione condividono lo stesso worker: la differenza viene segnalata via flag nel linkage utilv68.cpy.

Flusso

  1. Inizializzazione: z-99-init-program, rd-azi.
  2. Lettura configurazione: RNEWCONF su gestbuonic/versione-programmi.
  3. Scelta del worker:
  4. valore = "GRAFICA" -> imposta v68-da-cogv65 = "S" e chiama COGV68W
  5. altrimenti -> chiama COGV65C
  6. Uscita: cancel, z-99-exit-program.

Configurazioni RNEWCONF

Gruppo Chiave Effetto
gestbuonic versione-programmi "GRAFICA" -> COGV68W ; altri valori -> COGV65C

Copybook inclusi

Copybook Scopo
wgrave.cpy, wnscr.cpy, wopenf.cpy, wstato.cpy Working storage standard
cogazien.cpy Dati azienda
utilncnf.cpy Interfaccia RNEWCONF
utilv68.cpy Linkage per COGV68W (contiene v68-da-cogv65)
wcont.cpy, wcont1.cpy Area comunicazione linkage
stato.cpy, stato1.cpy, winmsg.cpy, util1.cpy Routine standard fine procedure

Programmi chiamati

Programma Quando Scopo
RNEWCONF All'avvio Lettura configurazione versione
COGV68W Versione grafica Worker GUI (inserimento + gestione)
COGV65C Versione carattere Worker terminal di inserimento

Vedi anche