星期三, 4月 27, 2011

Use Ops Navigator to determine if the system is advising new access paths

You can use Ops Navigator to determine if the system is advising new access paths, look for combinations of high costs and frequency. This little SQL can show those suggested since last IPL

Code:

SELECT DBNAME as Library,
SYS_TNAME as File,
decimal(timesadv,6) as Advised,
date(lastadv) as Last_Adv,time(lastadv) as Time_Adv,
decimal(querycost,6) as Cost,
decimal(queryest,6) as Avg_Cost,
decimal(mticreated,6) as MTI_Create,
date(lastmtiuse) as MTI_LastUsed,
substr(KEYSADV,1,40) as Keys_Advised,
substr(leadkeys,1,40) as Key_Order
FROM qsys2/sysixadv
where mticreated > 0
ORDER BY queryest DESC

iSeries Experience Report: Subsystem configuration

iSeries Experience Report: Subsystem configuration

IBM - Host Server Customization Requirements for TCP/IP Address and Subnet Mask

IBM - Host Server Customization Requirements for TCP/IP Address and Subnet Mask

Assigning Prestart Jobs to a Specific Pool

IBM i Support: Software Technical Document : 392581292
Document Title
Assigning Prestart Jobs to a Specific Pool

星期四, 4月 07, 2011

What's New in RPG for V6R1

May 2009

What’s New in RPG for V6R1

Barbara Morris, the lead developer for the WDS compilers in the IBM Toronto Lab

星期一, 2月 14, 2011

Threading in C# - Free E-book

Threading in C# - Free E-book
Part 1 Getting Started
Part 2 Basic Synchronization
Part 3 Using Threads
Part 4 Advanced Threading
Part 5 Parallel Programming

星期四, 12月 02, 2010

How to find out indexes created or used during the execution of an SQL statement


Two methods as following:

1. Visual Explain tool, through iSeries Navigator.

2. - chgjob (4 0) *seclvl logclpgm(*yes)
- strdbg
- run your sql statement from interactive sql400
- quit sql400
- enddbg
and watch the joblog to see which indexes where used/built.

星期三, 10月 13, 2010

星期二, 10月 12, 2010

Boîte à outils jpltools

Boîte à outils

Send a Mime Mail MAIL

OBJUNLCK

Cleanup old spools

星期五, 9月 24, 2010

MI - Test Bit in String (TSTBTS)

Test Bit in String (TSTBTS)
RPGLE SAMPLE CODE:

H Option( *SrcStmt ) BndDir( 'QC2LE' )

**-- Test bit in string:
D tstbts Pr 10i 0 ExtProc( 'tstbts' )
D string * Value
D bitofs 10u 0 Value

D testStr S 4
D bitOffset c 30
D result S 10i 0

/Free

result = tstbts( %Addr( testStr ) : bitOffset );
dsply result;

/End-Free

星期一, 9月 06, 2010

AS/400 Security AS/400 Services AS/400 security Software AS/400 Training, System i and iSeries Security and iSeries Audit Services and Security Software

AS/400 Security AS/400 Services AS/400 security Software AS/400 Training, System i and iSeries Security and iSeries Audit Services and Security Software

QlgTransformUCSData()--Transform UCS Data API

QlgTransformUCSData()--Transform UCS Data API

The QlgTransformUCSData() function transforms, through a formula as compared to a mapping, data from one form of Unicode to another. A transformation type identification is used to specify the type of transformation.

Usage Notes:

1. When requesting a BOM tagged output buffer the following BOM values will be generated.

BOMS Hex values
UTF-32 BE (020) 00 00 FE FF
UTF-32 LE (030) FF FE 00 00
UTF-16 BE (040) FE FF
UTF-16 LE (050) FF FE
UTF-8 (060) EF BB BF

A sample conversion:

transformation type: 030021

UTF-32 LE (030) -> UTF-32 BE marked (021)

x'AB 5F 00 00 7C 8E 00 00' -> x'00 00 FE FF 00 00 5F AB 00 00 8E 7C'
2. Auto detection is available when there is a BOM in the beginning of the inbuf that represents a Unicode type.

Practical RPG: Initialization Made Easy | RPG

Practical RPG: Initialization Made Easy | RPG

TechTip: Simplify Your Development with DB2 Automatic Timestamp Support | Database

TechTip: Simplify Your Development with DB2 Automatic Timestamp Support | Database

星期一, 8月 16, 2010

星期一, 8月 09, 2010

星期四, 5月 22, 2008

Home

Using the QAQQINI File

