How to have user password for OFS?

Hi everyone again,

when i was working for another bank which was using R09, we were able to have user password from USER application by reading USER id in the routine to use that information into ofs message but in R10 i cant do it, is there anybody knows why or any solution for this??

Thank you all in advance
And waiting for Replies...

reading event is simple way is "READ R.USR FROM F.USR, Y.USR.ID ELSE NULL" and from this R array i could able to have password. on Desktop or from backend routine can be triggered.It wastnt problem when or where you run it

i tried this in R10 but didnt work but again i will try during the day and i will inform you. thank you my friend.

dear my friend,

i've tried before your suggestion and after you said again i've tried.as i saw and understood i am able to have it but when i execute the ofs msg it says security voilation.
End here are the code blocks

!

---

!
* <Rating>99</Rating>
!

---

!
PROGRAM ATB.CAGDAS2
! SUBROUTINE ATB.CAGDAS2
!

---

!
$INSERT I_COMMON
$INSERT I_EQUATE
$INSERT I_F.USER
!

---

!
FN.USR = "F.USER" ; F.USR = "" ; CALL OPF(FN.USR, F.USR)

R.USR = ""
Y.USER.ID = "CAGDAS3"
READ R.USR FROM F.USR, Y.USER.ID ELSE NULL
Y.OFS.PASSW = R.USR<EB.USE.PASSWORD>

Y.OFS = "USER,/I/PROCESS,cagdas3/" : Y.OFS.PASSW : "/,CAGDAS,START.DATE.PROFILE::=" : 20121212
Y.MSG.ID = "DENEME"
CRT Y.OFS
CALL ATB.OFS.ONLINE(Y.OFS,Y.MSG.ID,Y.ORD.ID,"",Y.MSG.OUT,Y.RSP)
!

---

!
END
but if i give the password it works fine, is there anyway??

Is the password encrypted? If so set the field password encrytion in OFS.SOURCE record you are using and try again.

USER,/I/PROCESS,cagdas3/ /,CAGDAS,START.DATE.PROFILE::=20121212
when i send the data to TCS, it seems like that but how can i set the field ?

yes i've tried your way and it worked, thank you my friend :)

Set the field PSWD.ENCRYPTED as YES in the OFS.SOURCE record you are using. Sorry friend I forgot to mention the field name. Anyhow you found it.

Best wishes...