DSPAR (PR) nel programma RPG per proteggere il campo

Question

Sto sviluppando il programma RPG sul software di sviluppo IBM

Cosa succede è che sto creando un file di visualizzazione con campo di input

Sto cercando di realizzare un compito.

Se inseriscono già tutto il campo e l'altro record è visualizzato, voglio proteggere i depositati che inseriscono semplicemente il valore finché non premono Invio

Ma io sono confuso come posso usare il DSPATR (PR) per proteggere il campo

Answer 1

Ho trovato risposta per la mia domanda.

Per fare ciò vai su Proprietà sullo schermo Designer> Fare clic con il tasto destro del mouse per le Proprietà e trovare la parola chiave protect e questo proteggerà l'intero schermo per il campo che entrano finché non viene premuto enter su Unprotect.

È anche possibile aggiungere aggiungendo DSPATR(PR) con indicatore e aggiungilo a RPG per accendere l'indicatore per il campo richiesto.

Answer 2

Sullo schermo verde Il programma RPG sa solo ciò che è sullo schermo quando si colpisce <enter> sullo schermo.Sembra che tu voglia proteggere un campo dopo che l'utente ha inserito i dati nel campo.Non penso che sia possibile a meno che ogni campo abbia il CHECK(ER) su ciascun campo.Ciò avrebbe fastidioso a seconda della funzione del programma.Le persone di ingresso pratico preferiscono tenere semplicemente la digitazione e hanno memorizzato esattamente quante schede e spazi devono tasti per inserire i dati.

Answer 3

Per lo studio Purpouse è possibile impostare gli attributi di visualizzazione dal tuo codice "Backend" di RPG, ad esempio nel tuo caso il valore del codice esadecimale per Protect (sola lettura) archiviato è "A0", dare un'occhiata al codice: in DDSRC:

.....AAN01N02N03T.Nombre++++RLon++TPdBLínPosFunciones+++++++++++++++++++++++++++
 A* First declare the variable 
 A                REV1           1A  P
 A*
 A* then, after the display field in function limit you assign it
 A*
 A                FIELD01       14Y 2B 17 42EDTCDE(1)    
 A                                          DSPATR(&REV1)

.

in rpgsrc, basta impostare o cancellare quando ne hai bisogno:

CL0N01Factor1+++++++Operac&ExtFactor2+++++++Resultado+++++Lon++D+MaMeIg....Comentarios+++++++++
C* 
C* Set the hex value in the QDDSSRC variable
C                       EVAL      REV2 = x'A0'
C*
C* Clear the variable
C                   CLEAR                   REV1              1

.

Ci sono troppi codici HEXA per molte fusei, devi solo guardare intorno al www :).

Answer 4

A SEL 1A B 11 2
A 99 DSPAR (PC)

A 99 DSPAR (RI)

Quando si visualizza un campo sullo schermo verde, si esult Generalmente per I / O. Qui, chiarirei il campo SEL per primo quindi exfmt il formato di registrazione dal file del display (DDS).Una volta che l'utente preme ENTER, I "Accendi" l'indicatore 99. Vorrei quindi esprimere di nuovo per visualizzare lo schermo.Nell'esempio se * nel99 era * acceso, il cursore sarebbe posizionato al campo SEL e inverso l'immagine.Puoi fare lo stesso con Protect DSPAR (PR).Nel tuo codice, ti "impostare" l'indicatore, visualizzare lo schermo.I colpi dell'utente sono inseriti "Accendi" l'indicatore e ripristina lo schermo.

In RPG, è possibile utilizzare Move * On * Nel99.

o puoi usare seton ........ 99.

o Sposta '1' * IN99.

In CLP, è possibile ChGVAR Var (& In99) Valore ('1')