how we lock a pf???? what are the parameters used in this
command.how we understand whether an object is locked or not??
using command .....we have to use *PSSR? and trough
*status..how??.if we give an eg to me???pls answer me anyone..

Answer Posted / samul

how we lock a pf????

Ans :Using cmd ALCOBJ


how we understand whether an object is locked or not??
Ans : Using cmd DSPOBJLCK


we have to use *PSSR? and trough
*status..how??.if we give an eg to me???

Ans : To handle to record lock in pgm (RPG)
need to handle wiht status code 01218 in *PSSR subroutine.

Cheers...

Is This Answer Correct ?    4 Yes 0 No



Post New Answer       View All Answers


Please Help Members By Posting Answers For Below Questions

is it possible to create a physical file without dds?

1180


can you explain the difference between spacea,spaceb,skipa and skipb. I'm new to learning about as400 and printer files. can any one give me an example using source code showing the difference that occurs between using these 4 keywords. A-Physical file PF004 source UNIQUE R RR STUNAM 10 ROLLNU 5 0 MARKS 3 0 SEX 6 K ROLLNU 4 records present in PF004 are STUNAM ROLLNU MARKS SEX KAVYA 12,344 55 FEMALE MADHAVAN 14,579 60 MALE RAMYA 14,785 70 FEMALE KRISHNAN 14,988 72 MALE B-Printer File PRINT1 source A R HEADER A 10 3'STUNAM' A 10 20'ROLLNU' A 10 30'MARKS' A 10 40'SEX' A R DETAIL A SPACEB(1) A STUNAM 10 3 A ROLLNU 5 0 20 A MARKS 3 0 30 A SEX 6 40 A R FOOTER A SPACEB(1) A 20'END OF REPORT' C-RPG/400 Program PRTTPG source FPF004 I F E DISK FPRINT1 O E PRINTER C WRITE HEADER C READ PF004 60 C *IN60 DOWEQ *OFF C WRITE DETAIL C READ PF004 60 C ENDDO C WRITE FOOTER C SETON LR D-spooled file result set Display Spooled File File . . . . . : PRINT1 Page/Line 1/10 Control . . . . . Columns 1 - 130 Find . . . . . . *...+....1....+....2....+....3....+....4....+....5....+.... 6....+....7....+....8....+....9....+....0....+....1....+.... 2....+....3 STUNAM ROLLNU MARKS SEX KAVYA 12344 055 FEMALE MADHAVAN 14579 060 MALE RAMYA 14785 070 FEMALE KRISHNAN 14988 072 MALE END OF REPORT Bottom F3=Exit F12=Cancel F19=Left F20=Right F24=More keys I have changed from SPACEB to SPACEA now in my printer file source E-Changed PRINT1 Source A R HEADER A 10 3'STUNAM' A 10 20'ROLLNU' A 10 30'MARKS' A 10 40'SEX' A R DETAIL A SPACEA(1) A STUNAM 10 3 A ROLLNU 5 0 20 A MARKS 3 0 30 A SEX 6 40 A R FOOTER A SPACEA(1) A 20'END OF REPORT' F-Spooled file Result Set after keyword change Display Spooled File File . . . . . : PRINT1 Page/Line 1/10 Control . . . . . Columns 1 - 130 Find . . . . . . *...+....1....+....2....+....3....+....4....+....5....+.... 6....+....7....+....8....+....9....+....0....+....1....+.... 2....+....3 KAVYAM 12344U 055KS FEMALE MADHAVAN 14579 060 MALE RAMYA 14785 070 FEMALE KRISHNAN 14988 072 MALE END OF REPORT Bottom F3=Exit F12=Cancel F19=Left F20=Right F24=More keys Overprinting not displayed.

10213


what is the purpose of putovr (put with explicit override) keyword?

922


list some of the commonly used commands for debugging?

883


is there any way I can ease my rpg controls on numeric input fields? How about an input date field?

602






writing an sql statement from selecting records from two files using single statement and nested select statement.

633


which of the cl command can be used to determine which logical files are dependent on a specific file?

587


all i need to know about cmpseqdat parameter in cmppfm, how it works and can we retrieve line sequence and date from the output?

2407


how do you use exceptional write in c specs?

1135


how can you detect overflow for a print program that prints multiple lines per cycle?

948


if we tried to move year part of *iso date into a field of length 3, what will happen ?

650


how you will find an error which is not in the first page of the subfile without using rolldown key?

547


What Is Ddm ?

1023


how to toggle between single line and multi - line display of a particular record in a subfile?

1076


how would you design the process for a nightly, high volume check producing process that needs to select only records that are flagged to be processed?

923