At line 1 added 80 lines |
%%(display:none) |
{{{ |
WikiUp |
}}} |
/% |
[{TableOfContents }]\\ |
::CONSIDERAZIONITenuto conto che in SMEUP il numero di stampe non è elevatissimo ma neanche irrilevante,si è cercata |
una soluzione che consentisse l'emissione del formato con un impatto minimo a livello di modifica |
del codice sorgente. |
Se il richiamo alla /COPY G94 fosse stato concepito a livello di ogni singolo programma di stampa |
avremmo dovuto tener conto di fattori quali proliferazione e ridondanza di istruzioni pgm ma soprattutto |
più tempo per modificarli col rischio di commettere errori oppure omissioni. |
Per questo si è individuata la /COPY QILEGEN,£B£S_C0 come punto di intervento comune. |
!! OBIETTIVO\\ |
Non sempre ci è chiaro ciò che le stampe producano a livello di parametrizzazione.Lo scopo di |
corredare la stampa di uno schema iniziale in cui vengono riportate parzializzazioni/ordinamenti ecc |
è proprio quello di completarle e di renderle più leggibili. |
! TECNICA DI APPLICAZIONE DELLA MODIFICA\\ |
- 1 L'emissione del formato di parzializzazione è condizionato dal flag stampa condizioni che |
si trova in tabella (UP TAB settore PGM ), il campo può assumere tre valori |
(Blank=non viene emesso il formato A=emissione del formato con salto pagina B=emissione del |
formato senza salto pagina) |
|
- 2 Ricompilare il programma di stampa (solo pgm con specifiche "O" per intenderci) |
|
---- utilizzato in ---- |
- 3 elenco routines/pgm necessari alla compilazione (QILEGEN/ £B£S_C0/...pgm stampa |
( " " £B£S_C2/...pgm stampa |
( " " £B£S_DS/£B£S_E |
( " " £B£S_E /...pgm stampa |
( " " £B£S_SCH/...pgm stampa |
( " " £G94 /£B£S_C2/pgm stampa |
( " " £G94DS /£B£S_E /£G94 /pgm stampa |
( " " £IR1 /B£G94G |
(SRC B£G94G |
Attualmente,poi si vedrà, |
condizione sine qua non,è che venga eseguita la parzializzazione con il lancio del programma |
Es: (CALL BRCM51A stampa delle commesse) che consente la memorizzazione dei parametri in |
LDA (local data area). |
La fase successiva è quella di eseguire per il test il comando (T G94 ) che produrrà questo effetto |
--------------------------------------------------------------------------------------------------- |
Funzione SCA Scansione £G94FU |
Metodo POS Posizionamento £G94ME |
Nome file BRCOMM0F COMM Commesse £G94FL |
Nome programma BRCM51B COMM Stampa Commesse - Esecuzione S £G94PR |
................................................................................................ |
................................................................................................ |
................................................................................................. |
.............................................................................1M$CDMGM$TICMM$TICM |
..............................................TATATAMAG.......BSA......BSA....................... |
................................................................................................. |
....................................1............................................................ |
..............................2........................M$COMM=%RANGE("A" "Z") & M$TICM>="A" & M$C |
DMG=%RANGE("1" "9").............................................................................. |
.............2................................................................................... |
................................................................................................. |
................................................................................................. |
...................................................0020.................................. |
------------------------------------------------------------------------------------------ |
Le due fasi del metodo sono (POS) per il posizionamento e (LET) per la lettura |
La parte tratteggiata rappresenta la (LDA) che viene letta dal pgm (B£G94G) e che scandirà ad ogni |
invio con metodo (LET) |
Il risultato è restituito a colonna (20 e 21) leggendo il tracciato record del file definito in |
(£G94FL) propone la decodifica solo dei campi selezionati dalla parzializzazione. |
Il pgm tiene conto che esista almeno un parametro di parzializzazione |
ES: Al primo invio |
*...+....1....+....2....+....3....+....4....+....5 ...+... 6 ...+... 7 ...+... 8 ...+... 9 ...+... |
| COMMESSA 0 A |
Z | |
ES: Al secondo invio |
*...+....1....+....2....+....3....+....4....+....5 ...+... 6 ...+... 7 ...+... 8 ...+... 9 ...+... |
| Magazzino 1 |
9 | |
e così via...... |
. |
P.S. |
ATTENZIONE : |
Il pgm (BRAR51B) è da considerarsi fuori standard in quanto il pgm prevede la gestione dell'output |
su (printer file) .Il richiamo della /COPY G94 avviene all'interno del programma stesso e non |
dalla routine £B£S_C0 |