PowerBuilder 風雲再起 - PowerBuilder 使用者家族

全形與半形應該只會發生在數字及大小寫英文字上
依據此理論可使用一個比較簡單的理論來實作,如下
1.問題:
   希望將 １２３大123４５寫６456ＡＢ字Ｃabc
   轉換成 １２３大１２３４５寫６４５６ＡＢ字Ｃａｂｃ
2.程式參考如下
string ls_char
string ls_result
string ls_string = '１２３大123４５寫６456ＡＢ字Ｃabc'
string ls_data1 = '０１２３４５６７８９ＡＢＣＤＥＦＧＨＩＪＫＬＭＮＯＰＱＲＳＴＵＶＷＸＹＺａｂｃｄｅｆｇｈｉｊｋｌｍｎｏｐｑｒｓｔｕｖｗｘｙｚ'
string ls_data2 = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz'
integer i , li_pos
for i = 1 to len(ls_string)
   ls_char = mid( ls_string , i , 1 )
   if asc(ls_char) > 127 then
     ls_result += mid( ls_string , i , 2 )
     i ++
   else
     if (asc( ls_char ) >= 48 and asc( ls_char ) <= 57) or (asc( ls_char ) >= 65 and asc( ls_char ) <= 90) or (asc( ls_char ) >= 97 and asc( ls_char ) <= 122) then
     li_pos = pos( ls_data2 , ls_char )
     if li_pos > 0 then
     ls_result += mid( ls_data1 , (li_pos * 2 - 1) , 2 )
     else
     ls_result += mid( ls_string , i , 1 )
     end if
     else
     ls_result += mid( ls_string , i , 1 )
     end if
   end if
next
messagebox( 'Result' , ls_result )

(Below) Two images scanned from a two-page advertisement on PowerBuilder Desktop.

底下的圖是從以前 PowerBuilder Desktop 2 頁的廣告掃描來的。

This advertisement was a defensive play against the growing strength of Visual Basic and MS-Access.

這個廣告是用來反擊逐漸成長的 Visual Basic 和 MS-Access 的。

If I remember correctly PowerBuilder desktop sold for US$249. PowerBuilder sales were growing so rapidly that if a developer had PowerBuilder experience they could demand higher rates.

說明:
以下在Client-Server下可正常使用,在Web Form 下,li_int <>0.
OLEObject myoleobject
myoleobject = CREATE OLEObject
li_int = myoleobject.ConnectToNewObject( "excel.application")
IF li_int <> 0 THEN
Messagebox("錯誤","無法連結至Excel!")
Destroy myoleobject
RETURN -1
END IF

底下影片是 PowerBuilder 12 .Net 新功能的說明影片。

「難道你不期待彩虹的出現嗎？」這是海角七號劇情當中，中村介對女主角友子所講的一句話。是的！身為 PowerBuilder 的資深使用者，對於 PowerBuilder 的「彩虹」已經期待很久了。

陽光與水是產生彩虹的兩大重要元素，陽光雖然耀眼燦爛，但是陽光沒有經過水份的折射是無法產生七彩奪目的彩虹。目前資訊業界 Java 與 .Net 的表現有如燦爛的陽光一般，不斷的散發光與熱。在這一波烈陽的照射之下，許多平常毫不起眼的產品就如同水蒸氣一般蒸發於人間。當所有的水份都被蒸發光了，只留下熾熱的陽光，這個世界會變得更美好嗎？

在這一波 .Net 的熱潮當中，PowerBuilder 有如水份一般，讓 .Net 可以進一步產生美麗彩虹的重要元件。這也是我一直在強調的「共好」概念。

最後我想說的是，讓我們一起積極的尋找 PowerBuilder 的海角七號，共同期待下一次美麗的彩虹吧！

當執行有輸入參數並且返回結果集的格式在編譯時無法確定的SQL語句時可以使用第四種格式。有時候我們執行一些SQL語句時，不僅帶有參數而且返回的結果集中有多少個欄位，每個欄位是什麼類型的資料都不確定，這時只能使用第四種格式來實現。

1語法
　　PREPARE DynamicStagingArea FROM SQLStatement{USING TransactionObject}；
　　DESCRIB DynamicStagingArea INTO DynamicDescriptionObject；
　　DECLARE cursor DYNAMIC CURSOR FOR DynamicDescriptionObject；
　　OPEN DYNAMIC cursor USING DESCRIPTOR DynamicDescriptionObject；
　　FETCH cursor USING DESCRIPTOR DynamicDescriptionObject；
　　CLOSE cursor；

其中：DynamicDescriptionObject是PowerBuilder提供的一個資料類型，在PowerBuilder中提供了一個DynamicDescriptionObject類型的全局資料類型SQLDA，用來存放動態SQL語句的輸入輸出參數。

當執行有輸入參數並且返回結果集的格式在編譯時可以確定的SQL語句時可以使用第三種格式。這種格式語法比較複雜，但要比前面兩種功能強，可以返回結果集。在返回結果時由於不知道滿足過濾條件的記錄到底有多少條，因此第三種格式通常採用游標的形式。

1語法
　　DECLARE cursor DYNAMIC CURSOR FOR DynamicStagingArea；
　　PREPARE DynamicStagingArea FROM SQLStatement{USING TransactionObject};
　　OPEN DYNAMIC cursor {USING Parameterlist};
　　FETCH cursor INTO VariableList;
　　CLOSE cursor;