Interested to Buy Any Domain ? << Click Here >> for more details...
How to set on/off a group of indicators in a single statement?
- 3 Answers
- 11296 Views
- I also Faced
- E-Mail Answers
Answers were Sorted based on User's Feedback
Answer / david lex
Both are correct, but if you're using free form, move will
NOT work (since it's not supported).
d dsInds based( *in )
d iErrNameFirst 20 20n
d iErrNameMid 21 21n
d iErrNameLast 22 22n
d iErrNameSuff 23 23n
d errorsName 4a overlay( dsInds : 20 )
/free
// reseting a subgroup of indicators
errorsName = *all'0'; // All indicators OFF
errorsName = *all'1'; // All indicators ON
// reseting the entire indicator structure
dsInds = *all'0';
dsInds = *all'1';
*in( * ) = *off;
*in( * ) = *on;
/end-free
| Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sulthan
I cannot recollect completely. I will explain with an example.
C MOVE '00000' *IN(21).
this will set indicators from 21 to 25( total 5 zeroes from
21) to 0's.
Note: It is MOVEA or MOVE, not sure.
| Is This Answer Correct ? | 2 Yes | 5 No |
The PGMA calls PGMB.PGMB generates a report.The report should contain the called program name(PGMA).How do i get the called program name in PGMB to print it on the spool file?(calling program name should NOT be hard coded or passed as parameter to called program?
WHERE DO WE USE COMIT KEYWORD IN AN RPG PROGRAM? YOU MADE SOME CHANGES TO DATABASE BUT YOU DON'T WANT TO SAVE THOSE CHANGES NOW? HOW DO YOU HANDLE THIS ONE?
What are different ways to pass data between programs and which one is the efficient way?
how to run only 10 modules of existing N modules in service program in RPGILE ?
When a object will be locked & when a record will be locked? Plz explain.
WHAT IS MONMSG IDENTIFIER FOR STRTCPFTP command IN cl (as/400)?
how can we can we the data decimal error?how can we open such file in support
what was the robotech rpg?
how many variables can we declare in cl pgm?
can any one help in hawkeye and turnover or any change management system plzzzzz or send the documents to my mail id :gvsp.as4@gmail.com
1.What is the Maximum field length we can declare in RLU?? 2. What is the difference if your designing RLU using DDS and using the option 19 for the RLU??
To check the locks , we use cmd WRKOBJLCK , but how we confirm whether it's objeck lock / member lock. I confused with the Lock type and Status values...Can any body please tell me ...
RPG400 
