How can a screen field that has changed since the last
output operation be detected?
- 4 Answers
- 7778 Views
- IBM, I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / surendra y mudliar
By using MDT (Modified Data Tag) keyword for the field for
which you want to detect the change. You can use optional
indicator with this keyword, if indicator is on then it
indicates that the field has been changed since last output
operation.
| Is This Answer Correct ? | 4 Yes | 0 No |
Answer / govind ram
Attach the MDT (modified data tag) attribute to the field, to detect whether field has been changed as a result of user input.
| Is This Answer Correct ? | 0 Yes | 0 No |
Answer / govind ram
Attach the MDT attribute to the field, to detect whether field has been changed as a result of user input.
| Is This Answer Correct ? | 0 Yes | 0 No |
What is the name of default out queue when user logs inn to syatem with valid profile?
this is rpg3 code W0RTN IFEQ @CN,002 what is the means @CN,002
How to update selected fields from pf without using update opcode. How to read all member in Rpg-3,without using any cl command?
Q:HI friends accually ihave one problem plesase let me know the alternate code of this code. Related field description of code: Add a field, CALvsPRD, "Calendar Day Starts Before/After Production Day" to the parameter set WRKORDER which accepts values 'A' or 'B' o B = Calendar Day Starts Before Production Day o A = Calendar Day Starts After Production Day o Any other value indicates the production and calendar dates are always the same. code: Automatic Execution Of *INZSR Subroutine /Z01 * retrieves WRKORDER field values. /Z01 * Calculate default Production Date and return it to caller. /Z01 * Production date defaults to system date /Z01 C Eval P@Pdate = %DATE() /Z01 * unless Calendar date starts Before PDN(production) date and /Z01 * system time is before PDN Start Time then /Z01 * PDN date is yesterday. /Z01 C If W@CALvsPRD = 'B' and /Z01 C %TIME() < %TIME (W@Strtime) /Z01 C Eval P@Pdate -= %Day(1) /Z01 * unless Calendar date starts After PDN date and /Z01 * system time is *GE PDN(production) Start Time then /Z01 * PDN date is tomorrow. /Z01 C ElseIf W@CALvsPRD = 'A' and W@Strtime > *Zero and /Z01 C %TIME() >= %TIME (W@STrtime) /Z01 C Eval P@Pdate += %Day(1) /Z01 C EndIf /Z01 C Eval *InLr = *On
Q:Hi all,i want accurate answer with code using in built functions.please sent me code as soon as posible. I have program nmed PGM1 which '' RETRIEVE Current production date''should correctly default the production date for the user who is issuing raw materials to the manufacturing.The production date can be different from the celendra date. However, the program does not make the correct adjustment for all manufacturing plants. there is a parameter which determines the production start time e.g. 07:00 if the system time precedes this,the program subtracts one from the celendra day.This work fine when the celendar day starts after production day as it does in England,the system should be adding one to the celendar day during the overlap. unfortunately the program was desined to assumed the celendar day always starts before the production day. Change required in the program: Change the PROGRAM PGM1 to use the new parrameter to decide whether to add or subtract 1 from the celendar day when determining the production date.
How to handle duplicate error handling in RPG?
if there is pf in two libraries and there is a logical file based on the PF, how to find the pf on which the pf is based.
1..Write an sql query to find the employee name who is having 2 phone numebr? 2.Write an sql query to the the second highest salary of the employee?
I need to generate outfile for object of all the user lib. in the sysmte using cmd DSPOBJD. But this cmd is correcpted in my server,Any body tell me is there any alternative...?
two types of read performed in dataqueue?????
what is the difference between do while and do until?
1.How to read a subfile in out put mode? 2.what are the keywords used to share same file? 3.using composite key which rpg code used?
RPG400 
