Focal Point Banner


As of December 1, 2020, Focal Point is retired and repurposed as a reference repository. We value the wealth of knowledge that's been shared here over the years. You'll continue to have access to this treasure trove of knowledge, for search purposes only.

Join the TIBCO Community
TIBCO Community is a collaborative space for users to share knowledge and support one another in making the best use of TIBCO products and services. There are several TIBCO WebFOCUS resources in the community.

  • From the Home page, select Predict: WebFOCUS to view articles, questions, and trending articles.
  • Select Products from the top navigation bar, scroll, and then select the TIBCO WebFOCUS product page to view product overview, articles, and discussions.
  • Request access to the private WebFOCUS User Group (login required) to network with fellow members.

Former myibi community members should have received an email on 8/3/22 to activate their user accounts to join the community. Check your Spam folder for the email. Please get in touch with us at community@tibco.com for further assistance. Reference the community FAQ to learn more about the community.


Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED] How to update WF User status using REST WebServices from webfocus

Read-Only Read-Only Topic
Go
Search
Notify
Tools
[SOLVED] How to update WF User status using REST WebServices from webfocus
 Login/Join
 
Member
posted
Hi all
I am trying to update WF User status using below REST Web Services metadata. but i got (FOC42229) ENTITY 'nbsp' IS UNDEFINED error.
Could any one guide me how to update WF User details from webfocus.


update_wfuser.acx
SEGNAME=M6ILO, CONNECTION=ibfs, OBJECT=rs, SERVICETYPE=REST, HTTPMETHOD=POST,
  RESTRESPONSE=XML, HTTPBODY=ENCODE, $


update_wfuser.mas
 
FILENAME=M6ILO, SUFFIX=REST    , $
  SEGMENT=M6ILO, SEGTYPE=S0, $
    FIELDNAME=IBFS_NAME, ALIAS=IBFS_name, USAGE=A180, ACTUAL=A180, ACCESS_PROPERTY=(NEED_VALUE),
      XDEFAULT='IBFS:/SSYS/USERS/enduser3', $
    FIELDNAME=IBFS1_ACTION, ALIAS=IBFS1_action, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE),
      XDEFAULT='putUser', $
    FIELDNAME=IBIRS_SERVICE, ALIAS=IBIRS_service, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE),
      XDEFAULT='ibfs', $
    FIELDNAME=IBFS_DESCRIPTION, ALIAS=IBFS_description, USAGE=A80, ACTUAL=A80, ACCESS_PROPERTY=(NEED_VALUE),
      XDEFAULT='consultant', $
    FIELDNAME=IBFS_PASSWORD, ALIAS=IBFS_password, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
    FIELDNAME=IBFS_EMAIL, ALIAS=IBFS_email, USAGE=A80, ACTUAL=A80, ACCESS_PROPERTY=(NEED_VALUE),
      XDEFAULT='test@t.com', $
    FIELDNAME=IBFS_STATUS, ALIAS=IBFS_status, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE),
      XDEFAULT='ACTIVE', $
    FIELDNAME=CSRF_TOKEN, ALIAS=IBIWF_SES_AUTH_TOKEN, USAGE=A100, ACTUAL=A100, ACCESS_PROPERTY=(AUTHTOKEN), $
    FIELDNAME=__RESPONSE, USAGE=TX80L, ACTUAL=TX, ACCESS_PROPERTY=(INTERNAL), $
  SEGMENT=RESPONSE, SEGTYPE=S0, SEGSUF=XML     , PARENT=M6ILO, POSITION=__RESPONSE, $
    FIELDNAME=IBFSRPC, ALIAS=ibfsrpc, USAGE=A1, ACTUAL=A1, ACCESS_PROPERTY=(INTERNAL),
      PROPERTY=ELEMENT,  $
    FIELDNAME=IBFSPARAMS, ALIAS=ibfsparams, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSRPC, PROPERTY=ELEMENT,  $
    FIELDNAME=IBFS_NAME1, ALIAS=IBFS_name, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSPARAMS, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=IBFS_EMAIL1, ALIAS=IBFS_email, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSPARAMS, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=IBFS_DESCRIPTION1, ALIAS=IBFS_description, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSPARAMS, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=IBFS_PSETLIST, ALIAS=IBFS_pSetList, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSPARAMS, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=IBFS_STATUS1, ALIAS=IBFS_status, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSPARAMS, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=IBFSOBJECT, ALIAS=ibfsobject, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSRPC, PROPERTY=ELEMENT,  $
    FIELDNAME=TYPE, ALIAS=type, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=ISCONTAINER, ALIAS=isContainer, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=NAME, ALIAS=name, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=FULLPATH, ALIAS=fullPath, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=DESCRIPTION, ALIAS=description, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=EMAIL, ALIAS=email, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=STATUS, ALIAS=status, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=USERDEFAULTROLE, ALIAS=userDefaultRole, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=DISPLAYPATH, ALIAS=displayPath, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPVISDIS, ALIAS=opVisDis, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPVIEWRULESON, ALIAS=opViewRulesOn, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPSETOWNER, ALIAS=opSetOwner, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPSHAREWITH, ALIAS=opShareWith, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPMANAGEPRIVATERESOURCES, ALIAS=opManagePrivateResources, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPUSEINRULES, ALIAS=opUseInRules, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPMANAGERULESON, ALIAS=opManageRulesOn, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPMANAGESECURITY, ALIAS=opManageSecurity, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPASSIGN, ALIAS=opAssign, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPCREATEUSER, ALIAS=opCreateUser, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPDELETE, ALIAS=opDelete, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPSETPASSWORD, ALIAS=opSetPassword, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPVIEW, ALIAS=opView, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=OPUPDATE, ALIAS=opUpdate, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSOBJECT, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=NAME1, ALIAS=name, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=RETURNDESC, ALIAS=returndesc, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=RETURNCODE, ALIAS=returncode, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=SUBSYSTEM, ALIAS=subsystem, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE,  $
    FIELDNAME=SUBRETURNCODE, ALIAS=subreturncode, USAGE=A30, ACTUAL=A30,
      REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE,  $


