| 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 |