WebSphere MQ Clustering Configuration Tips | Business Systems | IBM Systems Magazine


WebSphere MQ Clustering Configuration Tips | Business Systems | IBM Systems Magazine



A, B, C, D, and E: STRSBS SBSD(QMQM/QMQM)

A: CRTMQM MQMNAME(QMGR.A)
A: STRMQM MQMNAME(QMGR.A)
A: STRMQMLSR PORT(1500) MQMNAME(QMGR.A)
A: CHGMQM MQMNAME(QMGR.A) REPOS('SAMPLE.CLUSTER')
A: CRTMQMQ QNAME(CLUSTER.QUEUE) QTYPE(*LCL) MQMNAME(QMGR.A) DEFBIND(*NOTFIXED) CLUSTER('SAMPLE.CLUSTER')
A: CRTMQMCHL CHLNAME(TO.A) CHLTYPE(*CLUSRCVR) MQMNAME(QMGR.A) CONNAME('SYSTEMA.IBM.COM(1500)') DSCITV(0) CLUSTER('SAMPLE.CLUSTER')
A: CRTMQMCHL CHLNAME(TO.B) CHLTYPE(*CLUSSDR) MQMNAME(QMGR.A) CONNAME('SYSTEMB.IBM.COM(1500)') DSCITV(0)

B: CRTMQM MQMNAME(QMGR.B)
B: STRMQM MQMNAME(QMGR.B)
B: STRMQMLSR PORT(1500) MQMNAME(QMGR.B)
B: CHGMQM MQMNAME(QMGR.B) REPOS('SAMPLE.CLUSTER')
B: CRTMQMQ QNAME(CLUSTER.QUEUE) QTYPE(*LCL) MQMNAME(QMGR.B) DEFBIND(*NOTFIXED) CLUSTER('SAMPLE.CLUSTER')
B: CRTMQMCHL CHLNAME(TO.B) CHLTYPE(*CLUSRCVR) MQMNAME(QMGR.B) CONNAME('SYSTEMB.IBM.COM(1500)') DSCITV(0) CLUSTER('SAMPLE.CLUSTER')
B: CRTMQMCHL CHLNAME(TO.A) CHLTYPE(*CLUSSDR) MQMNAME(QMGR.B) CONNAME('SYSTEMA.IBM.COM(1500)') DSCITV(0)

C: CRTMQM MQMNAME(QMGR.C)
C: STRMQM MQMNAME(QMGR.C)
C: STRMQMLSR PORT(1500) MQMNAME(QMGR.C)
C: CRTMQMQ QNAME(CLUSTER.C) QTYPE(*LCL) MQMNAME(QMGR.C) DEFBIND(*NOTFIXED) CLUSTER('SAMPLE.CLUSTER')
C: CRTMQMCHL CHLNAME(TO.C) CHLTYPE(*CLUSRCVR) MQMNAME(QMGR.C) CONNAME('SYSTEMC.IBM.COM(1500)') DSCITV(0) CLUSTER('SAMPLE.CLUSTER')
C: CRTMQMCHL CHLNAME(TO.A) CHLTYPE(*CLUSSDR) MQMNAME(QMGR.C) CONNAME('SYSTEMA.IBM.COM(1500)') DSCITV(0)

D: CRTMQM MQMNAME(QMGR.D)
D: STRMQM MQMNAME(QMGR.D)
D: STRMQMLSR PORT(1500) MQMNAME(QMGR.D)
D: CRTMQMQ QNAME(CLUSTER.D) QTYPE(*LCL) MQMNAME(QMGR.D) DEFBIND(*NOTFIXED) CLUSTER('SAMPLE.CLUSTER')
D: CRTMQMCHL CHLNAME(TO.D) CHLTYPE(*CLUSRCVR) MQMNAME(QMGR.D) CONNAME('SYSTEMD.IBM.COM(1500)') DSCITV(0) CLUSTER('SAMPLE.CLUSTER')
D: CRTMQMCHL CHLNAME(TO.B) CHLTYPE(*CLUSSDR) MQMNAME(QMGR.D) CONNAME('SYSTEMB.IBM.COM(1500)') DSCITV(0)