Upate_User.fex
TABLE FILE LOGON
PRINT
ENTRY.VALUE
RETURNCODE NOPRINT
RETURNDESC NOPRINT
IF USERNAME EQ 'admin'
IF PASSWORD EQ 'admin'
IF ENTRY.KEY EQ 'IBI_CSRF_Token_Value'
ON TABLE HOLD AS CSRFTOKEN
END
-RUN

-READ CSRFTOKEN &&CSRFTOKEN.A100.
-TYPE &&CSRFTOKEN

TABLE FILE UPDATE_WFUSER
PRINT 
RETURNCODE 
RETURNDESC
IF CSRF_TOKEN EQ '&&CSRFTOKEN'
WHERE IBFS_NAME EQ 'test_login'
WHERE IBFS_EMAIL EQ 'Test_login@wls.com'
WHERE IBFS_DESCRIPTION EQ 'Test_login'
WHERE IBFS_STATUS EQ 'INACTIVE'
ON TABLE HOLD AS DELUSER FORMAT ALPHA
END
-RUN

This message has been edited. Last edited by: FP Mod Chuck,


WebFOCUS 8.2.01,windows 8,All Output Format
 
Posts: 11 | Registered: February 23, 2016Report This Post
Expert
posted Hide Post
Hi Sowthri,

Welcome to the forum.

According to the fex, you are reading &&CSRFTOKEN from a hold file, then using it in the next table.

What is the contents of &&CSRFTOKEN ?

My first thought about your error is that an   may be in the read variable.


Waz...

Prod:WebFOCUS 7.6.10/8.1.04Upgrade:WebFOCUS 8.2.07OS:LinuxOutputs:HTML, PDF, Excel, PPT
In Focus since 1984
Pity the lost knowledge of an old programmer!

 
Posts: 6347 | Location: 33°49'23.0"S, 151°11'41.0"E | Registered: October 31, 2006Report This Post
Member
posted Hide Post
Thanks WAZ,
We are geting value for &&CSRFTOKEN from hold file and it's an alphanumeric value.After using in UPDATE_WFUSER table flowing Error occurs.

