DSPATR(PR) في برنامج RPG لحماية الميدان

Question

أقوم بتطوير برنامج RPG على برنامج تطوير IBM

ما يحدث هو أنني أقوم بإنشاء ملف عرض بحقل الإدخال

أحاول إنجاز مهمة واحدة.

إذا قاموا بالفعل بإدخال كل الحقول وتم عرض السجل الآخر، فأنا أرغب في حماية الملف حيث يقومون فقط بإدخال القيمة حتى يضغطوا على زر الإدخال

لكني في حيرة من أمري كيف يمكنني استخدام DSPATR(PR) لحماية الحقل

Answer 1

لقد وجدت الإجابة على سؤالي.

للقيام بذلك، ما عليك سوى الانتقال إلى الخصائص الموجودة على مصمم الشاشة > انقر بزر الماوس الأيمن على الخصائص وابحث عن الكلمة الرئيسية protect وهذا سوف يحمي الشاشة بأكملها للمجال الذي يدخلون إليه enter يتم الضغط عليه لإلغاء الحماية.

ويمكن القيام بذلك أيضًا عن طريق الإضافة DSPATR(PR) مع المؤشر وإضافة هذا إلى RPG لتشغيل المؤشر للحقل المطلوب.

Answer 2

على الشاشة الخضراء، يعرف برنامج RPG فقط ما هو موجود على الشاشة عندما تضغط عليه <enter> على شاشتك.يبدو أنك تريد حماية الحقل بعد قيام المستخدم بإدخال البيانات في الحقل.لا أعتقد أن هذا ممكن إلا إذا كان لكل مجال CHECK(ER) في كل حقل.قد يكون ذلك مزعجًا اعتمادًا على وظيفة البرنامج.يفضل الأشخاص الذين يقومون بالإدخال العملي الاستمرار في الكتابة وقد حفظوا بالضبط عدد علامات التبويب والمسافات التي يحتاجون إلى إدخالها لإدخال البيانات.

Answer 3

للحصول على Purpouse

يمكنك تعيين سمات العرض منذ رمز RPG "الخلفي" الخاص بك، على سبيل المثال في حالتك ستكون قيمة الرمز الست عشري للحماية (للقراءة فقط) المقدمة هي "A0"، نلقي نظرة على الرمز:

في DDSSRC: giveacodicetagpre.

في RPGSRC، فقط تعيين أو مسح عند الحاجة إلى ذلك: giveacodicetagpre.

هناك الكثير من رموز HEXA للعديد من الأفهريات، فقط بحاجة إلى النظر حول www :)

Answer 4

a sel 1a b 11 2
99 dspatr (pc)

99 dspatr (Ri)

عند عرض حقل على الشاشة الخضراء، يمكنك Exfmt بشكل عام عن I / O. هنا، أود مسح حقل SEL أولا ثم Exfmt تنسيق السجل من ملف العرض (DDS).بمجرد الضغط على المستخدم، أدخل "تشغيل" المؤشر 99. سأظل ثم exfmt مرة أخرى لعرض الشاشة.في المثال إذا كان * IN99 * تم وضع المؤشر في حقل SEL وعكس صورة IT.يمكنك أن تفعل الشيء نفسه مع حماية dspatr (العلاقات العامة).في التعليمات البرمجية الخاصة بك، كنت تنطلق "مؤشر"، وعرض الشاشة.يدخل المستخدم الخاص بك "تشغيل" المؤشر ونعيد الشاشة.

في آر بي جي، يمكنك استخدام التحرك * على * in99.

أو يمكنك استخدام Seton ........ 99.

أو نقل "1" * in99.

في CLP، يمكنك chgvar var (& in99) القيمة ('1')