COGT22 - Anagrafica stampanti¶

Sorgente: cbl/cogt22.cbl | Tipo: Programma interattivo GUI con griglia (anche richiamabile via CALL come lookup) | Program-ID: COGT22

Menu:

Sistema > Configurazione > Stampanti

Scopo¶

Gestisce l'anagrafica delle stampanti fisiche (tabella PRNTSTMP). Per ogni stampante definisce le caratteristiche del modulo di stampa predefinito (linee, colonne, numero massimo di colonne stampabili, orientamento) e le emulazioni supportate a livello di famiglia di linguaggio (PCL3, PCL5/HPGL, PRESCRIBE).

E' il secondo dei quattro programmi della configurazione del sottosistema di stampa:

COGT21 - emulazioni disponibili;
COGT22 (questo) - stampanti fisiche;
COGT23 - emulazioni associate a ciascuna stampante, con stringhe di attivazione/disattivazione;
COGT24 - periferiche di stampa collegate alle stampanti.

Come COGT21, opera in due modalita': da menu (aggiornamento anagrafico) e richiamato via CALL (t22-called = COGT22, copybook utilt22.cpy) come finestra di selezione stampante, restituendo codice e descrizione in t22-out-cod / t22-out-des. In questa veste e' usato sia da COGT23 (F8 sul campo stampante) sia da COGT24 (F8 per collegare la stampante alla periferica).

Struttura del programma¶

Struttura a griglia con frame di dettaglio, analoga a COGT21. La tabella interna tab-maschera (max k-max-ele-tab = 900 righe) rispecchia i record PRNTSTMP.

Inizializzazione (`apri`)¶

ctr-abil, z-99-init-program, open-files, rd-azi, rilevazione chiamata (w-dc-called), abilitazione tasti funzione (invio, F3 conferma, F8 aiuto, Shift-F4 griglia, Ctrl-A, Ctrl-E), preparazione griglia e controlli.

Caricamento (`a10` / `a10-loop`)¶

Scandisce PRNTSTMP (st-prntstmp-notmin + rdnxt-prntstmp) riempiendo tm-tab con tutti i campi della stampante: codice, descrizione, linee, colonne, colonne massime, orientamento, supporto PCL3/PCL5/PRESCRIBE.

Griglia e modalita' (`a-grid` / `a-accept-grid`)¶

F3 commuta Selezione/Aggiornamento; in Selezione l'invio restituisce la stampante al chiamante e termina; in Aggiornamento apre la modifica. Ctrl-A/Ctrl-E aggiungono/eliminano righe; Shift-F4 apre la personalizzazione griglia (GRIDADMN).

Riga di dettaglio (`a-tm-cod` ... `a-riga-dettaglio-fine`)¶

Sequenza di accept sui campi: codice (a-tm-cod, chiave), descrizione (a-tm-des), linee (a-tm-linee), colonne (a-tm-colonne), max colonne (a-tm-max-col), orientamento (a-tm-orientation, radio Portrait/Landscape via subroutine S60), e i tre check di supporto emulazione a-tm-has-pcl3 / a-tm-has-pcl5 / a-tm-has-prescribe (gestiti tramite subroutine S95). Alla conferma scrive (wr-prntstmp) o riscrive (rwr-prntstmp). In inserimento controlla che il codice non esista gia'.

Cancellazione (`c-cancella`)¶

Rilettura in lock (rd-prntstmp-lk) ed eliminazione (del-prntstmp).

Tabelle e file¶

File logico	Chiave / accesso	Descrizione
FEURTAB	-	Tabella di sistema (aperta via `cogfiles.cpy`)
PRNTSTMP	primaria `ptst-chia1` (`ptst-cod`); accesso dinamico	Anagrafica stampanti: codice, descrizione, linee/colonne modulo predefinito, orientamento (`P`/`L`), max colonne stampabili, flag supporto PCL5, PRESCRIBE, PCL3

COPY incluse¶

Working-Storage¶

cogt22.wrk, wstato.cpy, wgrave.cpy, wgrid.cpy, wopenf.cpy, wnscr.cpy, cogazien.cpy, utilgdad.cpy

Linkage¶

wcont.cpy, wcont1.cpy, utilt22.cpy

Procedure Division¶

cogt22.decla, cogt22-01.scr (screen), stato1.cpy, stato.cpy, winmsg.cpy, grave.cpy, opengen.cpy, mmmask.cpy, utilgrid.cpy, cogt22.prc

Le routine di I/O su PRNTSTMP (st-, rdnxt-, rd-, wr-, rwr-, del-prntstmp) sono incluse tramite la catena di COPY generata (.k01).

CALL a sottoprogrammi¶

Programma	Scopo
GRIDADMN	Gestione griglia (Prepara, Svuota-Tutto, Add-Record, Modify-Record) e personalizzazione colonne (Shift-F4)

Il programma e' a sua volta richiamato via CALL da COGT23 e COGT24 come help/selezione stampante (F8).

Configurazioni RNEWCONF¶

Il programma non contiene un paragrafo x99-confi e non legge chiavi RNEWCONF applicative.

Note tecniche¶

Modello di stampa: linee, colonne, colonne massime e orientamento descrivono le caratteristiche fisiche del modulo predefinito della stampante e vengono usati a valle dai moduli di stampa per il dimensionamento del report.
Flag di linguaggio (PCL3/PCL5/PRESCRIBE): indicano quali famiglie di emulazione la stampante e' in grado di interpretare (valore X); la definizione puntuale delle sequenze di attivazione/disattivazione per ciascuna emulazione e' invece a carico di COGT23.
Orientamento: memorizzato in ptst-orientation come P (Portrait) o L (Landscape); in inserimento, se non gia' L, il default e' P.
Doppia veste (menu / lookup): discriminata da w-dc-called tramite i campi t22-called/t22-caller del copybook utilt22.cpy.