Notepad++ PLSQL language File

Notepad++ için PLSQL dil dosyası xml olarak aşağıdaki dosyayı kaydedip, Notepad++ kullanıcı tanımlı dil olarak oluşturduktan sonra, uygulamayı yeniden başlatmanız yeterlidir.

<NotepadPlus>

<UserLang name="PL-SQL" ext="pkb pks">

<Settings>

<Global caseIgnored="yes"/>

<TreatAsSymbol comment="yes" commentLine="yes"/>

<Prefix words1="no" words2="no" words3="no" words4="no"/>

</Settings>

<KeywordLists>

<Keywords name="Delimiters">'00'00</Keywords>

<Keywords name="Folder+">BEGIN IF</Keywords>

<Keywords name="Folder-">END</Keywords>

<Keywords name="Operators">( ) . ; | + < = > :</Keywords>

<Keywords name="Comment">1/* 2*/ 0--</Keywords>

<Keywords name="Words1">ABORT ACCEPT ACCESS ADD ALL ALTER AND ANY ARRAY ARRAYLEN AS ASC ASSERT ASSIGN AT ATTRIBUTES AUDIT AUTHORIZATION AVG BASE_TABLE BEGIN BETWEEN BINARY_INTEGER BODY BOOLEAN BY CASE CAST CHAR CHAR_BASE CHECK CLOSE CLUSTER CLUSTERS COLAUTH COLUMN COMMENT COMMIT COMPRESS CONNECT CONNECTED CONSTANT CONSTRAINT CRASH CREATE CURRENT CURRVAL CURSOR DATABASE DATA_BASE DATE DBA DEALLOCATE DEBUGOFF DEBUGON DECLARE DECIMAL DEFAULT DEFINITION DELAY DELETE DESC DIGITS DISPOSE DISTINCT DO DROP ELSE ELSIF ENABLE END ENTRY ESCAPE EXCEPTION EXCEPTION_INIT EXCHANGE EXCLUSIVE EXISTS EXIT EXTERNAL FAST FETCH FILE FOR FORCE FORM FROM FUNCTION GENERIC GOTO GRANT GROUP HAVING IDENTIFIED IF IN INCREMENT INDEX INDEXES INDICATOR INITIAL INITRANS INSERT INTERFACE INTERSECT INTO IMMEDIATE IS KEY LEVEL LIBRARY LIKE LIMITED LOCAL LOCK LOG LOGGING LONG LOOP MASTER MAXEXTENTS MAXTRANS MEMBER MINEXTENTS MINUS MISLABEL MODE MODIFY MULTISET NEW NEXT NO NOAUDIT NOCOMPRESS NOLOGGING NOPARALLEL NOT NOWAIT NUMBER_BASE OBJECT OF OFF OFFLINE ON ONLINE ONLY OPEN OPTION OR ORDER OUT PACKAGE PARALLEL PARTITION PCTFREE PCTINCREASE PCTUSED PLS_INTEGER POSITIVE POSITIVEN PRAGMA PRIMARY PRIOR PRIVATE PRIVILEGES PROCEDURE PUBLIC RAISE RANGE RAW READ REBUILD RECORD REF REFERENCES REFRESH RELEASE REMR RENAME REPLACE RESOURCE RESTRICT RETURN RETURNING REVERSE REVOKE ROLLBACK ROW ROWID ROWLABEL ROWNUM ROWS RUN SAVEPOINT SCHEMA SEGMENT SELECT SEPARATE SESSION SET SHARE SNAPSHOT SPACE SQL SOME SPLIT START STATEMENT STORAGE SUBTYPE SUCCESSFUL SYNONYM TABAUTH TABLE TABLES TABLESPACE TASK TERMINATE THEN TO TRIGGER TRUNCATE TYPE UNION UNIQUE UNLIMITED UNRECOVERABLE UNUSABLE UPDATE USE USING VALIDATE VALUE VALUES VARIABLE VIEW VIEWS WHEN WHENEVER WHERE WHILE WITH WORK</Keywords>

