Focal Point
[Sharing] Updating Managed Reporting Security using a WebFOCUS Report

This topic can be found at:
https://forums.informationbuilders.com/eve/forums/a/tpc/f/7971057331/m/676104654

June 02, 2010, 09:39 AM
Efrem
[Sharing] Updating Managed Reporting Security using a WebFOCUS Report
I have noticed that sometimes companies have the need to add a whole bunch of users to Managed Reporting which come from
other systems. If your company is licensed to use WebFOCUS Web Services and the Web Services Adapter, here's a very easy way to
accomplish that.
A Return Code (RC) of 1000 means that the update was successful.
The WSDL File can be obtained from the WSDL File Creation Utility accessed from the WebFOCUS Welcome Page.

Master File
-----------
FILENAME=M6ILO, SUFFIX=SOAP , $
SEGMENT=MRECREATEUSER, SEGTYPE=S0, $
GROUP=MRECREATEUSER, ALIAS=MRECreateUser, ELEMENTS=3, $
GROUP=IBIWS_COOKIE, ALIAS=IBIWS_cookie, ELEMENTS=13, $
FIELDNAME=TIME1, ALIAS=time, USAGE=P20, ACTUAL=A20, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=STATUS, ALIAS=status, USAGE=A5, ACTUAL=A5, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=MRCOOKIE, ALIAS=MRcookie, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=WFCOOKIE, ALIAS=WFcookie, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=WFVIEWER, ALIAS=WFviewer, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=USERID, ALIAS=userid, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=PASS, ALIAS=pass, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=MREUID, ALIAS=mreuid, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=MREPASS, ALIAS=mrepass, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=CSERVER, ALIAS=cserver, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=DOSIGNON, ALIAS=dosignon, USAGE=A5, ACTUAL=A5, ACCESS_PROPERTY=(NEED_VALUE), $
GROUP=OTHERCOOKIES, ALIAS=othercookies, ELEMENTS=1, $
GROUP=COOKIESARRAYENTRY, ALIAS=CookiesArrayEntry, ELEMENTS=2, $
FIELDNAME=NAME, ALIAS=name, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=VAL, ALIAS=val, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=SERVERSESSION, ALIAS=serverSession, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=USERID1, ALIAS=userId, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=DESCRIPTION, ALIAS=description, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=__RESPONSE, USAGE=TX80L, ACTUAL=TX, ACCESS_PROPERTY=(INTERNAL), $
SEGMENT=RESPONSE, SEGTYPE=S0, SEGSUF=XML , PARENT=MRECREATEUSER, POSITION=__RESPONSE, $
FIELDNAME=RESPONSE, ALIAS=MRECreateUserResponse, USAGE=A1, ACTUAL=A1, ACCESS_PROPERTY=(INTERNAL), $
FIELDNAME=MRECREATEUSERRESULT, ALIAS=MRECreateUserResult, USAGE=A1, ACTUAL=A1, ACCESS_PROPERTY=(INTERNAL),
REFERENCE=RESPONSE, PROPERTY=ELEMENT, $
FIELDNAME=TIME2, ALIAS=time, USAGE=P20, ACTUAL=A20,
REFERENCE=MRECREATEUSERRESULT, PROPERTY=ELEMENT, $
FIELDNAME=RC, ALIAS=rc, USAGE=I11, ACTUAL=A11,
REFERENCE=MRECREATEUSERRESULT, PROPERTY=ELEMENT, $
FIELDNAME=XML, ALIAS=xml, USAGE=A30, ACTUAL=A30,
REFERENCE=MRECREATEUSERRESULT, PROPERTY=ELEMENT, $


Access File
-----------
SEGNAME=MRECREATEUSER, CONNECTION=WebFOCUS, VERSION=1.1, OBJECT=MRECreateUser,
ACTION=http://informationbuilders.com/MRECreateUser,
TARGETNS=http://informationbuilders.com/, STYLE=DOCUMENT,
ELEMFORM=qualified, ATTRFORM=unqualified, $
ID=ibi, NS=http://informationbuilders.com/, ELEMFORM=qualified,
ATTRFORM=unqualified, $
FIELD=IBIWS_COOKIE, TYPE=LogOnInfo, NS_ID=ibi, $
FIELD=TIME1, TYPE=integer, NS_ID=xsd, $
FIELD=STATUS, TYPE=boolean, NS_ID=xsd, $
FIELD=DOSIGNON, TYPE=boolean, NS_ID=xsd, $
FIELD=OTHERCOOKIES, TYPE=ArrayOfCookiesArrayEntry, NS_ID=ibi, $
FIELD=COOKIESARRAYENTRY, TYPE=CookiesArrayEntry, NS_ID=ibi, $


WebFOCUS Report
---------------
ENGINE SOAP SET CONNECTION_ATTRIBUTES WebFOCUS/,:'http://localhost:8080/ibi_apps/uddi/WebFocus.jsp?IBIUDDI_parms=IBIWF_language%3Den%26IBIUDDI_webApplocation%3D%252Fibi_apps%252Fuddi%26IBIUDDI_wsdlversion%3D1.1%26IBIUDDI_mre%3Dtrue%26IBIUDDI_action%3Drun%26 file://c:/ibi/apps/webservices/WebFocus.wsdl'
TABLE FILE MRECREATEUSER
PRINT
USERID1
DESCRIPTION
RC
WHERE ( DOSIGNON EQ 'true' ) AND ( MREUID EQ 'admin' ) AND ( MREPASS EQ ' ' ) AND ( USERID1 EQ 'Efrem' ) AND ( DESCRIPTION EQ 'Efrem Litwin' );
END