From e37075e2098f829b284b994fa256ee37802eec78 Mon Sep 17 00:00:00 2001 From: Alex Zaw Date: Wed, 25 Feb 2026 23:01:11 +0000 Subject: [PATCH] Update Function GET_UNIQUE_TOKEN --- CISTOOLS/Functions/GET_UNIQUE_TOKEN.sql | 33 ++++++++++++++++++++++++- 1 file changed, 32 insertions(+), 1 deletion(-) diff --git a/CISTOOLS/Functions/GET_UNIQUE_TOKEN.sql b/CISTOOLS/Functions/GET_UNIQUE_TOKEN.sql index 2b84651..19b7f46 100644 --- a/CISTOOLS/Functions/GET_UNIQUE_TOKEN.sql +++ b/CISTOOLS/Functions/GET_UNIQUE_TOKEN.sql @@ -1 +1,32 @@ -âÅã@×ÁãÈ@\ÓÉÂÓ@^@ % %ÃÙÅÁãÅ@ÖÙ@ÙÅ×ÓÁÃÅ@ÆäÕÃãÉÖÕ@ÃÉâãÖÖÓâKÇÅãmäÕÉØäÅmãÖÒÅÕ@M@]@ %ÙÅãäÙÕâ@åÁÙÃÈÁÙMòö]@@@ %ÓÁÕÇäÁÇÅ@âØÓ@ %â×ÅÃÉÆÉÃ@ÃÉâãÖÖÓâKÇÅãmäÕÉØäÅmãÖÒÅÕ@ %ÕÖã@ÄÅãÅÙÔÉÕÉâãÉÃ@ %ÙÅÁÄâ@âØÓ@ÄÁãÁ@ %ÃÁÓÓÅÄ@ÖÕ@ÕäÓÓ@ÉÕ×äã@ %âÅã@Ö×ãÉÖÕ@@ÁÓæÂÓÒ@~@\ÁÓÓÙÅÁÄ@k@ %ÁÓæÃ×èÄãÁ@~@\Ö×ãÉÔÉéÅ@k@ %ÃÖÔÔÉã@~@\ÕÖÕÅ@k@ %ÄÂÇåÉÅæ@~@\âÖäÙÃÅ@k@ %ÄÅÃÙÅâäÓã@~@Móñk@óñk@ðð]@k@ %ÄèÕÄÆãÃÖÓ@~@\ÕÖ@k@ %ÄèÕäâÙ×ÙÆ@~@\äâÅÙ@k@ %âÙãâÅØ@~@\ÈÅç@@@ %ÂÅÇÉÕ@ %ÙÅãäÙÕ@ÈÅç@M@ÇÅÕÅÙÁãÅmäÕÉØäÅ@M@]@]@^@ %ÅÕÄ@@^@ % %ÓÁÂÅÓ@ÖÕ@â×ÅÃÉÆÉÃ@ÆäÕÃãÉÖÕ@ÃÉâãÖÖÓâKÇÅãmäÕÉØäÅmãÖÒÅÕ@ %Éâ@}Ç…£@䕉˜¤…@ã–’…•}@^@ % %ÇÙÁÕã@ÁÓãÅÙ@k@ÅçÅÃäãÅ@@@ %ÖÕ@â×ÅÃÉÆÉÃ@ÆäÕÃãÉÖÕ@ÃÉâãÖÖÓâKÇÅãmäÕÉØäÅmãÖÒÅÕ@ %ãÖ@ÁÔÁ×ÉÃâ@æÉãÈ@ÇÙÁÕã@Ö×ãÉÖÕ@^@ % %ÇÙÁÕã@ÅçÅÃäãÅ@@@ %ÖÕ@â×ÅÃÉÆÉÃ@ÆäÕÃãÉÖÕ@ÃÉâãÖÖÓâKÇÅãmäÕÉØäÅmãÖÒÅÕ@ %ãÖ@×äÂÓÉÃ@^@ % % \ No newline at end of file +SET PATH *LIBL ; + +CREATE OR REPLACE FUNCTION CISTOOLS.GET_UNIQUE_TOKEN ( ) + RETURNS VARCHAR(26) + LANGUAGE SQL + SPECIFIC CISTOOLS.GET_UNIQUE_TOKEN + NOT DETERMINISTIC + READS SQL DATA + CALLED ON NULL INPUT + SET OPTION ALWBLK = *ALLREAD , + ALWCPYDTA = *OPTIMIZE , + COMMIT = *NONE , + DBGVIEW = *SOURCE , + DECRESULT = (31, 31, 00) , + DYNDFTCOL = *NO , + DYNUSRPRF = *USER , + SRTSEQ = *HEX + BEGIN +RETURN HEX ( GENERATE_UNIQUE ( ) ) ; +END ; + +LABEL ON SPECIFIC FUNCTION CISTOOLS.GET_UNIQUE_TOKEN + IS 'Get Unique Token' ; + +GRANT ALTER , EXECUTE +ON SPECIFIC FUNCTION CISTOOLS.GET_UNIQUE_TOKEN +TO AMAPICS WITH GRANT OPTION ; + +GRANT EXECUTE +ON SPECIFIC FUNCTION CISTOOLS.GET_UNIQUE_TOKEN +TO PUBLIC ; +