TABLE FILE LOGON
 PRINT
 ENTRY.VALUE
 RETURNCODE NOPRINT
 RETURNDESC NOPRINT
 IF USERNAME EQ 'admin'
 IF PASSWORD EQ 'admin'
 IF ENTRY.KEY EQ 'IBI_CSRF_Token_Value'
 ON TABLE HOLD AS CSRFTOKEN
 END
 -RUN
 0 NUMBER OF RECORDS IN TABLE=        1  LINES=      1
 -READ CSRFTOKEN &&CSRFTOKEN.A100.
 -SET &&CSRFTOKEN  = TRUNCATE(d6e4c76ea3ca48b622a52aa0bb399dbd                                                                    );
 -TYPE d6e4c76ea3ca48b622a52aa0bb399dbd
 d6e4c76ea3ca48b622a52aa0bb399dbd
 TABLE FILE UPDATE_WFUSER
 PRINT RETURNCODE RETURNDESC
 IF CSRF_TOKEN EQ 'd6e4c76ea3ca48b622a52aa0bb399dbd'
 WHERE DESCRIPTION EQ 'test_login'
 WHERE EMAIL EQ 'Test_login@test.com'
 WHERE NAME EQ 'INACTIVE'
 ON TABLE HOLD AS DELUSER FORMAT ALPHA
 END
 -RUN
 (FOC42229) ENTITY 'nbsp' IS UNDEFINED
 0 NUMBER OF RECORDS IN TABLE=        0  LINES=      0


WebFOCUS 8.2.01,windows 8,All Output Format
 
Posts: 11 | Registered: February 23, 2016Report This Post
Virtuoso
posted Hide Post
Hi Sowthri

First of all welcome to Focal Point! I reached out to the product manager about this post and he recommended you open a case with techsupport. He suspects this is a bug.

Thanks


Thank you for using Focal Point!

Chuck Wolff - Focal Point Moderator
WebFOCUS 7x and 8x, Windows, Linux All output Formats
 
Posts: 2127 | Location: Customer Support | Registered: April 12, 2005Report This Post
Platinum Member
posted Hide Post
Not a bug in the software.
At first glance, looks like you're missing some stuff in the Master.

I'll try and look at this tomorrow.
 
Posts: 229 | Location: New York | Registered: July 27, 2004Report This Post
Platinum Member
posted Hide Post
I looked at your Master.
Doesn't look like the ALIASes for WebFOCUS RESTful Web Services.

It looks like your trying to integrate with some other WebFOCUS integration.

I'll prepare an example calling WebFOCUS RESTful Web Services and Post it when complete.
 
Posts: 229 | Location: New York | Registered: July 27, 2004Report This Post
Platinum Member
posted Hide Post
Here you go:

