|
Hi All
I am running into problem in securing File Transfer from AS/400 to PC using client access.This is the exit program registered with QIBM_QTF_TRANSFER
*
* Arrays for transfer string
*
* Data structure of parameter I#FLD
d i#fld ds 4171
d i#usr 1 10
d i#app 11 20
d i#rqs 21 30
d i#tobj 31 40
d i#tlib 41 50
d i#tmbr 51 60
d i#tfmt 61 70
d i#tlen 71 75 0
d tfrrq 76 4171
d dim(4096)
*
d reject c const('0')
d accept c const('1')
*
d i#rtn s 1
* No specific parameters for message function call
*
c *entry plist
c parm o#rtn i#rtn
c parm i#fld
*
c *like define i#rtn o#rtn
*
* Default to reject requests
c move reject o#rtn
*
c if (i#rqs = 'SELECT') and
c (i#usr = 'ITDRIZWN")
c (I#TLIB ANDEQ'RPGISCOOL')
c move accept o#rtn
c endif
*
c eval *inlr=*on
c return
But the above exit program doesn't work as any other user profile was able to transfer files to PC apart from ITDRIZWN in the program.We are on V4R4 and on TCP/IP so no need for router user profile as I understood.I don't want to tightly secure the database libraries by taking away their authorities by giving strict exclude which will avoid the problem.
What I am missing and how can I control.Is there anything to do with CA Express or any configurations in SubSystems?.
Thanks for any help,
Rizwan
As an Amazon Associate we earn from qualifying purchases.
This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].
Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.