<Keywords name="Words2">ACOS ABS ADD_MONTHS ASCII ASIN ATAN ATAN2 AVERAGE BFILENAME CEIL CHR CHARTOROWID CONCAT CONVERT COS COSH COUNT DECODE DEREF DUAL DUMP DUP_VAL_ON_INDEX EMPTY ERROR EXP FALSE FLOOR FOUND GLB GREATEST HEXTORAW INITCAP INSTR INSTRB ISOPEN LAST_DAY LEAST LENGTH LENGHTB LN LOWER LPAD LTRIM LUB MAKE_REF MAX MIN MOD MONTHS_BETWEEN NEW_TIME NEXT_DAY NEXTVAL NLS_CHARSET_DECL_LEN NLS_CHARSET_ID NLS_CHARSET_NAME NLS_INITCAP NLS_LOWER NLS_SORT NLS_UPPER NLSSORT NO_DATA_FOUND NOTFOUND NULL NVL OTHERS POWER RAWTOHEX REFTOHEX ROUND ROWCOUNT ROWIDTOCHAR RPAD RTRIM SIGN SIN SINH SQLCODE SQLERRM SQRT SOUNDEX STDDEV SUBSTR SUBSTRB SUM SYSDATE TAN TANH TO_CHAR TO_DATE TO_LABEL TO_MULTI_BYTE TO_NUMBER TO_SINGLE_BYTE TRANSLATE TRUE TRUNC UID UPPER USER USERENV VARIANCE VSIZE</Keywords>

<Keywords name="Words3">BFILE BLOB CHARACTER CLOB DEC FLOAT INT INTEGER MLSLABEL NATURAL NATURALN NCHAR NCLOB NUMBER NUMERIC NVARCHAR2 REAL ROWTYPE SIGNTYPE SMALLINT STRING VARCHAR VARCHAR2</Keywords>

<Keywords name="Words4"/>

</KeywordLists>

<Styles>

<WordsStyle name="DEFAULT" styleID="11" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="FOLDEROPEN" styleID="12" fgColor="0000FF" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="FOLDERCLOSE" styleID="13" fgColor="0000FF" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="KEYWORD1" styleID="5" fgColor="0000FF" bgColor="FFFFFF" fontName="" fontStyle="1"/>

<WordsStyle name="KEYWORD2" styleID="6" fgColor="FF8000" bgColor="FFFFFF" fontName="" fontStyle="1"/>

<WordsStyle name="KEYWORD3" styleID="7" fgColor="FF8080" bgColor="FFFFFF" fontName="" fontStyle="1"/>

<WordsStyle name="KEYWORD4" styleID="8" fgColor="800040" bgColor="FFFFFF" fontName="" fontStyle="1"/>

<WordsStyle name="COMMENT" styleID="1" fgColor="008000" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="COMMENT LINE" styleID="2" fgColor="008000" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="NUMBER" styleID="4" fgColor="FF8000" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="OPERATOR" styleID="10" fgColor="FF0000" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="DELIMINER1" styleID="14" fgColor="0000A0" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="DELIMINER2" styleID="15" fgColor="008000" bgColor="FFFFFF" fontName="" fontStyle="0"/>

<WordsStyle name="DELIMINER3" styleID="16" fgColor="000000" bgColor="FFFFFF" fontName="" fontStyle="0"/>

</Styles>

</UserLang>

</NotepadPlus>

Detaylar

IFS - Oracle Character Problem Solved

 Oracle database ve IFS üzerinde kendi geliştirdiğiniz uygulamalarda dil problemi yaşıyorsanız, kendi oluşturduğum aşağıdaki prosedürü programınızın başlangıcında kullanmanız yeterli olacaktır.

If you are experiencing language problems in the applications you have developed on Oracle database and IFS, it will be sufficient to use the procedure below that I have created at the beginning of your program.

CREATE OR REPLACE PROCEDURE H_Lang_Character_Solve AS

BEGIN

    EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_LANGUAGE = ''TURKISH''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_TERRITORY = ''TURKEY''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_CURRENCY = ''?''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_ISO_CURRENCY = ''TURKEY''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_NUMERIC_CHARACTERS = '',.''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_CALENDAR = ''GREGORIAN''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_DATE_FORMAT = ''DD/MM/RRRR''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_DATE_LANGUAGE = ''TURKISH''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_SORT = ''TURKISH''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_TIME_FORMAT = ''HH24:MI:SSXFF''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_TIMESTAMP_FORMAT = ''DD/MM/RRRR HH24:MI:SSXFF''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_TIME_TZ_FORMAT = ''HH24:MI:SSXFF TZR''';;

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_TIMESTAMP_TZ_FORMAT = ''DD/MM/RRRR HH24:MI:SSXFF TZR''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_DUAL_CURRENCY = ''TL''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_COMP = ''BINARY''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_LENGTH_SEMANTICS = ''CHAR''';

EXECUTE IMMEDIATE 'ALTER SESSION SET NLS_NCHAR_CONV_EXCP = ''FALSE''';

