Sunday, June 4, 2017

Sunday, July 24, 2016

Notepad++ PLSQL Language Syntax Highlight

Ref: http://dwh-consult.de/wp-content/uploads/2016/02/userDefineLang_xml.txt

<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">( ) . ; | + &lt; = &gt; :</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>

Sunday, July 17, 2016

Oracle PLSQL Array - Build Column Names For Query

CREATE OR REPLACE PROCEDURE DOARRAY AS
    PREFIX VARCHAR2(1) := 'a';
    q_str varchar2(2000) := '';
    total_cols integer ;
    /************  only change this : define a new array *******************/
    type col_array IS VARRAY(5) OF VARCHAR2(100);
    col_nms col_array := col_array('name', 'resrce_id', 'addr', 'home_phn', 'mobile_phn');
 
BEGIN
    total_cols := col_nms.count;
    FOR i in 1 .. total_cols LOOP
      case
        when (i=1) then
          q_str := PREFIX || '.' || col_nms(i) || ',';
        when (i=total_cols) then
           q_str := q_str || PREFIX || '.' || col_nms(i);
        else
           q_str := q_str || PREFIX || '.' || col_nms(i) || ',';
      end case;
   END LOOP;
   dbms_output.put_line('Query String: ' || q_str);
END DOARRAY;

Monday, July 4, 2016

Tennis

网球拍拉线(专业电子网球拉线机)

本人是个网球发烧友,打网球十几年了,自己有一台专业电子网球穿线机,6向支撑,10点拍面固定,电子拉线器,提供网球拍拉线服务,方便广大球友。可根据要求横弦竖弦不同拉力分穿,或穿子母组合弦。

穿线费:$10
电  话:647-308-8855(Mark Liang)
地  址:近 Sheppard/kennedy

吸汗带(OverGrip): Dry Feeling(蓝色, 纳米材料干爽舒适) $1

网球弦(含穿线费):

Eagnas Felling 17G(1.25mm 无芯多股高韧纤维缠绕防肠弦,提供近似天然肠弦的超级舒适性、弹性和控球性)$22
Signam Pro Plasma 17L(1.23mm 等离子纳米聚酯弦,提供动态力量和绝佳控球性、耐打性、绝不走弦)$22
Eagnas Nano 17G (1.25mm 纳米材料聚酯弦,手感、 耐打、力量、控球皆好、不走弦)$20

Eagnas Synthetic Gut 16G/17G(1.25/1.30mm 高强度芯和双缠绕高韧度纤维外层防肠弦,手感舒适,控球性,力量和耐久极好)$18
Eagnas Thunder Force 17G(1.25mm 高强度芯和双缠绕高韧度纤维加光纤外层防肠弦, 舒适性,力量, 控球和弹性皆好)$18
Tecnifibre Polyspin 17G(1.25mm 双缠绕高韧度纤维防肠弦,控球和弹性皆好)$18
Prince DuraFlex 17 (1.28mm 双缠绕高韧度纤维防肠弦, 手感舒适控球好)$18


强烈推荐组合弦(Hybride String):

1. 竖弦/横弦:Signam Pro Plasma 17L/Eagnas Synthetic Gut 16G (提供动态力量和绝佳的舒适性、控球性和耐打性、不易走弦)$25
2. 竖弦/横弦:Eagnas Nano 17G/Eagnas Sythetic Gut 16/17G(提供绝佳力量、手感、控球性和耐打、不易走弦)$20
3. 竖弦/横弦:Eagans Tunder Force 17G/Tecnifibre Polyspin 17G(提供绝佳的控球性、力量、手感舒适)$20
城市:Scarborough
联系人:Mark Liang
联系方式:647-308-8855

WebFocus Users

1. SYSTEMTEC Greensboro, NC :
WebFOCUS dashboards, SQL Oracle and DB2,Front end web development and mobile device web development
2. Plantation, Florida
3. Fidelis Care - New York City Regional Office -Agile development environment
4. Dallas, TX - Data Solutions & Technology Incorporated
administrative support:implementations, upgrades, and migrations. 
create user accounts, administration, monitor server tasks
installation, configuration, migration, tuning, and administration.  g command scripts in Windows and shell scripts
5. Princeton, NJ - UNIX, Shell Script, stored procedures, triggers,WF 8.0, Report Assist
6. Plant City, FL
7. Cincinnati, OH
8.Minneapolis, MN
http://www.careerjet.com/webfocus-jobs.html
Apex System,Thomasville, NC
CRG - Winston-Salem, NC
Kelly IT Resources - South Jordan, UT
Genesis10 - Kansas City, MO
U.S. Bank - Richfield, MN
Northrop Grumman - Woodlawn, NY - Maryland
Woodlawn, NY
GDI Infotech - Mason, OH
Enterprise Solution inc - Plantation, FL
Next Level Business Services, Inc. - Plantation, FL
Kelly IT Resources - South Jordan, UT
Apex Systems - Thomasville, NC
CRG - Winston-Salem, NC
ITech US, Inc. - Denver, CO
Dearborn, MI
Dublin, OH
Power I.t., Llc - Kansas City, MO
Econosoft Inc - Detroit, MI
UNICON International, Inc. - Dublin, CA
Hanover, MD
--------------------------
Company : ITech US, Inc.
Website : http://itechus.net
Posted By : Hitesh Rai
Phone : N/A
Lucid Jobs ID : 88Y9RU619X
Type : Contract
-----------------------
https://www.jobisjob.com/webfocus/jobs
Industry : Others

https://www.jobisjob.com/webfocus/jobs
WF JOB

9 Job Density on MAP:
http://www.robertmanduca.com/projects/jobs.html






Sunday, July 3, 2016

Oracle - Using Cursor to Insert Record from Remote Database Link With Hint

/********************Using Procedure**************/

CREATE OR REPLACE PROCEDURE INSERT_BY_FETCH AS
l_num_rows number := 10000;
l_row   yc64.test%ROWTYPE;
CURSOR test_cur
  is
  select Name, addr
  from yc64.test
  where rownum< 20;
BEGIN
  open test_cur;
  LOOP
      FETCH test_cur INTO l_row;
      EXIT WHEN test_cur%NOTFOUND;
      DBMS_OUTPUT.put_line(l_row.name );  
      insert into T_INSERT values l_row;
   END LOOP;
  CLOSE test_cur;
END INSERT_BY_FETCH;

/********************Using View**************/
--create view
CREATE VIEW yc64.v_test AS
SELECT a.* FROM yc64.test a WHERE rownum < 2000;
COMMIT; 

--create a table
create table yc64.t_insert as
SELECT a.* FROM yc64.test a WHERE rownum < 2000;
commit;

insert into yc64.t_insert 
select * from yc64.v_test;

select count(*) from yc64.t_insert ;




Monday, May 30, 2016

Using Windows PowerShell to Start Service Which Stopped

#Start all non-running Auto services
#C:\Users\duke\Documents
#taskschd.msc

#Step 1: Run One Time
#Set-ExecutionPolicy -Scope LocalMachine Unrestricted

#Step 2: Create a batch file like:  PowerShell -noexit -file "C:\Users\duke\Documents\rstart.ps1", add to windows Scheduler
$Computer = “WIN-36TFBPF3FHK”
$ServiceName = 'webclient'
#stop-service $ServiceName
#get-service -name $ServiceName
Get-WmiObject win32_service -ComputerName $computer -Filter " state != 'running' AND name = '$ServiceName'" | Invoke-WmiMethod -Name StartService
#get-service -name $ServiceName