Esempio
Nel seguente esempio il materiale definito viene importato dalla tabella (WMAT.TAB) e salvato come testo in un parametro QS. Il seguente esempio mostra una possibile applicazione e i necessari passi di programma.
I testi dei parametri QS possono continuare a essere impiegati ad es. con l'ausilio della funzione FN 16 in specifici file di protocollo.
0 BEGIN PGM SQL_READ_WMAT MM | |
1 SQL Q1800 "CREATE SYNONYM my_table FOR 'TNC:\table\WMAT.TAB'" | ; Creazione del sinonimo |
2 SQL BIND QS1800 "my_table.WMAT" | ; Concatenamento di parametri QS |
3 SQL QL1 "SELECT WMAT FROM my_table WHERE NR==3" | ; Definizione della ricerca |
4 SQL FETCH Q1900 HANDLE QL1 | ; Esecuzione della ricerca |
5 SQL ROLLBACK Q1900 HANDLE QL1 | ; Chiusura della transazione |
6 SQL BIND QS1800 | ; Eliminazione del legame di parametri |
7 SQL Q1 "DROP SYNONYM my_table" | ; Cancellazione del sinonimo |
8 END PGM SQL_READ_WMAT MM |
Fase | Spiegazione | |
---|---|---|
1 | Creazione sinonimo | Assegnazione di un sinonimo a un percorso (sostituzione dell'indicazione lunga del percorso con nome corto)
|
2 | Legame di parametro QS | Collegamento di un parametro QS a una colonna della tabella
|
3 | Definizione ricerca | Una definizione della ricerca comprende l'indicazione del valore di trasferimento
|
4 | Esecuzione ricerca | Il controllo numerico esegue l'operazione di lettura
|
5 | Chiusura transazione | La transazione viene terminata e le risorse impiegate vengono abilitate |
6 | Eliminazione legame | Il legame tra colonna della tabella e parametro QS viene eliminato (necessaria abilitazione risorse) |
7 | Cancellazione sinonimo | Il sinonimo viene di nuovo cancellato (necessaria abilitazione risorse) |
I sinonimi rappresentano esclusivamente un'alternativa alle necessarie indicazioni assolute del percorso. Non è possibile inserire indicazioni relative del percorso.
Il seguente programma NC mostra l'immissione di un percorso assoluto.
0 BEGIN PGM SQL_READ_WMAT_2 MM | |
1 SQL BIND QS 1800 "'TNC:\table\WMAT.TAB'.WMAT" | ; Concatenamento di parametri QS |
2 SQL QL1 "SELECT WMAT FROM 'TNC:\table\WMAT.TAB' WHERE NR ==3" | ; Definizione della ricerca |
3 SQL FETCH Q1900 HANDLE QL1 | ; Esecuzione della ricerca |
4 SQL ROLLBACK Q1900 HANDLE QL1 | ; Chiusura della transazione |
5 SQL BIND QS 1800 | ; Eliminazione del legame di parametri |
6 END PGM SQL_READ_WMAT_2 MM |