DSPATR(PR)RPG 을 보호하기 위해 프로그램 분야

StackOverflow https://stackoverflow.com//questions/9629096

  •  09-12-2019
  •  | 
  •  

문제

나 개발 RPG 프로그램에서 IBM 소프트웨어 개발

무슨 일이 나를 만드는 디스플레이 파일 입력 필드

나는 달성하려고 하는 작업입니다.

그들은 이미 모든 입력 필드 및 다른 기록은 표시를 보호하고 싶어 신청되는 그들은 바로 입력 값을 때까지 그들을 눌러 입력

그러나 내가 혼동할 수 있는 방법을 사용하 DSPATR(PR)분야를 보호하기 위해

도움이 되었습니까?

해결책 2

내 질문에 대한 답변을 찾았습니다.

화면 디자이너에서 속성으로 이동하여 속성을 클릭하고 속성을 찾고 Keywer 키워드를 찾을 수 있으며 protect가 보호되지 않도록 enter를 눌러서 입력하는 필드의 전체 화면을 보호합니다.

인디케이터가있는 DSPATR(PR)를 추가하고 RPG에 이것을 추가하여 필요한 필드에 대해 표시기를 켜서이를 추가하여 수행 할 수 있습니다.

다른 팁

녹색 화면 RPG 프로그램에 대해 알고 무엇을 때 화면에 hit <enter> 니다.그것은 당신 같은 소리를 보호하려면 필드에 사용자가 입력한 데이터습니다.나는 생각하지 않는 것은 가능하지 않는 한 각 분야가 CHECK(ER) 각 필드에.는 것을 얻을 성가신 프로그램에 따라 기능이다.손 다운 항목을 선호 하는 사람들을 유지하기 위해 입력하고 그들만을 기억하는 방법을 정확하게 많은 탭 및 공간 필요한 열쇠 데이터를 입력합니다.

연구 purpouse의 경우 rpg "백엔드"코드 이후 디스플레이 속성을 설정할 수 있습니다. 예를 들어 보호 (읽기 전용) 파일에 대한 16 진수 코드 값은 'a0'이며 코드를 보았습니다. ddssrc : 

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

rpgsrc에서 필요할 때 설정 또는 지우기 만하면됩니다. 

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
.

많은 푸로스에 대한 헥사 코드가 너무 많아서 www :)을 둘러보아야합니다.

a sel 1a b 11 2
99 DSPART (PC)

A 99 DSPART (RI)

녹색 화면에 필드를 표시 할 때 일반적으로 I / O를 위해 exfmt입니다. 여기서는 SEL 필드를 먼저 지우고 디스플레이 (DDS) 파일에서 레코드 형식을 EXFT합니다.사용자가 ENTER를 누르면 표시기 99를 "켭니다". 그런 다음 다시 화면을 표시하려면 다시 exft합니다.이 예에서는 * in99가 * ON이면 커서가 SEL 필드에 위치하여 이미지를 역순으로합니다.DSPRATH (PR) 보호와 동일하게 할 수 있습니다.코드에서 표시기를 "해제"하고 화면을 표시하십시오.사용자가 히트 표시기를 "켜십시오"를 입력하고 화면을 repop합니다.

RPG에서는 * 켜기 * in99를 사용할 수 있습니다.

또는 seton ........ 99를 사용할 수 있습니다.

또는 '1'* in99를 이동하십시오.

CLP에서 CHGVAR VAR (& IN99) 값 ( '1')

라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top