E: CRTMQM MQMNAME(QMGR.E)
E: STRMQM MQMNAME(QMGR.E)
E: STRMQMLSR PORT(1500) MQMNAME(QMGR.E)
E: CRTMQMQ QNAME(CLUSTER.E) QTYPE(*LCL) MQMNAME(QMGR.E) DEFBIND(*NOTFIXED) CLUSTER('SAMPLE.CLUSTER')
E: CRTMQMCHL CHLNAME(TO.E) CHLTYPE(*CLUSRCVR) MQMNAME(QMGR.E) CONNAME('SYSTEME.IBM.COM(1500)') DSCITV(0) CLUSTER('SAMPLE.CLUSTER')
E: CRTMQMCHL CHLNAME(TO.B) CHLTYPE(*CLUSSDR) MQMNAME(QMGR.E) CONNAME('SYSTEMB.IBM.COM(1500)') DSCITV(0)

星期六, 9月 29, 2007

星期五, 9月 14, 2007

Output Queue Monitor(OutqMon or MONOUTQ)

The Learning Center Store == Starter Kit for the IBM iSeries and AS/400
OutqMon (Outq Monitor) utility(MONOUTQ)
Chapter 11 A Plug-and-Play Output Queue Monitor 157

Setting the Stage 158

The Output Queue Monitor Utility 160

Configuring the Output Queue Monitor 162

Using the Output Queue Monitor 163

Monitoring Program OutQMon 164

Installing the Output Queue Monitor Utility 165

Download the latest version of the Starter Kit source code

Passing a list/array to SQL Server stored procedure : Narayana Vyas Kondreddi's home page

Passing a list/array to SQL Server stored procedure : Narayana Vyas Kondreddi's home page

星期四, 8月 30, 2007

予晴之見 - 知人之道

予晴之見 - 知人之道

【古文】諸葛亮的知人之道

夫知人之性,莫難察焉。美惡既殊,情貌不一。
有溫良而為詐者,有外恭而內欺者,有外勇而內怯者,
有盡力而不忠者。

然知人之道有七焉:
一曰,間之以是非而觀其志;
二曰,窮之以辭辯,而觀其變;
三曰,咨之以計謀,而觀其識;
四曰,告之以禍難,而觀其勇;
五曰,醉之以酒,而觀其性;
六曰,臨之以利,而觀其廉;
七曰,其之以事,而觀其信。
三國‧蜀漢‧諸葛亮《將苑‧知人性篇》

星期四, 7月 26, 2007

Help -

Help -
The IBM WebSphere MQ information center contains the documentation for WebSphere MQ Version 6.0.

Capitalware's WebSphere MQ Info Center Page

Capitalware's WebSphere MQ Info Center Page

Best Practices: WebSphere MQ shared queues and application programs

Best Practices: WebSphere MQ shared queues and application programs

IBM DB2 for i5/OS - Support Information

IBM DB2 for i5/OS - Support Information

V4R5 Exit Points for CL Commands | i5 | IBM Systems Magazine

V4R5 Exit Points for CL Commands | i5 | IBM Systems Magazine

A New Day for CL | i5 | IBM Systems Magazine

A New Day for CL | i5 | IBM Systems Magazine

V5R4 Introduces Subroutines for CL | i5 | IBM Systems Magazine

V5R4 Introduces Subroutines for CL | i5 | IBM Systems Magazine

Encrypted Printing via Internet Printing Protocol | i5 | IBM Systems Magazine

Encrypted Printing via Internet Printing Protocol | i5 | IBM Systems Magazine

Distributed Queue Management in WebSphere MQ | i5 | IBM Systems Magazine

Distributed Queue Management in WebSphere MQ | i5 | IBM Systems Magazine

WebSphere MQ Clustering Configuration Tips | i5 | IBM Systems Magazine

WebSphere MQ Clustering Configuration Tips | i5 | IBM Systems Magazine

星期三, 2月 14, 2007

中國人就那麼高貴嗎?

中國人總認為他們是尊貴的, 而台灣人是沒水準的, 有一位朋友竟然說台灣人沒文化, 台灣彈丸之地, 無法養出尊貴大氣度的人, 這是哪門子理論. 像馬英九被起訴, 竟然用參選總統來證明自己的清白, 真好笑. 若沒選上, 他是否就承認有罪. 貪污被起訴與參選總統是兩件不同的事, 將之相連成因果關係, 真是可笑. 這些不認同台灣的中國人, 終將為歷史所摒棄.

轉型正義不只是公平還必須善惡要報

http://city.udn.com/v1/blog/article/article.jsp?uid=FrankCTHsieh&f_ART_ID=740377

謝長廷:轉型正義不只是公平還必須善惡要報