END;

--- Alternatif; 

BEGIN 

  IFSAPP.FND_SESSION_UTIL_API.Set_Fnd_User_('IFSAPP');  

  EXECUTE IMMEDIATE 'alter session set nls_language=turkish';

 END;

Detaylar

PLSQL Birden Fazla Satiri Birlestir Tek Satir Olarak Geriye Donduren Fonksiyon

 CREATE OR REPLACE FUNCTION GET_SAS_MLZ_SUPPLIER(Contract_ IN VARCHAR2, Part_No_ IN VARCHAR2)

RETURN VARCHAR2

AS

  TYPE name_table IS TABLE OF VARCHAR2(1000);

  names name_table := name_table();

  result VARCHAR2(4000);

BEGIN

  -- Firma adlarını doldur

  FOR rec IN (select m.vendor_no,supplier_api.Get_Vendor_Name(m.vendor_no)VendorName

           from PURCHASE_PART_SUPPLIER m

                where m.contract=Contract_ and m.part_no=Part_No_) LOOP

    names.extend;

    names(names.count) := rec.vendor_no || ' ' || rec.vendorname;

  END LOOP;

  -- Adları birleştir

  FOR i IN 1..names.count LOOP

    result := result || names(i) || ', ';

  END LOOP;

  -- Son virgülü kaldır

  result := RTRIM(result, ', ');

  RETURN result;

END;

Detaylar

GPO ile Windows AD Konfigrasyonu - Configure Windows AD GPO

 

a) Enable audit logon events on AD computer

1. Log on to Windows AD DC as a member of the Administrators group.
2. Open Administrative Tools, and then click Group Policy Management.
3. In the console tree, open Forest: YOUR_FOREST > Domains > YOUR_DOMAIN_NAME, right-click on Default Domain Policy, and then click Edit.
   [ Note: You can also edit other group policy as needed. ]
4. In Group Policy Management Editor, open Computer Configuration > Policies > Windows Settings > Security Settings > Local Policies > Audit Policies.
5. Double-click on Audit account logon events, and enable "Define these policy settings: Success and Failure"

6. Open Computer Configuration > Policies > Windows Settings > Security Settings > Advanced audit policy configuration > Audit Policies > Account Logon

 7. Double-click on Audit Kerberos Authentication Service, and enable "Configure the following audit events: Success and Failure"

8. open Computer Configuration > Policies > Windows Settings > Security Settings > Advanced audit policy configuration > Audit Policies > Logon/Logof

9. Double-click on Audit Logon, and enable "Configure the following audit events: Success and Failure."

Source : Sophos Firewall: Best practice for STAS - Recommended Reads - Sophos Firewall - Sophos Community

 

Detaylar

IFS Döviz Değerleme Bakiye İçin Çalışsın

 --Döviz değerleme yalnızca bakiye için çalışsın isteniyorsa 

--Onaylı fiş satırları tablosunda aşağıdaki sorgudan dönen voucher_no lar için 

-- voucher_row_tab tablosundaki party_type='CUSTOMER' alanı customer olarak güncellenecek

SELECT * FROM IFSAPP.Trype_All_Voucher_Qry a

where a.party_type IS NULL

 and a.accounting_year='2023' 

 and a.account='121.03'

 

 select r.company,r.voucher_no from voucher_row_tab r

 where r.party_type!='CUSTOMER'

 

 update voucher_row_tab 

 set party_type='CUSTOMER'

 where r.voucher_no IN ( SELECT a.voucher_no FROM IFSAPP.Trype_All_Voucher_Qry a

where a.party_type IS NULL

and a.accounting_year='2023' 

and a.account='121.03' )

 

Detaylar

Delphi Button Onclik Event

  Action := TBasicAction.Create(Self);

  { Set the OnExecute event handler. }

  Action.OnExecute := BtnRafSorgula.OnClick;

Detaylar

IFS ERP Uninstall

 Two ways for uninstall IFS ERP

This will clear the .NET DLL cache on the offending computer. 

In order to do that
1. Log in to the offending machine.
2. Close all the opened click once applications (IFS) on that machine.
3. Open a command prompt
4. Run the command: rundll32 dfshim CleanOnlineAppCache
5. Wait few minutes. (Even though the command returns within a second, it is running in the background)

Or the way I normally do it 

1.  Log out of IFS

2. Delete the 2.0 folder in the following location on the offending PC C:\Users\USERNAME\AppData\Local\Apps

 

Detaylar