adduser.mas:
FILENAME=ADDUSER, SUFFIX=REST , $
SEGMENT=M6ILO, SEGTYPE=S0, $
FIELDNAME=IBIRS_PATH, ALIAS=IBIRS_path, USAGE=A50, ACTUAL=A50, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=IBIRS_ACTION, ALIAS=IBIRS_action, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE),
XDEFAULT='put', $
FIELDNAME=IBIRS_SERVICE, ALIAS=IBIRS_service, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE),
XDEFAULT='ibfs', $
GROUP=OBJECT, ALIAS=IBIRS_object, ELEMENTS=8, $
FIELDNAME=TYPE, ALIAS=type, USAGE=A30, ACTUAL=A30,
MISSING=ON, ACCESS_PROPERTY=(NEED_VALUE),
XDEFAULT='User',
PROPERTY=ATTRIBUTE, $
FIELDNAME=PASSWORD, ALIAS=password, USAGE=A30, ACTUAL=A30,
MISSING=ON, ACCESS_PROPERTY=(NEED_VALUE),
PROPERTY=ATTRIBUTE, $
FIELDNAME=EMAIL, ALIAS=email, USAGE=A200, ACTUAL=A200,
MISSING=ON, ACCESS_PROPERTY=(NEED_VALUE),
PROPERTY=ATTRIBUTE, $
FIELDNAME=DESCRIPTION, ALIAS=description, USAGE=A200, ACTUAL=A200,
MISSING=ON, ACCESS_PROPERTY=(NEED_VALUE),
PROPERTY=ATTRIBUTE, $
FIELDNAME=_JT, ALIAS=_jt, USAGE=A30, ACTUAL=A30,
MISSING=ON, ACCESS_PROPERTY=(NEED_VALUE),
XDEFAULT='IBFSUserObject',
PROPERTY=ATTRIBUTE, $
FIELDNAME=STATUS, ALIAS=status, USAGE=A30, ACTUAL=A30,
MISSING=ON, $
FIELDNAME=NAME, ALIAS=name, USAGE=A30, ACTUAL=A30,
MISSING=ON, ACCESS_PROPERTY=(NEED_VALUE),
REFERENCE=STATUS, PROPERTY=ATTRIBUTE, $
FIELDNAME=_JT1, ALIAS=_jt, USAGE=A30, ACTUAL=A30,
MISSING=ON, ACCESS_PROPERTY=(NEED_VALUE),
XDEFAULT='IBSSUserStatus',
REFERENCE=STATUS, PROPERTY=ATTRIBUTE, $
FIELDNAME=IBIRS_REPLACE, ALIAS=IBIRS_replace, USAGE=A30, ACTUAL=A30, ACCESS_PROPERTY=(NEED_VALUE), $
FIELDNAME=CSRF_TOKEN, ALIAS=IBIWF_SES_AUTH_TOKEN, USAGE=A100, ACTUAL=A100, ACCESS_PROPERTY=(AUTHTOKEN), $
FIELDNAME=__RESPONSE, USAGE=TX80L, ACTUAL=TX, ACCESS_PROPERTY=(INTERNAL), $
SEGMENT=RESPONSE, SEGTYPE=S0, SEGSUF=XML , PARENT=M6ILO, POSITION=__RESPONSE, $
FIELDNAME=IBFSRPC, ALIAS=ibfsrpc, USAGE=A1, ACTUAL=A1, ACCESS_PROPERTY=(INTERNAL),
PROPERTY=ELEMENT, $
FIELDNAME=IBFSPARAMS, ALIAS=ibfsparams, USAGE=A1, ACTUAL=A1, ACCESS_PROPERTY=(INTERNAL),
REFERENCE=IBFSRPC, PROPERTY=ELEMENT, $
FIELDNAME=SIZE, ALIAS=size, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSPARAMS, PROPERTY=ATTRIBUTE, $
FIELDNAME=ROOTOBJECT, ALIAS=rootObject, USAGE=A1, ACTUAL=A1, ACCESS_PROPERTY=(INTERNAL),
REFERENCE=IBFSRPC, PROPERTY=ELEMENT, $
FIELDNAME=STATUS1, ALIAS=status, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ELEMENT, $
FIELDNAME=_JT2, ALIAS=_jt, USAGE=A30, ACTUAL=A30,
REFERENCE=STATUS1, PROPERTY=ATTRIBUTE, $
FIELDNAME=NAME1, ALIAS=name, USAGE=A30, ACTUAL=A30,
REFERENCE=STATUS1, PROPERTY=ATTRIBUTE, $
FIELDNAME=GROUPS, ALIAS=groups, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ELEMENT, $
FIELDNAME=_JT3, ALIAS=_jt, USAGE=A30, ACTUAL=A30,
REFERENCE=GROUPS, PROPERTY=ATTRIBUTE, $
FIELDNAME=SIZE1, ALIAS=size, USAGE=A30, ACTUAL=A30,
REFERENCE=GROUPS, PROPERTY=ATTRIBUTE, $
FIELDNAME=_JT4, ALIAS=_jt, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=DESCRIPTION1, ALIAS=description, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=DUMMY, ALIAS=dummy, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=EMAIL1, ALIAS=email, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=FULLPATH, ALIAS=fullPath, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=NAME2, ALIAS=name, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=PASSWORD1, ALIAS=password, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=POLICY, ALIAS=policy, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=RSPATH, ALIAS=rsPath, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=TYPE1, ALIAS=type, USAGE=A30, ACTUAL=A30,
REFERENCE=ROOTOBJECT, PROPERTY=ATTRIBUTE, $
FIELDNAME=_JT5, ALIAS=_jt, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
FIELDNAME=LANGUAGE, ALIAS=language, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
FIELDNAME=NAME3, ALIAS=name, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
FIELDNAME=RETURNCODE, ALIAS=returncode, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
FIELDNAME=RETURNDESC, ALIAS=returndesc, USAGE=A300, ACTUAL=A300,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
FIELDNAME=SUBRETURNCODE, ALIAS=subreturncode, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
FIELDNAME=SUBSYSTEM, ALIAS=subsystem, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
FIELDNAME=TYPE2, ALIAS=type, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSRPC, PROPERTY=ATTRIBUTE, $
SEGMENT=ENTRY, SEGTYPE=S0, PARENT=RESPONSE, $
FIELDNAME=ENTRY, ALIAS=entry, USAGE=A30, ACTUAL=A30,
REFERENCE=IBFSPARAMS, PROPERTY=ELEMENT, $
FIELDNAME=KEY1, ALIAS=key, USAGE=A30, ACTUAL=A30,
REFERENCE=ENTRY, PROPERTY=ATTRIBUTE, $
FIELDNAME=VALUE, ALIAS=value, USAGE=A30, ACTUAL=A30,
REFERENCE=ENTRY, PROPERTY=ATTRIBUTE, $


