From b527cfaac21622ea649ad935682d638a509d5a80 Mon Sep 17 00:00:00 2001 From: Alex Zaw Date: Wed, 25 Feb 2026 23:07:09 +0000 Subject: [PATCH] Update Function ES_V2_GET_ALL_MAPICS_USERS --- .../Functions/ES_V2_GET_ALL_MAPICS_USERS.sql | 76 ++++++++++++++++++- 1 file changed, 75 insertions(+), 1 deletion(-) diff --git a/SAILPOINT/Functions/ES_V2_GET_ALL_MAPICS_USERS.sql b/SAILPOINT/Functions/ES_V2_GET_ALL_MAPICS_USERS.sql index 3a45c19..547fc71 100644 --- a/SAILPOINT/Functions/ES_V2_GET_ALL_MAPICS_USERS.sql +++ b/SAILPOINT/Functions/ES_V2_GET_ALL_MAPICS_USERS.sql @@ -1 +1,75 @@ -@@\@^@ % %@@@@Kmmmmm@M@ %@M]@]@ %@M]@@@ %@@ %@Km@ %@@ %@@@ %@@@@ %@@ %@@@@~@\@k@ %@~@\@k@ %@~@\@k@ %@~@\@k@ %@~@Mk@k@]@k@ %@~@\@k@ %@~@\@k@ %@~@\@k@ %@~@\@@@ %@ %@@K@@~@@K@mm@M@@]@^@ %@ %M@ %@m@M@ %}}@z@ %m@M@ %m@M@ %}Ʉ}@@@M@ %@M@@@@M@@]@@@]@]@k@ %}Ձ}@@@M@ %@M@@@@M@@]@@@]@]@k@ %}㨗}@@@M@@M@ %@@ %@}@}@@}Dž@䢅}@ %@}}@@}}@ %@}}@@}⨢a@䢅}@ %@}}@@}Dž@䢅}@ %@}M䕒]}@ %@@@M@@]@@@]@]@k@ %}ą}@@m@M@ %@M@@M@@@@M@@]@@@]@]@@ %@M@@M@@@@M@@]@@@]@]@ %@@@ %]@k@}ŔՖ}@@@M@ %@M@@@@M@@]@@@]@]@k@ %}}@@@M@@M@ %@@ %@}}@@}}@ %@}@}@@}䕒}@ %@}}@@}ĉ}@ %@@@M@@]@@@]@]@ %]@ %]@k@ %}}@z@m@M@]@ %]@ %@@ %@@ %@@@ %@@~@@ %@@~@@ %@@ %@@~@@ %@@Ln@}}@ %@@~@@]@^@ %@@^@ % %@@k@@@@ %@@@Km@ %@@@@@^@ % %@@@@ %@@@Km@ %@@^@ % % \ No newline at end of file +SET PATH *LIBL ; + +CREATE OR REPLACE FUNCTION SAILPOINT.ES_V2_GET_ALL_MAPICS_USERS ( + ENVIRONMENT VARCHAR(2) ) + RETURNS CLOB(2147483647) + LANGUAGE SQL + SPECIFIC SAILPOINT.V2_ESRTVMUSRS + NOT DETERMINISTIC + MODIFIES SQL DATA + CALLED ON NULL INPUT + NOT FENCED + SET OPTION ALWBLK = *ALLREAD , + ALWCPYDTA = *OPTIMIZE , + COMMIT = *NONE , + DBGVIEW = *SOURCE , + DECRESULT = (31, 31, 00) , + DLYPRP = *NO , + DYNDFTCOL = *NO , + DYNUSRPRF = *OWNER , + SRTSEQ = *HEX + BEGIN +SET CISTOOLS . LIBL = CISTOOLS . SET_LIBRARY_LIST ( ENVIRONMENT ) ; +RETURN +( +SELECT JSON_OBJECT ( +'data' : +JSON_ARRAYAGG ( +JSON_OBJECT ( +'userId' VALUE TRIM ( +CAST ( F0BUCD AS VARCHAR ( 10 ) CCSID 37 ) ) , +'userName' VALUE TRIM ( +CAST ( F0H1TX AS VARCHAR ( 60 ) CCSID 37 ) ) , +'userType' VALUE TRIM ( CAST ( +CASE EXTYPE +WHEN ' ' THEN 'General User' +WHEN 'A' THEN 'Administrator' +WHEN 'S' THEN 'System/Application User' +WHEN 'G' THEN 'Generic User' +ELSE '(Unknown)' +END AS VARCHAR ( 50 ) CCSID 37 ) ) , +'userDept' VALUE JSON_OBJECT ( +TRIM ( CAST ( EXDEPT AS VARCHAR ( 10 ) CCSID 37 ) ) VALUE +TRIM ( CAST ( EUDESC AS VARCHAR ( 60 ) CCSID 37 ) ) +ABSENT ON NULL +) , 'userEmpNo' VALUE TRIM ( +CAST ( EXT08A AS VARCHAR ( 10 ) CCSID 37 ) ) , +'status' VALUE TRIM ( CAST ( +CASE EXSTAT +WHEN 'A' THEN 'Active' +WHEN ' ' THEN 'Unknown' +WHEN 'D' THEN 'Disabled' +END AS VARCHAR ( 15 ) CCSID 37 ) ) +) +) , +'errors' : JSON_ARRAY ( ) +) +FROM MZF0REP +JOIN ESUEXP +LEFT JOIN ESDPTP +ON EXDEPT = EUDEPT +ON F0BUCD = EXUSER +JOIN MZGUCPS0 +ON GUBUCD = F0BUCD +WHERE EXTYPE <> 'R' +AND F0UGRP = 0 ) ; +END ; + +GRANT ALTER , EXECUTE +ON SPECIFIC FUNCTION SAILPOINT.V2_ESRTVMUSRS +TO AMAPICS WITH GRANT OPTION ; + +GRANT EXECUTE +ON SPECIFIC FUNCTION SAILPOINT.V2_ESRTVMUSRS +TO PUBLIC ; +