i'm working on progA , in that program i want to see the
userids of the users who work on this program?
Answers were Sorted based on User's Feedback
Answer / ali
by using WRKACTJOB, u can see the names of users using this
pgm while they are using
Is This Answer Correct ? | 8 Yes | 3 No |
Answer / ken
Use the Program Data Structure (SDS) in D-Spec.
Positions 254 to 263 gives you the user running th program
Is This Answer Correct ? | 8 Yes | 3 No |
Answer / syam
You can't see other user id in which program you are using.
You can see current user id means your id if you are using
the program you can use RTVUSRPRF command in CL or Program
Data Structure you can specify position 254 to 263 in RPG
Is This Answer Correct ? | 7 Yes | 2 No |
Answer / kumar
If anyone does not know the answer, plz DO NOT POST THE
ANSWERS AND POLLUTE THE SITE! The info will be read by
somany people who SCOLD!!
Is This Answer Correct ? | 5 Yes | 0 No |
WRKOBJLCK and then F6, then u can see the workstations which
are using that pgm.
Based on the WORKSTATION ID, u can use DSPUSRPRF, u can get
the details of USER
Is This Answer Correct ? | 1 Yes | 0 No |
Answer / anupam
the program must be stored in some source physical
file/library. to fetch who has locked the program we can do
WRKOBJLCK OBJ(LIBRARY/QRPGLESRC) OBJTYPE(*FILE) MBR(progA)
Here LIBRARY/QRPGLESRC is the library and source physical
file where the member progA is stored.
Is This Answer Correct ? | 1 Yes | 0 No |
Answer / sekhar214
SYAM IS RIGHT.IF YOU REALLY WANT TO SEE THE USERS , MAINTAIN A OUT FILE, WRITE THE USER NAME INTO THAT FILE WHEN THAT JOB IS CALLED.
Is This Answer Correct ? | 0 Yes | 0 No |
1)WRKUSRJOB
2)program status data structure
D data structure name SDS
D USER 254 263
* Username
Is This Answer Correct ? | 0 Yes | 0 No |
What is the purpose of PUTOVR keyword?
what happens when sflsiz = sflpag? What are the advantages and disadvantages?
What hapens when we use CPYF command to copy a LF? On which PF will it be dependent???
How to sort an array in descending in RPG
Suppose in CL we reach at end of file and again we have to reach from 1 record
3. Given the DOS Specification below and the following information: • Indicator 50 is off • No records have been written to the subfile What will be the result if the EXFMT operation code is performed on the record format CTLR? A R SUBFL A DESCRIP 101 6 1ODSPATR(UL) A DFT(’NOT FOUND’) A R CTLR SFLCTL(SUBFL) A N50 SFLDSP A SFLDSPCTL A SFLINZ A 67 SFIJEND A SFLSIZ(13) A SFLPAG(12) A ACCOUNTNO 100 S 10 a.) Only AccountNo will display b.) SUBFL will be initialized with 13 blank records c.) An I/O exception error will occur d.) The screen will display 12 records with ‘NOT FOUND’
What is journalling and commitment control?
this is rpg3 code W0RTN IFEQ @CN,002 what is the means @CN,002
what is file information data structure?
suppose one file is used by 100 user and file is locked by 100 user, what are the impact analysis?
how does the rpg element work?
Please tell me how to read the records from a file with load an array of size with error conditions(The logic answer for this question is ARR is array of 99 elements Z-ADD 0 IDX *LOVAL SETLL FILE READ FILE 99 *IN99 DOWEQ *OFF IDX ANDLT 99 ADD 1 IDX MOVE FIELD ARR,IDX READ FILE 99 ENDDO).So,Please give me the complete of this code.