adduser.acx:
SEGNAME=M6ILO,
CONNECTION=ibfs,
OBJECT=rs,
SERVICETYPE=REST,
HTTPMETHOD=POST,
RESTRESPONSE=XML,
HTTPBODY=ENCODE, $
FIELD=STATUS,
FORM=qualified, $
FIELD=OBJECT,
FORMAT=XML, $

updateuser.fex:
TABLE FILE LOGON
PRINT
ENTRY.VALUE
RETURNCODE NOPRINT
RETURNDESC NOPRINT
IF USERNAME EQ 'admin'
IF PASSWORD EQ 'admin'
IF ENTRY.KEY EQ 'IBI_CSRF_Token_Value'
ON TABLE HOLD AS CSRFTOKEN
END
-RUN

-READ CSRFTOKEN &&CSRFTOKEN.A100.
-TYPE &&CSRFTOKEN

TABLE FILE ADDUSER
PRINT
ADDUSER.RESPONSE.RETURNCODE AS 'Return Code'
ADDUSER.RESPONSE.RETURNDESC AS 'Return Description'
HEADING
"Update a User"
WHERE IBIRS_PATH EQ '/SSYS/USERS/test_login'
WHERE DESCRIPTION EQ 'test_login'
WHERE EMAIL EQ 'Test_login@wls.com'
WHERE NAME EQ 'INACTIVE'
WHERE IBIRS_REPLACE EQ 'true'
WHERE CSRF_TOKEN EQ '&&CSRFTOKEN'
ON TABLE SET PAGE-NUM NOLEAD
ON TABLE NOTOTAL
ON TABLE PCHOLD FORMAT HTML
ON TABLE SET HTMLCSS ON
ON TABLE SET STYLE *
INCLUDE = endeflt,
$
ENDSTYLE
 
Posts: 229 | Location: New York | Registered: July 27, 2004Report This Post
Member
posted Hide Post
Thanks Efrem,
It's working good. Thanks for your help. Cloud you please share Master file for change password and guide us how to update the password for a wf user.


WebFOCUS 8.2.01,windows 8,All Output Format
 
Posts: 11 | Registered: February 23, 2016Report This Post
Platinum Member
posted Hide Post
I think you should mark this as solved and open a new topic for Changing a Password.
 
Posts: 229 | Location: New York | Registered: July 27, 2004Report This Post
Member
posted Hide Post
Thanks Efrem!!!


WebFOCUS 8.2.01,windows 8,All Output Format
 
Posts: 11 | Registered: February 23, 2016Report This Post
  Powered by Social Strata  

Read-Only Read-Only Topic

Focal Point    Focal Point Forums  Hop To Forum Categories  WebFOCUS/FOCUS Forum on Focal Point     [SOLVED] How to update WF User status using REST WebServices from webfocus

Copyright © 1996-2020 Information Builders