前行政院長謝長廷今天暢談轉型正義理念,他說,轉型正義不只是要做到公平,還必須「善惡要報」,就像在社會、經濟上,國家必須特別照顧弱勢和基層勞工、農民和偏遠地區。
謝長廷今天到民進黨台東縣黨部,和地方人士座談,聽取地方意見,並且參加台東義務「長工辦公室」的成立,謝長廷暢談他的轉型正義理念。
謝長廷說,轉型正義不能只是做到公平,還要進一步「善惡要報」。他舉列說,他有一位朋友,白色恐怖期間,被冠上莫須有的罪名,遭到刑求,精神崩潰,四十年來都住在玉里精神病院,國家就應該給他補償。
另外,在經濟、社會上也一樣,北部的大企業,辦個尾牙動輒上千萬元,而台東卻是經濟蕭條,沒有工作機會,政府對這些偏遠地區和落後、弱勢團體,就應該給予照顧,這才是真正的轉型正義,而不是只做到公平而已。
(中央社記者盧太城台東縣十一日電)

星期六, 11月 11, 2006

『含冤下台』?

2006年11月11日星期六
http://www.libertytimes.com.tw/2006/new/nov/11/today-f2.htm

悲?喜?

李敏勇

好了,現在是「表態」的時候了。

二○○○年開展的政治新局面,似乎蒙上揮之不去的陰影。被殖民者就是無法承續國家治理,遑論「國家重建」與「社會改造」嗎?

「轉型正義」也不需要了,現在是追究「轉型後罪責」的時候。被劃分為藍、綠的台灣政治陣營,前者追究後者。不只這樣,泛化、合成的紅路線,以藍為主吸收了綠的某些元素,也在追究後者。

是自我批評嗎?還是一種權力鬥爭?民進黨這個國民黨外多元混雜勢力,既合作又競奪,名與實常常各取所需。在承續治理國家的權力位置以後,面目難以捉摸!各有各的鬼胎!

「親綠學者」、「挺綠學者」,甚至「深綠檢察官」…各種批評的聲音,相對於藍陣營、藍路線的意底牢結,反映的是相對於中國性僵硬的鬆軟台灣性,也反映了被殖民體質裡較為良善、單純的一面。當然,其中不乏體質已改變的變形人。

要「表態」,否則你就難以歸類,這時候,如果你提醒一些法體制的問題,也會被反挫,一言堂的時代又到了。如果你提醒殖民體制存在的積弊,對不起,這不是重點;如果你膽敢提到本土的艱困,不被重重回擊才怪!

「含冤下台」,為什麼?為了顧全大局。顧全什麼大局?顧全不下台就會有社會動亂的大局。為什麼這樣?應該這樣嗎?

李遠哲的信也反映了台灣性格的觀點,顧全的也是所謂的大局。這時候,因曾挺扁而連帶在教改被惡意批評的李遠哲,被讚揚之聲不絕。反映的就是台灣媒體問立場、輕是非的一面。這樣的面向影響了台灣社會的「表態」性格。

阿扁總統,眾矢之的,取代國民黨的台灣的國家領導人處境竟至於此,不知道要為政治權力的解構喜?還是為台灣的政治改革運動悲?(作者李敏勇,詩人)

=============================================

「含冤下台」,為什麼? 為什麼國民黨立院席次多數就可以使用多數暴力, 以近乎瘋狂的方式癱瘓政府, 阻止所有法案討論, 更遑論通過了, 只會利用多數暴力通過對他們的利益團體(例如領取軍公教 18%)有利的錢坑法案, 利息補貼 18% 為什麼不能改革? 法案為何不能討論 ? 台灣的亂源在國民黨, 不義黨產拼命賣, 然後號稱他自己清廉, 簡直自欺欺人. 查黨產, 就是不公不義 ? 改革 18% 就是違反誠信原則 ? 軍購不討論就封殺, 可以因為他們討厭一個人, 就可以封殺台灣的前途嗎 ?

這些既得利益者, 還成天在台灣撈 ? 他們到底撈夠了沒 ?

星期三, 11月 08, 2006

你清廉嗎?

當別人問你這樣一個問題: 你清廉嗎 ?

你的回答會是 :
1. 清廉
2. 不清廉

難道只有兩種答案嗎 ? 很可笑現在的政治環境裡就只有這兩種答案, 而且是以前不清廉, 如今也未必清廉的人所提出的答案.

其實還要看比較的基準是什麼或是什麼時機, 有時收禮不算貪污, 有時收禮就算貪污.

如今檯面上的政治人物, 口頭說清廉, 說的是絕對清廉, 但做的是相對清廉, 真是沒有標準

星期一, 11月 06, 2006