내 남자의 길~!

Cursors
Cursors는 sql select문의 결과의 집합에 대한 포인터이다.
이것은 한번에 하나씩 여러 개의 행들을 검색하거나 작업할 수 있도록 한다. 커서는 가상변수로 생각할 수 있으며, 특수한 명령들을 이용하여 그 변수를 사용한다.
. DECLARE - 그 커서의 SELECT 문을 명시한다.
. OPEN - 그 커서의 SELECT 문을 수행한다.
. FETCH - 그 커서의 한 행을 읽는다.
. UPDATE WHERE CURRENT OF cursor - 그 읽어진 행을 수정한다.
. DELETE WHERE CURRENT OF cursor - 그 읽어진 행을 삭제한다.
. CLOSE - 커서 작업을 종료한다.

1.DECLARE
모든 변수를 선언하듯이 커서도 사용하기 전에 반드시 선언하여야 한다. 커서의 선언은 반드시 하나의 SQL SELECT 문을 포함하여야 한다. DELCLARE는 변수선언과 같이 수행문이 아니다. 그러므로 DECLARE는 그 트랜잭션객체의 SqlCode와 SqlErrText와 같은 오류 속성들의 값을 지정하지 않는다.
DECLATE cursor1 CURSOR FOR
SELECT  payment, deposit
FROM    checkbook
ORDER BY checkdate, checkno;

2. OPEN
커서을 선언하고 나면 그 커서를 사용하기전에 반드시 오픈하여야 한다. OPEN은 그 커서의 선언문에서 명시된 SQL SELECT 문을 수행한다. SELECT 문의 수행이 실패할 수도 있으므로 다른 수행가능한 삽입된 SQL 문과 같이 OPEN을 수행한 다음에 SqlCode을 검사하여야 한다.
OPEN cussor1;
IF sqlca.SqlCode <> 0 then.......

3. FETCH
성공적으로 커서을 오픈하면 FETCH는 하나의 행을 변수로 읽어온다. OPEN은 그 커서의 위치를 첫 번째 행의 바로전에 위치시킨다. FETCH는 묵시적으로 그 다음의 행을 읽어온다. 전형적으로 FETCH문을 루프 안에 넣고 "notfound" 오류가 발생할 때까지 반복적으로 수행한다.
DO
   FETCHcusror1 INTO :decpayment, :decdeposit;
   IF sqlca.SqlCode =100 THEN EXIT         //더이상 남은 행이 없다.
   .......
   .......
   .......
LOOP while True

4. UPDTE와 DELETE
한행을 읽어 온 후, 그 커서가 가리키는 그 행을 수정하거나 삭제하기 위해 WHERE CURRENT OF cursor 절과 함께 UPDATE 또는 DELETE를 사용할수 있다.
UPDATE checkbook
   SET balance = :decbalance
WHERE CURRENT OF cursor1;
IF sqlca.SqlCode <> 0 then.......
물론, 단지 행을 읽기만을 원한다면 꼭 UPDATE 또는 DELETE를 사용해야 되는 의무는 없다.

5. CLOSE
커서의 작업이 끝나면 그것을 닫는다, 항상 그커서를 닫을 필요는 없다. COMMIT와 DISCONNECT가 자동적으로 그 커서를 닫아준다.

6. (예제1) : 커서를 사용하여 구조체의 행들을 읽어오기
첫째. 메뉴에서 Declare/Instance Variables를 선택 변수를 선언한다.
메뉴에서 Declare/Instance Variables를 선택하면 인스턴스 변수를 정의할수 있는 다이얼로그가 디스플레이 된다.
이곳에 단지 아래와 같은 선언문을 기술해주면된다.
DECLARE icur_store CURSOR FOR
SELECT storeid, storeaddress, storecity,
       storestate,storezip, salestaxrate
FROM store;
둘째.메뉴에서 Declate/Window Structures를 선택 구조체를 정의한다.
메뉴에서 Declare/Window Structures를 선택하면 구조체를 정의할수 있는 다이얼로그가 디스플레이 된다. 이곳에 구조체의 요소들인 변수명, 변수의 타입, 그리고 타입에 따라 자리수만을 계속해서 정의해주면 된다.
일단, ws_storerow란 이름의 구조체를 정의한것으로 가정하자
셋째. (예제2)스크립트에 커서문을기술한다.
....................................................................
Integer       li_rows      //FETCH된열을 계산할 변수
Ws_storerow   lstr_storerow
OPEN icur_store;
li_row = 0
DO
   FETCH isur_store INTO
   :lstr_storerow.s_storeid, :lstr_storerow.s_address,
   :lstr_storerow.s_city,    :lstr_storerow.s_state,
   :lstr_stoterow.s_zip,     :lstr_storerow.dec_salestaxrate;
   IF sqlca.SqlCode = 100 THEN EXIT      //더 이상의 열은 없다
      li_rows ++                         //하나 이상의 열을읽어 들였다.
      MessageBox ("store row #" +String(li_rows),             &
                  "Store id: -t"+lstr_storerow.s_storeid     +&
                  "-nAddresss: -t"+lstr_storerow.s_address   +&
                  "-nCity: -t-t"+lstr_storerow.s_city        +&
                  "-nState: -t-t"+lstr_storerow.s_ state     +&
                  "-nZip: -t-t"+ lstr_storerow.s_zip         +&
                  "-nSales Tax: -t"+lstr_storerow.s_salesstaxrate +&
LOOP WHILE True
CLOSE icur_store; // 커서을 닫는다.

 - 재스민의 파워빌더 싸부 수연아부지 DevTip에서 -

Null, Commit, Rollback
1. 널(Nul)값 처리
데이터베이스 테이블의 열들은 널값을 가질수있다. 널값은 공백 문자열이나 숫자 0 과는 같지않다. 종종 파워스크립트 프로그래밍을 할 때 널값에대한 특별한 처리가 필요하다.
WHERE 문에서의 예) ........... WHERE ... IS NULL;, 또는...............WHERE ... IS NOT NULL;
INSERT 문에서의 예) ........... VALUES ('9999', '8888',NULL, NULL)
UPDATE 문에서의 예) .......... SET remark = NULL WHERE.....;
1-1. 파워스크립트 산술연산에서의 널값
널값을 가지고 산술연산을 하면 그 결과 역시널값이 된다.
ex) IF IsNull(lr_a) THEN
             i = 0
        ELSE
             i= lr_a * 0.2 / 10
        END IF
만약 그 변수가 문자열 또는 다른 형의 변수라면 산술연산을 위해 비슷한 널의 처리가 필요하다.

1-2. 널 변수들과 컨트롤 속성들
SingleLineEdit 컨트롤의 Text 속성 또는 필드컨트롤의 비슷한 속성들을 널로 지정하였을 경우 예를 들어 sle_city.Text = ls_city 이 문장은 무시되고 그 컨드롤의 Text는 변경되지 않는다. 이 널값을 공백문자로 처리하려면 다음과 같은코드를 첨가 하여야 한다.
ex) IF IsNull(ls_city) THEN
             sle_city.Text =""
         ELSE
             sle-city.Text = ls_city
        END IF

1-3. SQL 산술연산의 널값들
sql문에서 산술연산이 가능하며, sql도 널값을 파워스크립트와 같은 방식으로 처리한다. 예를 들어 어떤 식의 일부의 결과가 널이라면 그식 전체의 결과가 널이 된다. 만약 널을 0과 같이 처리하려면 다음과 같이 한다.
ex) UPDATE pay
    SET totalpay = IsNull(sales, 0) + IsNull(tax, 0);
sql에 있는 isnull함수는 파위스크립트의 isnull함수와 다르다, 이함수는 널이 아닌 첫번째 파라미터를 반환한다.
위의 예제에서 sales나 tax가 널값이면 다음 파라미터인 0을 반환하는 것이다.

1-4. 지시(Indicator) 변수들
변수에 널 값이 지정되었는지 알아보는 가장쉬운 방법은 위에서 기술된 바와 같이 isnull함수를 사용하는 것이다.
다른 한가지 방법은 지시변수를 사용하는 것이다.
이것은 into문에 있는 값의 다음에 위치하는 별도의 변수이다,
만약 그값이 정상이면 지시변수는 0을 반환하고 널일경우 -1, 데이터 반환 오류일경우 -2를반환한다.
ex) SELECT city, openbalance
    INTO   :ls_city    :indvar_city,
           :ls_openbal :indvar_openbal
    FROM   customer
    WHERE  custid ='7777';
IF indvar_city = -1 THEN .......          //city의 값이 널
IF indvar_openval = -1 THEN .......       //openvalance의 값이 널

2. 트랜잭션 - Commit, Rollback
하나의 트랜잭션은 성공 또는 실패의 단위로써 sql 문들의 집합이다. 이는 데이터베이스의 무결성을 보장하기 위한방법이다. 서버마다 그 구문이 조금씩 다른데, ANSI-표준 SQL에서는하나의 트랜잭션이 그 데이터베이스에 영향을 미치는 INSERT 또는 UPDATE와 같은 명령들로 시작하고, COMMIT나 ROLLBACK과 같은 명령을 사용하여 끝낸다.
ex) execute multiple SQL statement here
IF everything worked THEN
      COMMIT;
ELSE
      ROLLBACK;
END IF
commit는 sql 문들에 의한 데이터베이스의 변경을 영구적으로 만든다. 반면, roolback은 그 변경들을 모두 취소시킨다.  이두경우 모두 그 트랜잭션을 끝내는 것이다. 그다음에 나오는 insert나 update와 같은 sql 문이 새로운 트랜잭션을 시작한다.
파워빌더는 commit와 roolback을 삽입된 sql의 형태로 지원한다.
그래서 위와 같이 그 명령들을 스크립트에 포함하여 사용할수 있으며 필요에 따라 using절을 수반할 수도 있다.

2-1. AutoCommit
파워스크립트의 트랜잭션 객체는 autocommit라는 속성을 가지고 있는데 이 속성은 트랜잭션에 중요한 영향을 미친다.
autocommit는 불린(boolean)값을 가지며 데이터베이스에 connect하기전이나 후에 그 값을 지정할 수 있다.
sqlca.AutoCommit = False
CONNECT;
autocommit을 지원하는 데이터베이스 상품에서는
 . autocommit의 값을 true로 지정하면 트랜잭션이하나도 없게 된다.
   그래서 각 sql 명령은 그 즉시데이터베이스에 적용된다. 이 경우 명시적인 commit나 rollback는 아무런 의미가 없다.
 . qutocommit의 값을 false로 지정하면 모든 sql명령들이 트랜잭션의 일부분이 되며,
    매번작업을 완료하기 위해 commit나 rollback를 수행해야 한다.
AutoCommit는 트랜잭션 객체의 속성들중 하나이다.그러므로 다른 속성들과 같이 그 값을 지정할수있다.
sqlca.DBMS =" ......."
sqlca.Databaxe =" ......"
.......
.......
sqlca.AutoCommit = False
COMMIT;
AutoCommit 의 디폴트 값은 True이다.

한 애플리케이션에서 AutoCommit의 값은 계속해서 바꿀 수가 있다. 그래서 필요에 따라 트란잭션처리를 변경할수 있다.
예를들어 다소 간단한 모듈일 경우 는시작모듈에서 autocommit의 값을 true로,
복잡한 모듈일 경우 시작에서 autocommit의 값을 false로 지정한다.
autocommit의 값을 변경하기 위해 disconnect를 하고다시 connect할 필요는 없다.

- 재스민의 파워빌더 싸부 수연아부지 DevTip에서 -

CONNECT,UPDATE, DISCONNECT
 
파워빌더 애플리케이션이 데이터베이스에 접속하고 그 데이터베이스를 조작하는데 두 가지 방법이 있다.
하나는 파워스크립트 언어로 sql을 수행하는 스크립트를 작성하는 것이고, 다른 하나는 데이터원도우를 이용하는 것이다.
아래에 나오게 될 예제들은 파워스트립트 언어로 sql을 수행하여 메인프레임의 batch작업을 수행하는 것들이다.
이 스크립트는 비 대화식의 작업작업에서 부터 큰 작업까지 처리한다. 대신 데이터의 입력작업과 같이 사용자와 대화식으로 수행되는 작업에는 데이터 원도우를 사용한다.
 
파워스크립트에서 sql명령을 사용하는데는 두가지 방법이 있다.
.삽입된 sql - 다른 파워스크립트문과 구별없이 sql 명령들을 스크립트에 직접 첨가한다.
.동적 sql - sql 명령들을 하나의 문자열의 변수로 저장하여 데이터베이스에 보내어 수행한다.
두가지 방법중 삽입된 sql은 더 간단하고 직접적이다.
동적 sql은 더 강력하고 융통성있는 방법이며 실행시간까지 알 수 없는 파리미터들에 대한 명령들을 작성할수 있다.

데이터베이스 상품관점에서 볼때 파워스크립트는 호스트(host)언어이다.
ex1) 삽입된 UPDATA문이 있는 스크립트
Transaction trans1
trans1 = CREATE Transaction
trans1.DBMS =" ODBC"
trans1.Database =" Video Store DB"
trans1.UserId =" dba"
trans1.DBParm =" Connectstring = 'DSN = Video Store DB'"
CONNECT USING trans1;
UPDATE customer
   SET address = 'dandong namgu ulsan'
 WHERE firstname = 'park'
USING trans1;
DISCONNECT USING trans1;
DISTORY trans1

실제 애플리케이션에서는 정확히 이와같이 스크립트를 작성하지는 않는다.
CONNECT, UPDATE 그리고 DISCONNECT문들은 모두 그 애플리케이션의 한곳이 아니라 다른 이벤트 스크립트에 각각 놓을수 있다. 또한 trans1 대신에 sqlca라는 특별한 변수를 사용할 경우에는 이 코드의 몇줄을 삭제하여야 한다. 하지만 기본적으론 이런 골격을 갖춘다는 좋은예이다..
 
SQL문과 파워스크립트문의 차이점.
1. sql문은 세미콜론으로 끝나야 하지만 파워스크립트는 그렇지 않다.
2. 파워스크립트 문은 한줄이 넘어가면 "&"를 사용해야 하지만 sql은 그렇지않다.
 
트랜잭션 객체
바로위의 예제(1)에서 trans1이라는 이름의 변수를 많이 사용하고 있다.
대부분의 애플리케이션에서는 sqlca라는 이름의 변수를 사용하는데, 이는 파워빌더의 특별한 내장변수로 몇가지 단계를 줄여준다. 그전에 trans1은 트랜잭션 객체의 이름이다. 트랜잭션객체는 구조체와 매우 비슷한 것으로 데이터베이스 접속에 관한 정보를 저장하여 파워빌더 애플리케이션과 데이터베이스 사이의 모든 상호작용을 한다.
 
1-1. 트랜잭션 객체의 선언, 생성, 소멸
Transaction trans1;          // 선언 - 변수 trans1을 'Transaction'자료형 변수로 선언
trans1 = CREATE Transcation  // 생성 - 트랜잭션 객체를하나 생성 (메모리를 할당하고 그 값을 초기화)
DESTORY trans1               // 소멸 - 객체를 메모리에서 제거하고 그메모리를 반환.
 
1-2. 트랜잭션 객체의 접속 속성들
DBMS : 'ODBC' 또는 'Oracle'와 같은 데이터베이스 서버의 종류
필수
ServerName : 데이터베이스 서버의 이름
Database : 데이터베이스 이름
UserID : 사용자의 데이터베이스 ID
DBPass : 사용자의 패스워드
LlgID : 사용자의 서버 로그인 ID
LogPass : 사용자의 서버 로그인 패스워드
Lock : 트란잭션 수행하는 동안 얼마나& locking이 수행되는지 결정하는&" isolationlevel"
DBParm : 데이터베이스 서버에 의존적인 추가적인 접속 파라미터들
필수
AutoCommit : 자동적으로& commit할 것인지를 결정 (True or False)
　
1-3. 삽입된 SQL
위의 예제(1)에서 아래의 문장들은 삽입된 SQL이다.
CONNECT USING trans1;      //데이터베이스에 접속, 이것은데이터베이스 페인트에서 File/Connect 메뉴를 선택하는 것과 같다.
UPDATE customer
SET address = 'dandong namguulsan'
WHERE firstname = 'park'
USING trans1;
DISCONNECT USING trans1;   //데이터베이스의 접속을 단절.
 
1-4. 삽입된 SQL의 USING 절
한번의 트랜잭선 객체 변수를 선언하여 초기화하면 그것을 각 삽입된 SQL문의 마지막에 USING 절로 마무리짓는다.
USING절은 그 SQL 문을 올바른 데이터베이스에 보내기 위해 필요한 것이다.
애플리케이션에서 여러개의 데이터베이스에 접속하면 그 각각에 대해 별도의 트랜잭션객체를 선언하여야 한다.
그리고 USING 절을 이용하여 해당 데이터베이스를 올바르게 인식시킨다.
디폴트는 USING sqlca이며 디폴트로 지정하였을 경우 따로 지정을 인식시킬 필요는 없다.
 
실제의 예제
실제 프로그래밍에서는 아래의 몇가지 있다.
1. 오류 처리루틴을 첨가해야 한다.
2. 트랜잭션 객체를 sqlca를 사용하는것이 편리하다.
3. 모든 스크립트에서 매번 트랜잭션을 접속하고 접속을 끊는것보다 애플리케이션이 시작될때
   한번 접속한후 계속 접속상태로 두는것이 더좋다.
4. 위의 예제에서는 그 트랜잭션 객체의 속성들에 대한 값들을 일일이 코딩하였다.
   그러나 그 값들을 PB.INI나 다른 .INI파일로부터 가져오도록 하면 그 애플리케이션을 보다 융통성있게 관리할수 있다.
 
1-1. 오류처리
오류반환속성 : 내용
반환값
자료형
SqlCode : 성공 또는 실패여부
성공 : 0, 실패 : -1, 처리없음 : 100
long
SqlRorw : 처리된 행들의 갯수
long
SqlDBCode : 데이터베이스가 명시하는 오류코드
long
SqlErrText : 오류발생시 오류메세지
string
SqlReturnData : 유용한 정보메세지
string
ex2) 오류처리의 예
 UPDATE customer
 SET    address = 'dandong namgu ulsan'
 WHERE  firstname = 'park'
 USING  trans1;
IF trans1.sqlcode <> 0 THEN
    MessageBox("Error on Update",&
               "Error Code:" + String(trans1.SqlDbCode) +&
               " -nError Message =" + trans1.sqlErrText, &
               StopSign!)
    RETURN
END IF

위에 예제는 sql실행시 에러처리의 예이며 connect와 disconect 다음의 문장에도 에러처리를 첨가하여야 한다.
1-2. Sqlca의 사용 SQL통신영역(Communications Area)
파워빌더는 자동적으로 하나의 전역 트랜잭션객체 변수를 선언하고 생성한다.
그것이 salca이다. sqlca를 사용하였을 경우의 이점은
1. sqlca를 선언, 생성, 소멸할 필요가 없다. 이작업들은 파워빌더가 자동적으로 해준다.
2. 모든 sql 문 뒤에 using 절을 사용할 필요가 없다, 파워빌더가 디폴트로 USING sqlca를 첨가한다.
ex3) sqlca를 사용한 스크립트
sqlca.DBMS =" ODBC"
sqlca.Database =" Video Store DB"
sqlca.UserId =" dba"
sqlca.DBParm =" Connectstring = 'DSN = Video Store DB'"
CONNECT USING trans1;
UPDATE customer
SET    address = 'dandong namgu ulsan'
WHERE  firstname = 'park'
DISCONNECT;

1-3. 전역 접속(Global Connection)
보통 애플리케이션이 수행되는 동안에는 데이터베이스에 계속 연결된 상태로 있기를 원한다. 그래서 CONNECT 의 적절한 사용위치는 애플리케이션의 'open'이벤트 스크립트에 기술하며, DISCONNECT 의 적절한 사용위치는 애플리케이션의'close'이벤트 스크립트에 기술한다. 이렇게 하면 다른 스크립트에서 더이상 CONNECT, DISCONNECT를 기술할 필요가 없으며 대부분의 서버에서 CONNECT는 매우늦은 연산이므로 가능한 적게 사용하는 것이 좋다.
 
1-4. INI 파일로부터 접속 파라미터 읽기
스크립트에서 트랜잭션 속성들의 값을 직접코딩하는 것은 대부분의 실-세계애플리케이션에서 융통성이 없어지므로 그 속성의 일부 또는전부를 .INI 파일에서 읽도록 해야 한다. 각 사용자가 PB.INI파일을 가지고 있다고 확신한다면 그 파일을 사용할수 있다. (또는 그 애플리케이션만의 .INI 파일을 별도로 가질수 있다.)
다음 예제는 PB.INI 파일에서 'Video Store'라는명칭의 데이터베이스의 접속 파라미터를 정의하는 예이다.
ex4) PB.INI의 PROFILE 섹션
[Profile Video Stoe DB]
DBMS = ODBC
Database = Video Store DB
UserID =
DatabasePassword =
LogPassword =
ServerName =
LogID =
DbParm = Connectring = 'DSN = Video Store DB; UID = dba'
Autocommit = 0
Prompt = 0
다음 예제는 PB.INI로 부터 그파라미터를 읽어와서 sqlca의 속성들에 저장하는 방법을 보여준다.
파워빌더는 .INI 파일의 파라미터를 읽기위해 ProfileString 함수를 제공한다.
ex5) PB.INI로부터 트랜잭션 속성읽기
String   ls_inifile, ls_section, ls_dbms
ls_inifile =" PB.INI"
ls_section =" PROFILE Video Store DB"
ls_dbms = ProfileString(ls_infile, ls_section," DBMS","" )
IF ls_dbms ="" THEN
    MessageBox("Error on Connect to Video Store DB", &
               "Unable to read DBMS vender from the"+&
                ls_section +" section of INI file"  +&
                ls_inifile,                          &
                stopsign!)
    RETURN
END IF
sqlca.Database = ProfileString(ls_inifile. ls_section," Database","" )
sqlca.ServerName = ProfileString(ls_inifile. ls_section," ServerName","" )
sqlca.UserID = ProfileString(ls_inifile. ls_section," UserID","" )
sqlca.DBPass = ProfileString(ls_inifile. ls_section," DatabasePassword","" )
sqlca.LogId = ProfileString(ls_inifile. ls_section," LogId","" )
sqlca.Lock = ProfileString(ls_inifile. ls_section," Lock","" )
sqlca.DBParm = ProfileString(ls_inifile. ls_section," DBParm","" )
sqlca.DBMS = ls_dbms
CONNECT;
 
- 재스민의 파워빌더 싸부 수연아부지 DevTip에서 - 

Arc( )
주어진 좌표를 이용하여 아크를 그린다. 

Global External Function:

FUNCTION boolean Arc(ulong hwnd, long r1, long r2, long r3, long r4, long a1, long a2, long a3, long a4) LIBRARY "Gdi32.dll"

Script:
Boolean rtn
ulong l_handle, l_device
long lv[8]
l_handle = handle(w_main)  // 'w_main' is the name of the sample window.
l_device = GetDC(l_handle)
lv[ ]  = {10,40,300,220,0,0,180,0}
rtn = Arc(l_device, lv[1], lv[2], lv[3], lv[4], lv[5], lv[6], lv[7], lv[8])

 

Beep( )
삑 소리가 나게 한다. 

Global External Function:
FUNCTION boolean Beep(long freq,long dur) LIBRARY "Kernel32.dll"

Script:
Boolean rtn
Long ll_freq, ll_dur

ll_freq = 500
ll_dur = 20
rtn = Beep(ll_freq, ll_dur)

 

BringWindowToTop( )
타겟 윈도우에게 가장 위쪽으로 나오도록 메시지를 보낸다. 파워빌더의 오브젝트명.bringtotop = true과 동일하다. 

Global External Function:
FUNCTION boolean BringWindowToTop(ulong w_handle) LIBRARY "User32.dll"

Script:
Boolean rtn
ulong l_handle

l_handle = handle(w_win2)
rtn = BringWindowToTop(l_handle)

 

Chord( )
주어진 좌표에 기반을 둔 현(사각형, 타원(?))을 그린다. 

Global External Function:
FUNCTION boolean Chord(ulong hwnd,long x1,long y1,long x2,long y2,long r1, long r2, long r3, long r4) LIBRARY "Gdi32.dll"

Script:
boolean rtn
ulong l_handle, l_device
long lv[8]

l_handle = handle(w_main)
l_device = GetDC(l_handle)

// This can be done in one line:   i.e.  l_device = GetDC(handle(w_main))
lv[ ] = {5,5,200,200,0,0,200,300}
rtn = Chord(l_device, lv[1], lv[2], lv[3], lv[4], lv[5], lv[6], lv[7], lv[8])

 

CloseHandle( )
이 함수는 열려있는 오브젝트의 핸들을 release한다. 

Global External Function:
FUNCTION boolean CloseHandle(ulong w_handle) LIBRARY "Kernel32.dll"

Script:
boolean rtn

ulong l_handle
l_handle = FindWindowA(0,"<window or object name>")  // Usually you would already have the handle.
rtn = CloseHandle(l_handle)

 

CloseWindow( )
타켓 윈도우를 미니마이즈시킨다.(닫지 않는다) 

Global External Function:
FUNCTION boolean CloseWindow(ulong w_handle) LIBRARY "User32.dll"

Script:
boolean rtn
ulong l_handle
l_handle = FindWindowA(0,"File manager")  // Be sure to use the exact title of the window you are targeting.

rtn = CloseWindow(l_handle)

 

CopyFileA( )
이 함수는 파일을 복사한다. 

Global External Function:
FUNCTION boolean CopyFileA(ref string cfrom, ref string cto, boolean flag) LIBRARY "Kernel32.dll"

Script:
string l_from, l_to
boolean l_flag, rtn

l_flag = false
l_from = "c:\pwrs\pb5i32\ex\code\beach.bmp"
l_to = "c:\test.bmp"
rtn = CopyFileA(l_from, l_to, l_flag)
MessageBox("CopyFile", string(rtn))
 

CreateDirectoryA( )
새로운 디렉토리 폴더를 생성한다. 

Global External Function:
FUNCTION boolean CreateDirectoryA(ref string pathname, int sa) LIBRARY "Kernel32.dll"

Script:
boolean rtn
string l_dir
l_dir = "API Demo"

rtn = CreateDirectoryA(l_dir, 0)
If rtn then
   MessageBox("New Directory Created", "API Demo directory is located under pwrs.")
else
   MessageBox("CreateDirectory", "Failed")
end if

 

DeleteFileA( )
지정된 파일을 삭제한다. 

Global External Function:
FUNCTION boolean DeleteFileA(ref string filename) LIBRARY "Kernel32.dll"

Script:
string l_file
boolean rtn

l_file = string(sle_to.text)
rtn = DeleteFileA(l_file)
MessageBox("DeleteFile", string(rtn))

 

DeleteMenu( )
이 함수는 지정된 메뉴아이템을 삭제하는데 사용된다. 

Global External Function:
FUNCTION boolean DeleteMenu(ulong mhand, uint upos, uint flag) LIBRARY "user32.dll"

Script:
ulong m_handle
boolean rtn

m_handle = GetSystemMenu(handle(w_main), false) // Need to get the handle of the system menu first.
rtn = DeleteMenu(m_handle, 1, 0)  // The second argument, the '1', refers to the position in the menu.
Messagebox("Return Code", string(m_handle))
Messagebox("Return Code", string(rtn))

 

DestroyWindow( )
이 함수는 타겟윈도우에게 Destory메시지를 보낸다. 파워빌더의 Close("윈도우명")과 동일하다. 

Global External Function:
FUNCTION boolean DestroyWindow(ulong w_handle) LIBRARY "USER32.DLL"

Script:
boolean rtn
ulong l_handle

open(w_win2) // Open a test window
l_handle = handle(w_win2)
rtn = DestroyWindow(l_handle)

 

DllRegisterServer( )
이 함수는 OCX가 자동적으로 등록되도록 해 준다. 이 함수는 constructor이벤트에서 파워빌더 에플리케인션이 이 동작되고 있는 동안에 동적으로 OCX를 등록할때 사용된다. 

Global External Function:
FUNCTION long DllRegisterServer() LIBRARY "c:\windows\ocxname.ocx"

Script:
Long ll_rtn

ll_rtn = DllRegisterServer()
//Note:   A return code of zero most likely means the OCX is already registered.

 

Ellipse( )
이 함수는 원에 기반을 둔 타원을 그린다. 

Global External Function:
FUNCTION boolean Ellipse(ulong hwnd,long x1,long y1,long x2,long y2) LIBRARY "Gdi32.dll"

Script:
Boolean rtn
ulong l_handle, l_device
long lv[4]

l_handle = handle(w_main)
l_device = GetDC(l_handle)
lv[ ] = {5,5,300,300}
rtn = Ellipse(l_device, lv[1], lv[2], lv[3], lv[4])

 

ExitWindowsEx( )
이 함수는 윈도우 O/S에게 윈도우가 종료되어야 함을 알려 윈도우 O/S가 종료되게 한다. 

Global External Function:
FUNCTION boolean ExitWindowsEx(uint dwReserved, uint uReserved) LIBRARY "User32.dll"

Script:
boolean rtn
rtn = ExitWindowsEx(0,0)  // Zero's tell it to shut down immediately.

 

FatalExit( )
이 함수는 실행중인 에플리케이션을 강제로 종료시킵니다. 디버깅의 용도로는 사용하되 다른 용도로는 사용하지 않는 것이 좋다. 

Global External Function:
SUBROUTINE FatalExit(int exitcode) LIBRARY "Kernel32.dll"

Script:
int rtn

rtn = MessageBox("This API call is suppose to produce a GPF!","Are You Sure?", Exclamation!, YesNo!,2)
If rtn = 1 Then
    MessageBox("Final Notice!","You will have to reboot after this API call!")
    FatalExit(1)
End If

 

FindWindowA( )
이 함수는 이름으로 호출된 윈도우의 핸들을 리턴합니다. 파워빌더 윈도우즈에서만 사용가능합니다. 파워빌더의 Handle( )과 유사합니다. 

Global External Function:
FUNCTION ulong FindWindowA(ulong classname,string windowname) LIBRARY "User32.dll"

Script:
ulong l_handle
l_handle = FindWindowA(0,"<window name>") // i.e. "File Manager" or "Numbers.txt - NotePad"

 

FreeLibrary( )
이 함수는 활성 메모리에서 dll을 release시킵니다. 이 함수는 LoadLibraryA( )와 결합되어 사용됩니다. 

Global External Function:
SUBROUTINE FreeLibrary(ulong libhandle) LIBRARY "Kernel32.dll"

Script:
ulong modhandle  // This would usually be an instance variable

modhandle = LoadLibraryA("<32 bit dll filename>")  // This would usually be done in another event.
FreeLibrary(modhandle)

 

GetBkColor( )
이 함수는 윈도우의 백그라운트 칼라를 reference number에 의해 return합니다. 파워빌더의 다음 스크립트와 유사합니다. ulong l_color
l_color = w_main.BackColor 

Global External Function:
FUNCTION ulong GetBkColor (ulong hwnd) LIBRARY "Gdi32.dll"

Script:
ulong l_handle, l_device, l_color

l_handle = handle(w_main)
l_device = GetDC(l_handle)
l_color = GetBkColor(l_device)

 

GetCapture( )
마우스에 의해 캡쳐된 윈도우의 핸들을 리턴합니다. 이때 윈도우는 마우스 커서가 어디에 있는가는 상관하지 않습니다. 

Global External Function:
FUNCTION ulong GetCapture( ) LIBRARY "User32.dll"

Script:
ulong l_handle

l_handle = GetCapture( )

 

GetComputerNameA( )
이 함수는 컴퓨터의 이름을 참조의 방법으로 return합니다. 충분한 버퍼를 확보해야 합니다. 

Global External Function:
FUNCTION boolean GetComputerNameA(ref string cname,ref long nbuf) LIBRARY "Kernel32.dll"

Script:
string ls_compname
long ll_buf

ll_buf = 25
ls_compname = space(ll_buf)
GetComputerNameA(ls_compname, ll_buf)
MessageBox("Computer name is:", ls_compname)

 

GetClassNameA( )
이 함수는 어떤 오브젝트나 윈도우의 핸들을 이용하여 클래스명을 리턴합니다. 충분한 버퍼를 확보해야 합니다. 

Global External Function:
Function long GetClassNameA(ulong hwnd, ref string cname, int buf) Library "User32.dll"

Script:
string l_class
long rtn
ulong l_handle

l_handle = handle(w_main)
l_class = space(50)
rtn = GetClassNameA(l_handle,l_class,50)
Messagebox("Classname", l_class)

 

GetCurrentDirectoryA( )
이 함수는 현재 작업디렉토리를 return합니다. 디렉토리 명이 다 들어갈만한 충분한 크기의 버퍼를 확보해야 합니다. 

Global External Function:
FUNCTION ulong GetCurrentDirectoryA(ulong BufferLen, ref string currentdir) LIBRARY "Kernel32.dll"

Script:
string ls_curdir
ulong l_buf

l_buf = 100
ls_curdir = space(l_buf)
GetCurrentDirectoryA(l_buf, ls_curdir)
MessageBox("Current Directory:", ls_curdir)

 

GetCurrentThread( )
이 함수는 현재 thread의 handle을 return합니다. 

Global External Function:
FUNCTION ulong GetCurrentThread() LIBRARY "Kernel32.dll"

Script:
ulong rtn

rtn = GetCurrentThread()
MessageBox("Current Thread Handle", string(rtn))

 

GetCursor( )
이 함수는 커서의 핸들을 return합니다. 

Global External Function:
FUNCTION ulong GetCursor( ) LIBRARY "User32.dll"

Script:
ulong l_cursor
l_cursor = GetCursor( )

 

GetCursorPos( ) & SetCursorPos( )
GetCursorPos()는 structure Mousepos를 이용해서 마우스의 x, y좌표를 return합니다. SetCursorPos()는 주어진 좌표로 마우스 커서를 이동시킵니다. 

Global External Function:
FUNCTION boolean GetCursorPos(ref mousepos mousepos2) LIBRARY "User32.dll"
FUNCTION boolean SetCursorPos(int cx, int cy) LIBRARY  "User32.dll"

Structure:  (Mousepos)
long xpos, long ypos

Script:
mousepos mouseloc
GetCursorPos(mouseloc)
Messagebox("Cursor Position", "X = " + string(mouseloc.xpos) + "  Y = " + string(mouseloc.ypos))
SetCursorPos(300,350)
Messagebox("Cursor Position", "X = " + string(mouseloc.xpos) + "  Y = " + string(mouseloc.ypos))

 

GetDC( )
이 함수는 주어진 윈도우 핸들의 device context를 return합니다. device context는 어떤 그래픽함수를 호출하고자 할 경우에 필요합니다. 파워빌더에는 비숫한 함수가 없습니다. 

Global External Function:
Function ulong GetDC(ulong hwnd) library "user32.dll"

Script:
ulong l_handle, l_device

l_handle = handle(w_main)
l_device = GetDC(l_handle)
MessageBox("Handle", string(l_device))

 

GetKeyboardState( ) & SetKeyboardState( )
첫번째 함수는 키보드의 모든 키의 상태를 256개의 ASCII배열에 의해서 return합니다. 두번째 함수는 주어진 배열의 상태에 따라서 키보드 상태를 set합니다. 여기에서 0은 키보드가 눌러지지 않는 것을 의미하고 그렇지 않은 값은 키보드가 눌러진 것을 의미합니다. 

Global External Function:
FUNCTION boolean GetKeyboardState(ref integer kbarray[256])  LIBRARY "USER32.DLL"
FUNCTION boolean SetKeyboardState(ref integer kbarray[256]) LIBRARY "USER32.DLL"

Script:
//GetKeyboardState( )
boolean rtn
integer ipkey[256]

rtn = GetKeyboardState(ref ipkey)

//SetKeyboardState( )
rtn = SetKeyboardState(ref ipkey)
if rtn = false then
  Messagebox("Failed","Something went wrong when loading into array")
else
  Messagebox("Successful","Keyboard state is loaded back into buffer")
end if

 

GetKeyState( )
이 함수는 현재 키보드의 특정한 키의 상태를 ASCII값으로 참조하여 return합니다. 

Global External Function:
Function int GetKeyState(integer VirtualKeycode) Library "User32.dll"

Script:
int rtn

rtn = GetKeyState(65)  // 65 = A
if rtn = 0 then
  MessageBox("Key State","Letter 'A' not pressed!")
else
  MessageBox("Key State","Letter 'A'  is pressed!")
end if

 

GetModuleHandleA( )
이 함수는 활성 메모리의 모듈이나 dll의 핸들을 return합니다. 

Global External Function:
Function long GetModuleHandleA(string modname) Library "Kernel32.dll"

Script:
ulong rtn

rtn = GetModuleHandleA("User32.dll")
MessageBox("Return Code", string(rtn))

 

GetParent( )
이 함수는 child handle을 검색하여 parent handle을 return합니다. 파워빌더의 'GetParent()'가 이 함수와 동일합니다. 

Global External Function:
FUNCTION ulong GetParent(ulong hwnd) LIBRARY "User32.dll"

Script:
ulong l_handle, rtn

l_handle = handle(cb_getparent) // Command Button name
rtn = GetParent(l_handle)
Messagebox("GetParent", "Parent handle = " + string(rtn) + " / Child handle = " + string(l_handle))
 

GetPixel( ) & SetPixel( )
첫번째 함수는 특정한 픽셀의 색을 알려주며 두번째 함수는 특정한 좌표의 색을 변경합니다. 

Global External Function:
FUNCTION ulong GetPixel(ulong hwnd, long xpos, long ypos) LIBRARY "Gdi32.dll"
FUNCTION ulong SetPixel(ulong hwnd, long xpos, long ypos, ulong pcol) LIBRARY "Gdi32.dll"

Script:
long lx, ly
ulong rtn
ulong l_handle, l_device

lx = 100
ly = 100
l_handle = handle(w_main)
l_device = GetDC(l_handle)
rtn = GetPixel(l_device, 100, 100)
MessageBox("Position " + string(lx) + "," + string(ly),"Color = " + string(rtn))
SetPixel(l_device, lx, ly, 0)  // This call will set the pixel at lx, ly to black.

 

GetSystemMetrics( )
이 함수는 현재 화면의 해상도 픽셀단위를 이용해서 알려줍니다. 이 함수는 아주 민감하여 정확히 선언을 해야 하며 "GetSystemMetrics"라고 선언해야 하는데 "getsystemmetrics"로 선언하면 절대 안됩니다. 

Global External Function:
FUNCTION int GetSystemMetrics(int indexnum) LIBRARY "user32.dll"

Script:
int l_xx, l_yy

l_xx = GetSystemMetrics(0)
l_yy = GetSystemMetrics(1)
Messagebox("Screen Resolution", string(l_xx) + " , " + string(l_yy))

 

GetSystemMenu( )
이 함수는 에플리케인션이 복사 또는 수정을 위해 시스템이나 윈도우즈의 메뉴를 사용할 수 있게 합니다. 

Global External Function:
FUNCTION boolean GetSystemMenu(ulong mhandle, boolean flag) LIBRARY "user32.dll"

Script:
boolean flag
ulong l_handle, m_handle

l_handle = handle(w_main)
flag = false
m_handle = GetSystemMenu(l_handle, flag)
Messagebox("Return Code", string(m_handle))

 

GetSystemTime( )
이 함수는 structure SystemTime을 이용하여 시스템 타임을 return합니다. 

Global External Function:
SUBROUTINE GetSystemTime(ref systemtime systimeptr) Library "Kernel32.dll"

Structure:  (SystemTime)
uint year,  uint month,  uint dayofweek,  uint day,  uint hour,  uint minute,  uint second,  uint millisecond

Script:
systemtime s_systime
string l_day, l_date, l_time

GetSystemTime(s_systime)

l_date = string(s_systime.month) +"/"+ string(s_systime.day) &
       +"/"+ string(s_systime.year)
l_time = string(s_systime.hour) +":"+ string(s_systime.minute) &
       +":"+ string(s_systime.second) +":"+ string(s_systime.millisecond)

CHOOSE CASE s_systime.dayofweek
   CASE 1
      l_day = "Sunday"
   CASE 2
      l_day = "Monday"
   CASE 3
      l_day = "Tuesday"
   CASE 4
      l_day = "Wednesday"
   CASE 5
      l_day = "Thursday"
   CASE 6
      l_day = "Friday"
   CASE 7
      l_day = "Saturday"
END CHOOSE
Messagebox("System Time:",l_date + "   " + l_day + "   " + l_time)

 

GetThreadPriority( )
이 함수는 주어진 thread의 우선 순위를 return합니다. 

Global External Function:
FUNCTION int GetThreadPriority(ulong hthread) LIBRARY "Kernel32.dll"

Script:
ulong l_handle
integer rtn

l_handle = GetCurrentThread()
rtn = GetThreadPriority(l_handle)
MessageBox("Current Thread Priority", string(rtn))

 

GetUserNameA( )
이 함수는 현재 유저의 로그온 네임을 return합니다. (유저명을 저장할 수 있을 만큼의 충분한 버퍼를 확보해야 합니다.) 

Global External Function:
FUNCTION boolean GetUserNameA(ref string uname, ref ulong slength) LIBRARY "ADVAPI32.DLL"

Script:
string  ls_username
string  ls_var
ulong  lu_val
boolean rtn

lu_val = 255
ls_username = Space( 255 )
rtn = GetUserNameA(ls_username, lu_val)
Messagebox("GetUserNameA", "Username = " + string(ls_username))

 

GetWindowsDirectoryA( )
이 함수는 윈도우즈 디렉토리를 return하며 디렉토리를 얻기 위해 디렉토리가 저장될 만한 길이의 충분한 메모리를 확보해야 합니다. 

Global External Function:
FUNCTION ulong GetWindowsDirectoryA(ref string wdir, ulong buf) LIBRARY "kernel32.dll"

Script:
ulong l_buf
string windir

l_buf = 144
windir = space(144)
GetWindowsDirectoryA(windir, l_buf)
MessageBox("Current Directory", windir)

 

GlobalMemoryStatus( )
이 함수는 structure Memory를 이용하여 현재 메모리의 모든 정보를 리턴합니다. 

Global External Function:

SUBROUTINE GlobalMemoryStatus(ref memory mem2) LIBRARY "Kernel32.dll"

Structure:(Memory)
ulong m_length, ulong m_loaded, ulong m_totalphys, ulong m_availphys, &
ulong m_totalpagefile, ulong m_availpagefile, ulong m_totalvirtual, &
ulong m_availvirtual

Script:
memory sysmem

GlobalMemoryStatus(sysmem)
Messagebox("Memory Length", string(sysmem.m_length))
Messagebox("Memory Loaded", string(sysmem.m_loaded))
Messagebox("Total Physical Memory", string(sysmem.m_totalphys))
Messagebox("Total Available Memory", string(sysmem.m_availphys))
Messagebox("Total Page Size", string(sysmem.m_totalpagefile))
Messagebox("Available Page Size", string(sysmem.m_availpagefile))
Messagebox("Total Virtual Memory", string(sysmem.m_totalvirtual))
Messagebox("Available Virtual Memory", string(sysmem.m_availvirtual))

 

LoadLibraryA( )
이 함수는 dll을 (활성)메모리에 로드합니다. 32비트에서만 사용할 수 있습니다. 

Global External Function:
FUNCTION ulong LoadLibraryA(string modname) LIBRARY "Kernel32.dll"

Script:
ulong modhandle

modhandle = LoadLibraryA("c:\windows\mydll.dll")  // Pathing isn't necessary if dll is in dos search path.
If modhandle > 0 Then
   MessageBox("Return Code", "Load Successful -> handle = " + string(modhandle))
else
   MessageBox("Result","Unable to load module")
end if

 

MciSendStringA( )
이 함수는 AVI파일을 PLAY하며 사용법이 좀 복잡합니다. 파워빌더에는 비슷한 함수가 없습니다. 

Global External Function:
FUNCTION long MciSendStringA(string cmd, REF string rtn, long size, long wnd) LIBRARY "winmm.dll"

Script:
string s_errortext
string filename

filename = "c:\pwrs\pb5i32\ex\code\pbspin.avi"
MciSendStringa ("open "+Filename+"  type AVIVideo alias test wait",s_errortext, 0,0)
MciSendStringa ("Window test handle " + string(handle(w_main)) + " wait",s_errortext, 0, 0)
MciSendStringa ("Put test destination wait",s_errortext, 0, 0)
MciSendStringa ("Play test wait", s_errortext, 0, 0)
MciSendStringa ("Close test", s_errortext, 0, 0)

 

MessageBoxA( )
이 함수는 메시지 박스를 출력합니다. 파워빌더의 MessageBox()와 유사합니다. 

Global External Function:
FUNCTION long MessageBoxA(ulong hwnd, ref string text, ref string title, ulong style) LIBRARY "User32.dll"

Script:
long rtn
ulong handle1, style1
string text1
string title1

handle1 = handle(parent)
text1 = "This is an API Messagebox"
title1 = "API MessageBox"
style1 = 0
rtn = MessageBoxA(handle1,text1,title1,style1)

 

Mouse_Event( )
이 함수는 마우스 포인터를 이동시키거나 마우스 버튼의 클릭이벤트를 발생시키거나 기타 유저가 마우스를 이용하여 할 수 있는 일을 합니다. 아래의 예제는 마우스를 왼쪽으로 80픽셀, 위로 50픽셀이동시킵니다. structure mousepos는 마우스의 이동전의 좌표입니다. 

Global External Function:
SUBROUTINE Mouse_Event(ulong dwflag,ulong dx,ulong dy,ulong cbutton,ulong dwextra) LIBRARY "User32.dll"

Structure:  (Mousepos)
long xpos, long ypos

Script:
int l_loop, lx, ly, lflag
mousepos mouseloc

lx = mouseloc.xpos
ly = mouseloc.ypos
lflag = 1  //1 = do nothing, 7 = L-button clicked, 25 = R-button clicked
mouse_event(lflag,-80,-50,0,0)

 

MoveToEx( ) & LineTo( )
MoveToEx()는 주어진 좌표로 커서를 이동시키며, LineTo()는 현재 좌표에서 주어진 좌표까지 라인을 그립니다. 

Global External Function:
FUNCTION boolean MoveToEx(ulong hwnd,long wx, long wy,ref prepos prepos2) LIBRARY "Gdi32.dll"
FUNCTION boolean LineTo(ulong hwnd,long wx, long wy) LIBRARY "Gdi32.dll"

Structure:  (Prepos)
long xpos, long ypos

Script:
ulong l_handle, l_device
prepos previouspos

l_handle = handle(w_main)
l_device = GetDC(l_handle)
MoveToEx(l_device,100,100,previouspos)
LineTo(l_device,200,200)

 

MoveWindow( )
이 함수는 주어진 값에 따라 윈도우의 위치 및 크기를 변경합니다. 

Global External Function:
FUNCTION boolean MoveWindow(ulong whand,int wx,int wy,int ww,int wh,boolean wflag) LIBRARY "user32.dll"

Script:
boolean rtn
ulong l_handle, l_device
l_handle = handle(w_main)
rtn = MoveWindow(l_handle,10,10,100,100,true)
MessageBox("Return Code",string(rtn))

 

Pie( )
이 함수는 주어진 좌표를 이용하여 파이챠트에 기반을 둔 반원을 그립니다. 

Global External Function:
FUNCTION boolean Pie(ulong hwnd,long x1,long y1,long x2,long y2,long x3,long y3,long x4,long y4) LIBRARY "Gdi32.dll"

Script:
Boolean rtn
ulong l_handle,l_device

long lv[8]
lv[ ] = {10,50,290,220,0,0,80,0}
l_handle = handle(w_main)
l_device  = GetDC(l_handle)
rtn = Pie(l_device,lv[1],lv[2],lv[3],lv[4],lv[5],lv[6],lv[7],lv[8])

 

Polygon( )
이 함수는 주어진 좌표를 이용하여 도형에 기반한 타원을 그립니다. 

Global External Function:
FUNCTION boolean Polygon(hdc, ref struct poly poly2, int cnt) LIBRARY "Gdi32.dll"

Structure:  (Poly)
long xpos[5], long ypos[5]  //The size of the array is proportional to the number of sides in the Polygon.

Script:
ulong l_handle, l_device
int pcnt
l_handle = handle(w_main)
l_device = GetDC(l_handle)
pcnt = 5
poly poly3
poly3.xpos[ ] = {50,100,150,200,250}
poly3.ypos[ ] = {50,100,150,200,250}
Polygon(l_device,poly3,pcnt)

 

PostMessageA( )
이 함수는 지정된 윈도우에 의해서 만들어진 thread와 관련된 메시지(minimize, close)를 message queue에 post하며 이것이 처리되기전까지는 return되지 않는다. 

Global External Function:
FUNCTION boolean PostMessageA(ulong hwndle,UINT wmsg,ulong wParam,ulong lParam) Library "User32.dll"

Script:
ulong l_handle
boolean rtn

l_handle = handle(w_main)
rtn = PostMessageA(l_handle,274,61472,0)   // 61472 = minimize, 61488 = maximize, 61728 = normal state

 

Rectangle( )
이 함수는 주어진 좌표에 의해서 사각형을 그린다. 

Global External Function:
FUNCTION boolean Rectangle(ulong hwnd,long x1,long y1,long x2,long y2) LIBRARY "Gdi32.dll"

Script:
Boolean rtn
ulong l_handle,l_device
long lv[4]

lv[ ] = { 10,10,275,215}
l_handle = handle(w_main)
l_device  = GetDC(l_handle)
rtn = Rectangle(l_device,lv[1],lv[2],lv[3],lv[4])

 

SendMessageA( )
이 함수는 지정된 윈도우에 의해서 만들어진 thread와 관련된 message를 message queue에 보내며 그 message가 처리될때까지 return되지 않는다. 

Global External Function:
FUNCTION long SendMessageA(ulong hwndle,UINT wmsg,ulong wParam,ulong lParam) Library "User32.dll"

Script:
ulong l_handle
long rtn

l_handle = handle(w_main)
rtn = SendMessageA(l_handle,274,61728,0)

 

SetCapture( )
이 함수들은 같이 사용되며, SetCapture()함수는 ReleaseCapture()가 호출될때까지 마우스에 락을 건다. 

Global External Function:
FUNCTION ulong SetCapture(ulong a) LIBRARY "User32.dll"
FUNCTION boolean ReleaseCapture( ) LIBRARY "User32.dll"

Script:
boolean rtn
ulong l_loop, u_test, u_long
u_test = handle(parent)
u_long = SetCapture(u_test)

SetPointer(SizeNWSE!)
for l_loop = 1 to 150000
next
rtn = ReleaseCapture( )

 

SetComputerNameA( )
이 함수는 컴퓨터(다른 컴퓨터에서 참조되는)의 이름을 변경한다. 

Global External Function:
FUNCTION boolean SetComputerNameA(ref string cname) LIBRARY "kernel32.dll"

Script:
boolean rtn
string l_name

l_name = "Powerbuilder"
rtn = SetComputerNameA(l_name)

if rtn then
   MessageBox("Computer name changed to 'Powerbuilder'", "You'll need to reboot for it to take effect")
else
   MessageBox("SetComputerName", "Failed")
end if

 

SetCurrentDirectoryA( )
이 함수는 O/S가 가리키고 있는 현재의 디렉토리를 변경한다. 파워빌더에는 이와 유사한 함수가 없다. 

Global External Function:
FUNCTION boolean SetCurrentDirectoryA(ref string cdir) LIBRARY "kernel32.dll"

Script:
boolean rtn
string l_dir

l_dir = "c:\My Documents"
rtn = SetCurrentDirectoryA(l_dir)
MessageBox("SetCurrentDirectory", string(rtn))

 

SetFocus( )
주어진 윈도우 또는 오브젝트로 포커스를 변경하는 기능을 수행한다. 파워빌더의 오브젝트.SetFocus( )와 유사하다. 

Global External Function:
SUBROUTINE SetFocus(long objhandle) LIBRARY "User32.dll"

Script:
SetFocus(handle(sle_1))  // This function gets the handle from PB.

 

SetThreadPriority( )
이 함수는 주어진 thread의 우선순위를 set한다. default값은 0이며, 그 어떤 높은 우선순위도 hold상태가 되어 더 많은 cpu time을 받을 수 있다. 우선 순위를 너무 높게 잡거나 마우스가 작동하지 않도록 하는 것은 좋지 않다. 

Global External Function:
FUNCTION boolean SetThreadPriority(ulong hthread, int npriority) LIBRARY "Kernel32.dll"

Script:
ulong l_handle
boolean rtn

l_handle = GetCurrentThread()
rtn = SetThreadPriority(l_handle, 2) // Set the priority of thread higher.
MessageBox("Current Thread Priority Changed", string(rtn))

 

Sleep( )
이 함수는 O/S가 주어진 시간(milliseconds)동안 현재의 thread를 무시하도록 한다. 이 함수가 Active상태인 동안 화면은 다시 그려지지 않는다. 

Global External Function:
SUBROUTINE Sleep(ulong milli) LIBRARY "Kernel32.dll"

Script:
ulong l_delay
l_delay = 2000
Sleep(l_delay)

 

SndPlaySoundA( ) & WaveOutGetNumDevs( )
이 함수들은 WAV파일을 파워빌더에서 플레이 한다. 파워빌더에는 이와 유사한 함수가 없다. 

Global External Function:
FUNCTION boolean SndPlaySoundA(string wavfile, uint flag) LIBRARY "WINMM.DLL"
FUNCTION uint WaveOutGetNumDevs() LIBRARY "WINMM.DLL"

Script:
int    lui_NumDevs, l_mode
string ls_file

l_mode  = 0
ls_file = string(c:\windows\media\chimes.wav)
lui_NumDevs = WaveOutGetNumDevs()
IF lui_NumDevs > 0 THEN
   SndPlaySoundA(ls_file, l_mode)
END IF

 

SwapMouseButton( )
이 함수는 마우스의 오른쪽 버튼과 왼쪽 버튼을 서로 바꾸는 일을 하며 파워빌더에는 이와 유사한 함수는 없다. 마우스의 일반(Normal) 상태를 return하기 위해 이 함수는 다시 호출되어야 한다. 

Global External Function:
FUNCTION boolean SwapMouseButton(boolean var) LIBRARY "User32.dll"

Script:
boolean rtn, l_mouse

rtn = SwapMouseButton(l_mouse)
If l_mouse = true Then
   MessageBox("Change Made","Right button on Left Side")
Else
   MessageBox("Change Made","Right button on Right Side")
End If

WinExec( )
이 함수는 주어진 파일명(파일의 경로 포함)을 O/S 트리거에게 전달하며 O/S트리거는 주어진 파일을 실행한후 그 결과를 Return한다. 파워빌더에서는 RUN() 함수를 사용하면 된다.(i.e. Run("c:\windows\calc.exe") 

Global External Function:
FUNCTION uint WinExec(ref string filename, uint wstyle) LIBRARY "kernel32.dll"

Script:
string ls_filename
uint rtn, wstyle

ls_filename = "c:\windows\calc.exe"
style = 1
tn = WinExec(ls_filename, wstyle)
Messagebox("Return Code", string(rtn))

본 자료는

파워빌더 개발자 싸이트 PBDN( http://www.pbdn.net )에서
김태훈(guroom@hanmail.net) 님께서 올리신 자료 입니다

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

[ 파워빌더의 기초문법 ]

VC++(OOP개념)과 VB를 합쳐놓은것

   1) 코딩시 대소문자 구분이 없다 but 가독성을 높이기 위해 가능한 구분하자
     -> VB을 따왔음...가능한 단어의 첫글자는 대문자로 쓰자

   2) 주석 : 주석다는 습관!
     //             ->한 줄 주석
     /*  ......  */ ->여러줄 주석

   3) 명령문은 line단위로 이뤄진다
     한줄에 여러 개의 명령어를 입력하고 싶을 경우 ";"으로 구분한다
      ex) a=a+b ; b=b+10 ; c=c+7
     하나의 명령어를 여러 줄로 나눠 입력할 경우 " &"
        -> a=a+b+c
            a=a+ &
            b+ &
            c
   4) 변수
    ① Variable Types
      정수형 - integer(2byte) - 32768 ~ 32767
                - long형(4byte) - 20억 ~ 20억
      실수형 - real형(4byte)
                - double형(8byte)
      문자형 - char : 문자 한글자 저장 ex) char a='t'
                - string형 :문자열 저장 ex) string a="korea"
      논리형 - boolean ex) a,b=true
      시간형(data저장형식) - time a
                                       a=Gettime//PB의 내장함수
      날짜형 - date a
      시간날짜형 - DateTime a

    ② PB만이 갖고있는 변수형!!!
     - Blob형 : 아주 긴 문자열이나 image data저장
     - Any형  : 가변길이형 data
           +=========================================+
           :!!!  변수선언시 초기값을 주지 않을 경우      :
           :                                                               :
           :      default     숫자      = 0                          :
           :                    문자      = null                       :
           :                    boolean = false                     :
           +=========================================+

    ③ 변수의 규칙
      - 변수길이는 40자까지 가능
      - 모든 변수는 반드시 선언해줘야 한다:사용자가 만들어 쓸 경우
      - 대소문자 구분이 없다
      - 영문자, 숫자, -, _, #, %, $로 조합
        "-"는 반드시 창의 design/option에서 해제해줘라!!!

   5) 배열
          +=====================================+
          :   !!! tool마다의 배열                            :
          :    a(10):0번째~9  ->C                         :
          :    a(10):0번째~10 ->Visual Basic         : 
          :    a[10]:1번째~10 ->Power Builder       :
          +=====================================+
     ex) integer a[20]
         c[3]=20
         integer a[5]={1,5,3,16,4}
         integer a[10 to 20]=a[10]~a[20]

    ① 가변길이
     - 편리하지만 프로그램 속도를 떨어뜨린다
     - 1 차원배열에서만 가능

    ② 다차원배열
       integer a[행,열]
       ex) a[2,3]
       integer a[면,행,열]
       ex) a[2,3,3]

   6) PB의 내장함수
    ① 날짜함수                               ② 시간함수
      Now() "현재의 시스템의 날짜         hour()
      Year() "년도                                  minute()
      month()                                        second()
      day()
      이외에도 아주 많습니다.

   7) 용어
    ① This : 현재 사용중인 객체(object)를 의미
      ex) cb_1에 코딩할 경우: cb_1.text="종료"
                                    ->this.text="종료"

    ② Parent : 현재 사용중인 객체의 부모window
                    menu없는 창을 닫을 때 ->close(parent)
          +=============================================+
          :  참고!!                                                          :
          :       객체를 복사할 때 두가지 방법                  :
          :     -duplication :개체만 copy                           :
          :     -edit/copy후 paste :개체+코딩까지 copy      :
          :                                                                     :
          : 따라서...                                                       :
          :  close(parent)하는게 편하다                           :
          :          ->코딩을 일일이 고칠 필요가 없다         :
          +=============================================+

    ③ Parent Window : 메뉴가 있는 window를 말함
                      종료시 close(parent window)

    ④ 종료
      Halt : application 종료 but 메모리는 해제되지 않는다
      Halt Close : application의 close 이벤트를 발생시키면서 종료

   8) 제어문:프로그램의 흐름을 통제
      형식> 컨트롤이름.속성=값
    ① if문
       +=======================+
       :  if 조건식 then              :
       :     명령1                      :
       :  end if                         :
       :                                   :
       :         OR                      :
       :                                   :
       :  if 조건식 then 명령1     :
       +=======================+
       +=================================+
       :  if 조건 then                                :
       :     명령1                                     :
       :  else                                          :
       :     명령2                                     :
       :  end if                                        :
       :                                                  :
       :              OR                                :
       :                                                  :
       :  if 조건 then 명령1 else 명령2       :
       +=================================+

    ② choose case문
       +========================+
       :    choose case 변수       :
       :       case a1                   :
       :       case a2                   :
       :       case a3                   :
       :       case a4                   :
       :       case else                :
       :    end choose                :
       +========================+

   9) 연산자
      +, -, *, /, >, <, >=, <=, <>
      and, or, not

   10) 반복문
    ① for~ next문
       +=========================================================+
       :    for 변수명=초기값 to 최종값 step 증가(+)/감소(-)값         :
       :          .......                                                                      :
       :   .......                                                                             :
       :    next                                                                             :
       : -> 횟수가 정해져 있는 경우 :   계산                                   :
       :    무제한적으로 돌아갈 경우                                             :
       +=========================================================+

    ② do while
       +=======================================================+
       :    do while 조건                                                            :
       :        ....                                                                        :
       :    loop                                                                          :
       : ->조건식이 참인 동안 실행                                            :
       :   조건식이 맞지 않으면 실행을 시작하지 않을 수도 있다  :
       +=======================================================+
         
       +======================================================================+
       :   do                                                                                                   :
       :   ......                                                                                                 :
       :   loop while 조건                                                                                 :
       : ->조건식이 틀리더라도 한 번은 실행이 된다//조건식이 뒤에 있으므로    :
      +=======================================================================+

   ③ do until
        +=====================================================+
        :   do until 조건식                                                        :
        :     .......                                                                    :
        :     loop                                                                     :
        : ->조건식이 참이 될때까지 실행//조건이 거짓인 동안   :
        +=====================================================+
        +=====================+
        :   do                          :
        :     .......                    :
        :   loop until 조건         :
        +=====================+

   ④ 분기문(go to문)
        +========================+
        :     go to 문이름              :
        :        ........                     :
        :     문이름                      :
        +========================+
      ex)삼중 loop문...loop가 중첩된 경우

   ⑤ 기타문
        exit : 현재 수행중인 loop탈출
        continue :skip의 개념이 강하다
        +===========================+===========================+
        : ex1) for i=1 to 10                  :       ex2) for i=1 to 10           :
        :          .....                           :         .....                           :
        :       if i=5 then                      :       if i=5 then                    :
        :          exit                           :         continue                    :
        :       end if                           :       end if                          :
        :      sle_1.text=string(i)          :      sle_1.text=string(i)          :
        :      next                              :      next                             :
        :  print=> 1 2 3 4                    : print=>1 2 3 4 6 7 8 9 10        :
        +===========================+===========================+

   11) 추가 연산자
       a=a+1 -> a++  증가
                 --  감소
       a=a*b -> a*=b
                 +=
                 -=
                 /=

!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!

1) 변수
   - 전역변수 :A pp.내에 전반적으로 사용이 가능
     => \declare\global variable에서...
   - 지역변수 : 해당 스크립트문장내에서만 사용가능
    (instance variable) 해당window에서만 사용할 수 있는 변수
                               window가 닫히면 자동소멸!
                               window가 열리면 생성,
     cf) 다른 win에서 참조할 경우->win이름.변수명
        if 다른win이 닫히면 참조한 창도 에러 떨어짐
        why? instance 변수는 창이 없어지면 같이 소멸한다
   - 공용변수 shared variable :해당win에서 사용가능
                              해당win이 open하면 생성,
                              해당win이 close해도 소멸되지 않는다.
2) 함수
   함수명(인수1,인수2,인수3,...)
   - 지역 :\declare\function in window
   - 전역 :아이콘

   ① 사용자함수의 종류
    - 리턴값이 있는 경우 :실행된 결과값을 보여준다 ex)계산
      형식> 함수명(인수1, 인수2, ...) 인수 :함수가 처리해야 하는 값
    - 리턴값이 없는 경우 :반복적인 처리를 많이 하는 경우

   ② 자체함수 : PB함수
     +==============================================+
     : 참고!!! tool bar의 함수 : 전역함수                      :
     :         Declare\Windows Function : 지역함수      :
     :         Declare\Windows Structure : 구조체         :
     +==============================================+

3) 배열
   같은 data형의 변수를 잡아 줄때 모든 변수를 하나의 변수로 잡아준다고 생각
   즉 하나의 보따리에 각각의 보따리를 넣는다고 생각하면...?
   랜덤하게 섞이는것을 막을 수 있다
   ex)학생성적표 관리:여러과목(문자)과 그에 따른 각각의 점수(정수)

4) 구조체
   서로 다른 data형의 변수를 하나의 커다란 변수로 잡는다
   ex)회사의 사원관리
   하나의 사원에 해당하는 것들 (사원이름 주소 성별 나이)->각각의 성질이 다르다

5) Pointer
   - 번지에 있는 값을 전달한다. -> call by value
   - 번지값을 전달해준다 -> call by reference

[출처] 파워빌더 기초 문법!|작성자 연쓰

파워빌더 함수정리

 

 1. 배열(Array) 처리 함수 

LowerBound : 지정한 배열의 하위 경계

UpperBound : 지정한 배열의 상위 경계

 

2. Bolb관련 함수 

Blob        : 텍스트 데이터를 Blob 데이터로 변환 또는 복사

BlobEdit   : PB가 지원하는 데이터를 Blob변수로 복사

BlobMid   : Blob 데이터 문자열에서 N번째 문자를 반환

Len         : 문자열의 길이

 

3. 데이터형 검사 및 변환 함수 

Char         : blob,정수,문자열을 문자로 바꿔서 반환

Dec          : 문자열의 내용을 십진수로 바꿔서 반환

Double      : 문자열의 내용을 Double로 바꿔서 반환

Integer      : 문자열의 내용을 정수로 바꿔서 반환

Long         : 문자열의 내용을 long으로 바꿔서 반환

Real         : 문자열의 내용을 실수로 바꿔서 반환

Date         : 데이터베이스로부터 읽은 DateTime값에서 Date부분만 빼온다.

DateTime   : Date나 Time을 DateTime 값으로 변환한다.

IsDate       : 지정한 문자열이 유효한 Date값을 지녔는지 검사한다.  

IsNull        : 넘어온 인자가 NULL인지 검사한다.

IsNumber   : 지정한 문자열이 숫자값을 지녔는지 검사한다.

IsTime       : 지정한 문자열이 유효한 Time값을 지녔는지 검사한다.

String        : 지정한 형식으로 문자열을 얻는다.

Time         : 데이터베이스로부터 읽은 DateTime값에서 Time부분만 빼온다.

 

4. 날짜,요일,시간 처리 함수 

Day               : 일자를 구한다(1에서 31 사이의 정수)

DayName       : 주간의 요일명을 구한다.

DayNumber    : 주간의 요일을 숫자로 표현한다.(예를들면 일요일은1, 목요일은 5)

DaysAfter       : 지정한 날짜에 n일전,후를 구한다.

Hour             : 주어진 시간의 시 값을 구한다.

Minute          : 주어진 시간의 분 값을 구한다.

Month           : 주어진 날짜의 월 값을 구한다.(1에서 12까지)

Now             : 클라이언트의 시스템 시간을 구한다.

RelativeDate  : 주어진 날짜를 기준으로 n일 후 날짜를 구한다.

RelativeTime  : 주어진 시간을 기준으로 n초 후 시간을 구한다.

Second         : 주어진 시간의 초 값을 구한다.

Today           : 클라이언트의 현재 날짜를 구한다.

Year             : 주어진 날짜의 년 값을 구한다.(1000에서 3000년까지임)

 

5.DDE클라이언트 함수 

CloseChannel        : OpenChannel함수로 열린 DDE서버 어플리케이션의 채널을 닫는다.

ExecRemote          : 서버 어플리케이션에게 명령 실행을 요구한다.

GetDataDDE          : 연결된 서버 어플리케이션으로부터 새로운 데이터를 받아온다.

GetDataDDEOrigin  : 연결된 서버 어플리케이션으로부터 원래의 데이터를 받아온다.

GetRemote            : 서버 어플리케이션에게 데이터를 요구한다.

OpenChannel        : DDE서버 어플리케이션을 연다.

RespondRemote     : 서버에게 명령 또는 데이터가 클라이언트에게 받아들여졌는지를 알려준다.

SetRemote             : 서버 어플리케이션에게 지정한 값을 설정하도록 한다.

StartHotLink           :서버 어플리케이션과의 연결을 시작한다.

StopHotLink           : 서버 어플리케이션과의 연결을 종료한다.

 

6. DDE서버 함수 

GetCommandDDE           : 클라이언트 어플리케이션이 보낸 명령을 구한다.

GetCommandDDEOrigin   :어떤 클라이언트 어플리케이션이 명령을 보냈는지 구한다.

GetDataDDE                  : 클라이언트 어플리케이션이 보낸 데이터를 구한다.

GetDataDDEOrigin          :어떤 클라이언트 어플리케이션이 데이터를 보냈는지 구한다.

RespondRemote            :클라이언트에게 명령 또는 데이터가 서버에게 받아들여졌는지를 알려준다.

SetDataDDE                  : 클라이언트 어플리케이션에게 데이터를 보낸다.

StartServerDDE              :파워빌더를 서버로 동작하게 한다.

StopServerDDE              :파워빌더가 서버로 동작하는 것을 중지한다.

 

7. 파일처리 함수 

FileClose                  : 파일 닫기

FileDelete                 : 파일 삭제

FileExists                 : 파일 존재 유/무

FileLength                : 파일 길이

FileOpen                  : 파일 열기

FileRead                  : 파일 읽기

FileSeek                  : 파일 내 위치 이동

FileWrite                  : 파일에 쓰기

GetFileOpenName     : 파일 열기 공통 다이얼로그 열기

GetFileSaveName     : 파일 저장 공통 다이얼로그 열기

 

8. 라이브러리 함수 

LibraryCreate    : 라이브러리 생성

LibraryDelete    : 라이브러리 삭제

LibrarDirectory  : pb라이브러리 파일의 모든 오브젝트의 리스트를 구한다.

LibraryExport    : 라이브러리 파일의 모든 오브젝트를 Export한다.

Library Import    : 지정한 라이브러리 파일에서 오브젝트를 Import한다.

 

9.MAPI함수 

mailAddress                : 메일 메세지에 주소를 주거나 주소 리스트를 보여준다.

mailDELETEMessage   : 메일 메시지를 지운다.

mailGetMessages        : 메지시 id를 얻어온다.

mailHandle                  : 내부 메일 시스템 핸들을 얻어온다.

mailLogOff                   : 메세징 시스템과의 세션을 끊는다.

mailLogOn                   : 메세징 시스템과의 세션을 시작한다.

mailReadMessage        : 메일 메시지를 읽는다.

mailRecipientDetails      : 지정된 수취인의 주소 정보를 보여준다.

mailResolveRecipient    : 불분명한 수취인 명을 결정한다.

mailSaveMessage        : 사용자 수신함에 새로운 메시지를 생성하거나 기존에 있는 메시지를 대체한다.

mailSend                     : 메일 메시지를 보낸다.

 

10. 수치 처리 함수 

Abs              : 수치의 절대값을 얻는다.

Ceiling         : 지정한 수보다 크거나 같은 최소 정수를 구한다.

Cos             : 주어진 각도의 코사인 값을 구한다.

Exp              : e를 Number만큼 거듭제곱한 값을 구한다.(e=2.71828182845904)

Fact             : 계승값을 구한다. Number의 계승값은 1*2*3*...* Number이다.

Int                : 소수점 이하를 버리고 가장 가까운 정수로 변환한다.

Log              : 지정 숫자의 자연로그값을 구한다.

LogTen         : 지정한 숫자에 대해 밑이 10인 로그값을 구한다.

Max             : 두 수 중 큰 수를 구한다.

Min              : 두 수 중 작은 수를 구한다.

Mod             : 두 수를 나눈 나머지를 구한다.

Pi                 : 3.14159265358979를 구한다.

Rand            : 난수를 구한다.

Randomize    : 난수 발생기를 초기화한다.

Round          : 숫자를 지정한 자릿수로 반올림한다.

Sign             : 숫자의 부호를 결정한다. Number가 양수이면 1을 표시해주고 0이면 0, 음수이면 -1을 표시한다.

Sin               : 주어진 각도의 사인 값을 구한다.

Sqrt              : 양의 제곱근을 구한다.

Tan              : 주어진 각도의 탄젠트 값을 구한다.

Truncate       : 숫자의 소수점 이하를 버리고 정수로 변환한다.

 

 

11. 출력(Print)함수 

Print                  : 현재 글꼴로 문자열을 인쇄한다.

PrintBitmap         : 지정한 인쇄공간에 비트맵 이미지를 인쇄한다.

PrintCancel        : 인쇄를 취소한다.

PrintClose          : 현재 페이지를 프린터에 보내고 인쇄를 멈춘다.

PrintDefineFont    : 인쇄작업시 폰트를 정의한다. 파워빌더는 각각의 인쇄 작업에 대해 8가지 폰트를 제공한다.

PrintLine             : 지정한 위치에 지정한 굵기로 타원을 그린다.

PrintOpen           : 현재 페이지를 프린터에 보내고 새로운 페이지를 셋한다.

PrintOval            : 지정한 위치에 지정한 굵기로 타원을 그린다.

PrintPage           : 지정한 위치에 지정한 굵기로 둥근 모서리의 사각형을 그린다.

PrintRect            : 지정한 위치에 지정한 굵기로 사각형을 그린다.

PrintRouneRect   : 지정한 위치에 지정한 굵기로 둥근 모서리의 사각형을 그린다.

PrintSend           : 지정한 문자열을 프린터에게 보낸다.

PrintSetFont        : 현재 인쇄 작업에 대한 글꼴을 지정한다.

PrintSetSpacing  : 라인간 너비를 지정한다.

PrintSetup          : 프린터 설정 다이얼로그 박스를 부른다.

PrintText            : 지정한 위치에 지정한 문자를 인쇄한다.

PrintWidth          : 현재 글꼴에서 지정된 문자열의 너비를 구한다.

PrintX                : 커서의 X좌표를 구한다.

PtintY                : 커서의 Y좌표를 구한다.

 

 

 

12. 문자열 처리 함수 

Asc        : 문자열의 첫번째 문자의 ASCII값을 구한다.

Char       : 주어진 ASCII값에 해당하는 문자를 구한다.

Fill          : 지정한 문자를 반복시켜서 문자열을 만든다.

Left         : 문자열의 시작부터 지정한 수의 문자를 읽어온다.

LeftTrim   : 문자열의 시작에 있는 공백을 없앤다.

Len         : 문자열의 길이를 구한다.

Lower     : 주어진 문자열 내의 대문자를 소문자로 고친다.

Mid        : 주어진 문자열에서 시작 위치와 끝 위치를 지정해 문자열의 일정 부분만을 구한다.

Pos        : 다른 문자열에서 주어진 문자열의 위치를 찾는다.

Replace  : 문자열의 일부를 다른 문자열로 바꾼다.

Right       : 문자열의 끝에서 주어진 수의 문자를 얻어온다.

RightTrim  : 문자열의 끝에 있는 공백을 없앤다.

Space      : 지정한 길이로 공백 문자열을 얻는다.

Trim         : 문자열의 시작과 끝의 공백을 없앤다.

Upper      : 지정한 문자열 내의 소문자를 대문자로 고친다.

 

 

 

13. 시스템 및 환경 함수(System and Environment) 

Clipboard            : 윈도우의 클립보드의 내용을 얻는다.

GetApplication     : 현재 어플리케이션의 핸들을 구한다.

CommandParm    : 어플리케이션 실행시 지정된 파라미터가 있을 경우 그값을 구한다.

DoScript             : 애플 스크립트(AppleScript)를 실행한다.(매킨토시 버전에만 해당)

GetEnvironment   :시스템의 운영체제와 프로세서 등과 같은 정보를 얻는다.

Handle               : Window SDK함수를 부르기 위해 사용한다.

Post                   : 지정한 윈도우에 대한 메시지를 메시지 큐에 마지막에 삽입한다.

ProfileInt             : 지정한 프로파일에서 숫자값을 얻어온다.

ProgileString       :지정한 프로파일에서 문자열을 얻어온다.

Restart               : 모든 스크립트의 실행을 중지하고, 모든 윈도우를 닫으며 데이터베이스에      Commit한후 연결을 끊고 다시 어플리케이션을 실행시킨다.

Run                   : 지정한 어플리케이션을 실행시킨다.

Send                 : 지정한 윈도우에 메시지를 순차적으로 보낸다.

SetProfileString   : 지정한 프로파일 값을 저장한다.

ShowHelp          : 윈도우 3.x에 있는 도움말(Help)파일을 읽어 파워빌더 어플리케이션에서 사용할 수 있다.

SignalError        : 어플리케이션 레벨에서의 시스템 에러를 발생한다.

Yield                : 반복문 안에서 다른 오브젝트나 어플리케이션의 메시지가 발생 됐는지를 체크할수 있게 한다.

 

 

 

14. 시간처리 함수 

CPU   : 현재 실행중인 PB어플리케이션 프로그램의 시작 시간부터 현재까지의 CPU시간을 구해준다.

Idle    : 사용자가 아무런 입력이 없이 지정한 시간이 흐르면 Idle이벤트 발생시킨다.

Timer  : 지정한 윈도우에 일정한 간격의 타이머를 지정하여 Timer이벤트를 발생시킨다.

 

 

 

15. 그밖의 함수 

Beep              : 정해진 시간(초단위)동안 경고음을 발생한다.

DBHandle        : DBMS의 핸들을 반환한다.

IsValid            : 지정한 윈도우가 열려있는지 검사한다.

KeyDown        : 사용자가 특정한 키를 눌렀는가 검사한다.

MessageBox   : 메시지 박스를 출력한다.

PixelsToUnits   : 픽셀(Pixel)을 PB의 Unit로 바꾼다.

RGB                : 특정 색상을 표현하는 Long형 값을 반환한다.

SetNull            : 변수의 유형에 상관없이 변수를 Null로 지정한다.

SetPointer        : 마우스 포인터를 지정한 모양으로 바꾼다.

TypeOf            : 오브젝트의 형을 결정한다. 예를들면 CheckBox, Picture, RadioButton 등이다.

UnitsToPixels   : PB의 Unit를 픽셀(Pixel)로 바꾼다.

 

 

1. UpperBound(배열명,{배열차원}) : 가끔 사용

   (1) 개념 : 배열의 가장높은 경계값을 알아낸다.

       Option으로 배열의 차원을 지정할 수 있으며 Default 차원은 1차원이다.

 

   (2) Return : integer(배열의 가장높은 경계값)

 

   (3) 예제

       가)

       integer li_number[7] , li_return

       li_return = UpperBound(li_number) // li_return 은 7이 된다.

       나)

       string ls_name[5,6] integer li_return

       li_return = UpperBound(ls_name,1) // li_return 은 5가 된다

       li_return = UpperBound(ls_name,2) // li_return 은 6이 된다

 

   (4) 메모 : 가변길이 선언 배열에서 ( ls_text[] )

   위의 함수를 사용하여 0이 Return되면 배열이 아직 현 메모리에 적재되지 않았음을 의미한다.

 

   (5) 상대함수 : LowerBound()

 

 

2. IsDate(string) : 자주 사용

   (1) 개념 : 특정한 String이 정확한 Date인지를 확인한다.

 

   (2) Return : Boolean ( Date가 맞으면 True 아니면 False이다. )

 

   (3) 예제 boolean lb_check

       lb_check = IsDate("1996/05/22") // lb_check 는 True이다

       lb_check = IsDate("1996/00/22") // lb_check 는 False 이다

 

   (4) 메모 : 특정한 String등을 Date로 변환시키기 직전에 많이 사용한다.

 

   (5) 유사함수 : Isnull() , Isnumber() , Istime() , Isvalid()

 

 

3. Date(datetime) , : 자주사용 Date(string) , Date(year,month,day)

   (1) 개념 : datetime , string , 년월일의 integer값을 Date 변수타입으로 변환한다

 

   (2) Return : Date ( Valid 한 Date가 아닐때는 1900-01-01을 Return한다 )

 

   (3) 예제 datetime ldt_this date ld_new

       ld_new = Date(ldt_this)

       IF ld_new = Date("1900-01-01") THEN

          Messagebox("ERROR",'정확한 일자가 아닙니다 !!')

          return

       END IF

       ld_new = Date("1996/08/15") ld_new = Date(1999,11,23)

 

   (4) 유사함수 : DateTime()

 

 

4. Control명.ClassName() : 가끔사용 ClassName(변수명)

   (1) 개념 : 특정한 Object의 Class명을 String으로 알아낸다.

 

   (2) Return : String ( Error 발생시에는 empty string "" 이 반환된다)

 

   (3) 예제

       가)

       string ls_name

       ls_name = Parent.ClassName()

       IF ls_name = "w_insa001u" THEN

          sle_1.text = ls_name

       END IF

 

       // 어떤 Object의 Dragdrop Event 에서

       string ls_name dragobject ldr_what

       ldr_what = DraggedObject() ls_name = ldr_what.ClassName()

       IF ls_name = 'em_delete' THEN

          ldr_what.Drag(end!) Messagebox("Drag Object",'Drag된 Object 는 '& + ls_name + '입니다')

       END IF

 

       나)

       long ll_qty string ls_class

       ls_class = ClassName(ll_qty) // ls_class 는 'long' 을 받아온다

       ls_class = ClassName(this) // ls_class 는 현 Object 의 Class 명칭을 받아 온다

 

5. Object명.PostEvent(event명) : 자주사용

   (1) 개념 : Script가 쓰여진 현 Event가 끝난뒤 특정 Object의 Event를 수행하게 한다.

       위의 function은 script가 쓰여진 위치에 관계없음으로 그 이후에 어떤 scrip 가 있다면        그것을 모두 수행한후에 실행된다.

 

   (2) Return : Boolean (성공하면 true , event가 없거나 script가 없으면 false)

 

   (3) 예제

       cb_close.PostEvent(clicked!) // object에 기본적으로 있는 event일때

       cb_close.PostEvent("ue_keydown") // User가 정의한 event일때

 

6. Object명.TriggerEvent(event명) : 매우 자주사용

   (1) 개념 : 현 Event에서 어떤 특정Object의 특정Event를 즉각적 수행하고 돌아온다.

       Script가 쓰여진 위치가 중요하다

 

   (2) Return : Boolean (성공하면 true , event가 없거나 script가 없으면 false)

 

   (3) 예제

       cb_check.TriggerEvent(clicked!) // object에 기본적으로 있는 event일때

       cb_check.TriggerEvent("ue_check") // User가 정의한 event일때

 

   (4) 메모 : 어떤 Event의 Script를 수행한다는 면에서는 Postevent와 Triggerevent는 동일하며    두 이벤트 중 어떤것을 써야할지의 선택기준은 현재의 Event가 수행되고 난 뒤 어떤 Event를 이어서 수행시키느냐 (Postevent) , 즉각적으로 어떤 Event를 수행하느냐 (Triggerevent) 의 차이이다.

 

로맨스님 블로그에서 퍼옴

많은 개발툴들이 기본적으로 디버깅모드를 제공하듯이 파워빌더도 역시 디버깅모드를 지원한다. 특정한 변수값을 체크하기위해 MessageBox문을 삽입하는 원시적인 디버깅을 해왔다면, 앞으로는 파워빌더에서 제공하는 디버깅모드를 적극 활용하여 더욱 효율적인 디버깅을 해보도록 하자.
파워빌더 10.5 데모프로그램(<PowerBuilder 설치 폴더>\PowerBuilder 10.5\Code Examples\New DataWindow and UI\pb105demos.pbw)을 기준으로 디버깅 절차를 살펴보도록 하자.

1. 원하는 위치에 Breakpoint를 건다.
   
   
   예제로 w_tvdw_link윈도우를 디버깅하도록 하자.
   w_tvdw_link윈도우를 오픈하고 원하는 스크립트의 위치에서 오른쪽 마우스키를 눌러서 나오는 메뉴중에 Insert Breakpoint라는 메뉴가 있다. 이 메뉴를 클릭하면 소스 스크립트 앞에 빨간점이 마크되는데 이것이 Breakpoint이다.
   디버그모드로 프로그램 실행중 이 위치에서 스크립트 실행을 멈추고 제어권이 파워빌더로 넘어와서 디버깅 작업을 수행할수 있게된다.
   이 예제에서는 Instance변수인 il_OldHeight의 값을 알아보기 위해 il_OldHeight에 값을 설정하는 스크립트에 Breakpoint를 걸어 보자.
    
   
2. 디버그모드로 실행한다.
   파워빌더 툴바의 디버그버튼(벌레모양)을 클릭하거나, 메뉴 Run > Debug {target명}을 클릭하면 Debugger Painter가 열리고, 디버그 툴바가 툴바메뉴에, Debug메뉴가 메뉴에 추가된다.
   
   
   Debug > Start {target명} 메뉴를 선택(단축키 Ctrl+T)하거나, 툴바의 Start {target명}을 클릭하면 디버그모드로 프로그램이 실행된다.
3. 파워빌더는 프로그램 실행중 Breakpoint 위치에서 실행을 멈춘다.
   
   
   스크립트창에 노란색 삼각형은 현재 실행중인 위치를 표시한다. 디버그모드로 실행중 1번에서 설정한 Breakpoint에서 실행을 멈추고 파워빌더로 제어권이 넘어와 Debugger Painter화면으로 이동된 것을 볼수가 있다.
4. Breakpoint위치에서 각 변수들의 값의 확인, Call stack확인, 변수값을 임의로 변경등과 같은 디버깅 작업을 수행한다.
   스크립트 제어툴바를 이용하여 스크립트를 진행해 가면서 각변수의 값을 체크한다.
   Continue(Ctrl+C) : 스크립트의 제어권을 프로그램에 넘겨버려서 프로그램을 실행한다.
   Step In(F8) : 현재 스크립트에서 호출하는 함수나 이벤트의 스크립트 제어권을 넘겨 계속 디버깅 한다. Call Stack에 stack이 하나더 쌓이게 된다.
   Step Over(F10) : 현재 스크립트에서 호출하는 함수나 이벤트로 제어권을 넘기지 않고 다음 라인으로 넘어간다.
   Step Out(Shift+F8) : 현재 스크립트를 호출한 함수나 이벤트쪽으로 스크립트 제어권을 넘겨 계속 디버깅 한다. Call Stack에서 stack이 하나 빠진다.
   Run To Cursor(Ctrl+F10) : 커서가 있는 스크립트까지 실행을 한다.
   Set Next Statement : 한라인씩 스크립트를 실행한다.
   각 툴바의 단축키는 이전버젼(9버젼은 사용한 적이 없어서 잘모르겠으나 8버젼 이번에는 단축키가 Continue만 있었다.)에서는 기본으로 설정이 안되어 있다. 단축키가 있으면 여러모로 편하기 때문에 Tools > Keyboard Shortcuts...에서 단축키를 설정하고 사용하도록 하자. 주의할점은 Debug메뉴는 Debugger Painter를 오픈한 상태에서 활성화 된다는 것이다. Debugger Painter를 열지않은 상태에서는 Debug메뉴가 활성화 되지 않기 때문에 Keyboard Shortcuts창에서 단축키를 설정할 수가 없다.
   
   Debugger Painter에는 여러가지 창들이 있는데 이 창들의 값들은 현재 스크립트 위치의 상태를 상세히 설명해주는 정보들로 가득하다. 이 정보들을 이용해서 프로그램상에 존재하는 버그를 찾는 것은 사람이 할 일이다.
   
   Local : scope가 현재 스크립트(함수, 이벤트)인 local변수와 그 값.
   Global : Global 변수의 값.
   Instance : scope가 현재 오브젝트인 Instance변수와 그 값.
   Parent : 현재 오브젝트의 Parent의 변수와 그 값.
   Shared : 현재 오브젝트의 Shared변수와 그 값.
   Objects In Memory : 현재 메모리상의 오브젝트.
   Call Stack : 현재 실행되는 스크립트의 Call Stack.
   Breakpoints : 현재 타겟에 설정된 Breakpoints의 리스트.
   Watch : 자주 체크하고 싶은 변수를 설정해 두고 일일이 찾는 불편을 감소시킬 목적으로 설정한 변수 리스트.
   
   이중에서 개발과정에서 자주 사용되는 항목은 Local, Instance, Global, Watch 정도가 될 것같다.
   특히 Watch에는 sqlca를 추가해 두면 DB에러를 체크하는데 많은 도움이 될수 있다. sqlca는 Global 변수로 transation sqlca로 정의되어 있다. Watch창에 드래그&드랍하거나,  Debug > Add Watch, 툴바의 Add Watch툴버튼, Global창에서 sqlca선택 후 오른쪽 마우스클릭 후 나오는 팝업메뉴에서 Add Watch(참 종류도 여러가지네!)등의 방법으로 Watch변수로 추가한다.
   
   
   디버깅중에 변수의 값을 임의로 변경하여 프로그램의 로직을 체크하고 싶을 때도 있을 것이다. 값을 변경하고 싶은 변수를 더블클릭하면  Modify Variable팝업이 나타난다. 이 팝업에서 원하는 값으로 변경하여 스크립트를 수행할 수가 있다.
   
   
   예제에서 스크립트의 제어가 라인 16에 있는 상황에서 Local 변수 li_cnt값은 0이다. 이값을 임의로 5로 변경하여 다음 문장인 For루프를 실행하면, For루프를 그냥빠져나가 버리게 된다. 이와 같이 변수의 값을 조정하면서, 해당 변수의 값이 어떻게 되었을 때 프로그램의 흐름이 제대로 이루어지는지 확인해 볼수가 있다.
   
   디버그모드로 실행중에 Breakpoint를 추가하는 작업이 가능하다. Source Browser에서 추가하고자 하는 Source를 열어서 해당 라인을 더블클릭하면 Breakpoint를 추가 할수가 있다. 또한 Breapoint에서 제어가 멈추게하는 조건을 설정할 수가 있는데, Debugger Painter의 Edit Stop()툴버튼이나, Edit > Breakpoint..., Breakpoints창에서 수정할 Breakpoint를 선택후 오른쪽 마우스 클릭하면 나타나는 팝업메뉴에서  Breakpoints...메뉴를 선택하면 Edit Breakpoints팝업창이 실행된다.
   
   
   Occurrence : 해당 Breakpoint를 몇번째 실행될때 스크립트를 멈출 것인지 설정. Occurence에 2를 설정하면 해당 Breakpoint의 스크립트가 첫번째 실행될때는 멈추지 않고 2번째 스크립트가 실행될때 스크립트를 멈추게 된다. 이 옵션은 resize이벤트 처럼 여러번 이벤트가 중복되서 발생하는 경우 유용하게 사용될 수 있을 것 같다.
   Condition : 이 옵션에는 특정 expression을 설정하고, 설정한 expression이 True가 될때에만 스크립트를 멈추는 기능이다. notisNull(val)으로 설정하면 val값이 Null이 아닐때만 해당 Breakpoint가 작동하게된다.
   
   
   Variable탭에서는 특정변수가 변경되었을때 스크립트를 멈추게하는 Breakpoint를 추가하는 화면이다. Debug모드로 실행중 New버튼을 클릭하고, 현재 스크립트상의 변수명을 Variable에 입력하고 Apply 버튼을 클릭하면 'when {Variable} changes'라는 Breakpoint가 추가되는 것을 확인 할 수가 있다.
   
   
   이 Breakpoint는 디버깅모드로 실행을 한 후에만 추가할수 있으며, 디버깅모드로 실행하지 않은 상태에서 Variable을 추가하고 Apply를 클릭하면 "The variable could not be found."라는 메시지만 나오고 Breakpoint는 추가되지 않는다. 반드시 디버깅모드로 실행후에 추가해야 한다는 것을 기억하길 바란다.
5. 디버깅으로 찾은 버그를 수정한다.
   프로그램 버그의 판단과 수정은 전적으로 개발자의 몫이며, 디버깅모드는 개발자의 판단에 도움을 주기위한 툴일뿐이다. 디버그모드로 모든 버그를 제거할수 있다는 오류는 범하지 말기를 바란다. 디버깅 모드의 중단은 Debugger Painter 툴바의 Stop Debugging()툴버튼이나, Debug > Stop메뉴를 선택하면 된다.

지금까지 파워빌더로 디버깅하는 방법을 알아보았다. 디버깅을 잘하는 정도는 없다고 생각한다. 위에 설명한 것은 단지 방법일 뿐이지 이것으로 모든 버그를 잡을 수 있다는 것은 절대 아님을 명심하길 바란다. 가능하면 버그없는 프로그램을 만들어야겠지만, 버그가 적게 프로그래밍 할수는 있을지언정 버그가 전혀없게 프로그래밍하기는 불가능하다는 것이 지금까지의 경험이다. 그래서 이런 디버깅툴의 도움을 받아서 버그를 잡아 버그를 줄여나가는 과정은 개발과정에서 반드시 필요한 과정이다. 버그들이 벌벌떨수 있도록... ^^;

<출처 : http://www.alan-keum.info/tag/Debug >

출처 : 한다의 파워빌더

 

제목 : datawindow의 column 색깔 표현

 

==> datawindow/Modify datawindow / column click(전체선택) / 속성 / font메뉴

   / background color / expression! 빨간색 icon선택/ expression! 에 기술

   / if (getrow() = currentrow(), RGB(255,255,128), RGB(255,255,255))

   / ok click --> 하고 나오면 아이콘 색깔이 연두색(노란색)으로 바뀌어 있음.

 

<< 객체찾기<?xml:namespace prefix = o /><?xml:namespace prefix = o />

==> singlienedit box를 속성에서 visible check를 안하면 안보임

   안보일때 메뉴/design / show invisible을 check하면 보임.

 

<?xml:namespace prefix = o ns = "urn:schemas-microsoft-com:office:office" /> 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (<?xml:namespace prefix = st1 ns = "urn:schemas-microsoft-com:office:smarttags" />Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2008. 03. 28
제     목	IMPORT!		작성자	한단

==> excel 화일을 파워빌더를 이용하여 db에 입력하기

설명 : 1. 엑셀을 실행시키고, data를 입력한다./ 숫자를 입력할 때는 fuction 부분에서

          single quation 를 사용하여 문자로 인식하게 한다. / 파일을 저장할 때 (save as ...)

          / db II-III file의 파일 형식으로 저장.(파워빌더에서 불러오려면)

             2. create table

             3. 파워빌더에서 database를 실행시킴/ tables를 클릭/ 저장할 테이블 선택 / 오른쪽 마우스 클릭

               / Edit data/grid /   밑에 columne들이 나타나면 한 번 클릭해주고

               / 메뉴/rows/import!/select import! file/ 파일형식 클릭/

               엑셀로 저장한 db II-III file을 찾아 열기 클릭.

 

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 03. 28
제     목	SetFocus( )의 변경		작성자	한단

==> SetFocus( ) 주어진 윈도우 또는 오브젝트로 포커스를 변경하는 기능을 수행한다.

    파워빌더의 오브젝트.SetFocus( )와 유사하다. 

Global External Function:

SUBROUTINE SetFocus(long objhandle) LIBRARY "User32.dll"

 

Script:

SetFocus(handle(sle_1))  // This function gets the handle from PB.

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 03. 28
제     목	WinExec( )		작성자	한단

==>이 함수는 주어진 파일명(파일의 경로 포함)을 O/S 트리거에게 전달하며 O/S트리거는

주어진 파일을 실행한후 그 결과를 Return한다. 파워빌더에서는 RUN() 함수를 사용하면 된다.

(i.e. Run("c:\windows\calc.exe") 

 

Global External Function:

FUNCTION uint WinExec(ref string filename, uint wstyle) LIBRARY "kernel32.dll"

 

Script:

string ls_filename

uint rtn, wstyle

 

ls_filename = "c:\windows\calc.exe"  //계산기

wstyle = 1

rtn = WinExec(ls_filename, wstyle)

Messagebox("Return Code", string(rtn))

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 03. 28
제     목	날짜나오게 하기 & 날짜로 조회할때 data 얻기		작성자	한단

==>  edit mask에 날짜 나타나게

     editmask/속성/mask메뉴/mask : xxxx.xx

                            maskdatatype : stringmask!

 

             select TO_CHAR(ADD_MONTHS(SYSDATE, -1),'yyyymm')   

             into :em_year.text  

             from dual;

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 03. 28
제     목	pb에서 sql 실행시키는 방법		작성자	한단

==> 메뉴/database/view/interactive SQL click/ 밑에 창이 뜸

    select * from tab; 작성하고 /위 메뉴 execute click

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 03. 28
제     목	check in & check out 활용		작성자	한단

---------------------------------------------------------------------------

* check in & check out 활용

---------------------------------------------------------------------------

1. 설명

 위의 기능은 여러명이서 S/W를 개발할때 버젼관리 기능의 하나입니다.

파빌 7.0에서는 상단 메뉴의 'SOURCE'를 클릭하면 바로밑에 'CONNECT'라는것이 있습니다.

그것을 선택하여 접속을 해주면, CHACK IN, CHACK OUT 기능을 모두 사용할

수 있습니다. 그리고 접속을 종료하면 해당 기능들은 모두 사용불가로 변합니다.

 

2.설정 방법

 1) 메뉴에서 source에서 connect 를 클릭하면

 2) 조그만 팝업창이 뜨고

 3) 거기서 [pb native]를 선택하고

 4) ok 버튼 클릭

 5) [set current user id] 팝업창이 뜨면

 6) 아이디 (example : 1111)를 입력하고 엔터

 

 7) check out 걸 창을 선택

 8) 마우스 오른쪽 클릭

 9) 메뉴 check out 선택

10) [check out library entries] 창이 뜨고

11) check out할 창이 있는 라이브러리와 다른 라이브러리를 선택

12) 창옆에 check out 표시가 나타남

 

3. 해제

 1) source 메뉴에서

 2) clear check out status 를 선택

 3) 해제

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 05. 19
제     목	단축키		작성자	한단

==> ctrl + tab : 창의 이동(마우스가 창에 있어야)

               속성창에 cursor 가 있으면 tab menu 이동 선택

    tab : 속성창에서 속성들의 선택,, 아래방향

shift + tab : 위 방향

 

ctrl + W : window close

ctrl + Q : 파워빌더 종료

ctrl + R : 실행

ctrl + F : 찾기  ,, ctrl + G : 다음 찾기

ctrl + H : replace

ctrl + L : 컴파일

ctrl + F : 찾기

shift + F10 : 라이브러리

shift + F1 : 블럭설정되어 있는 항목 도움말보기

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 05. 19
제     목	ODBC 설정방법		작성자	한단

1) 어려운 방법

제목 : 오라클과 파워빌더 연결(ODBC로 사용)

 

1. 유저 생성

 

 sqlplus를 실행을 시킨다(system/manager). -->  create user를 하는데 명령어는 create user bae identified by bae ;   (처음 bae는 유저명, 나중 bae는 패스워드)  --> 권한부여,  grant dba to bae ;

---> exit 를 실행시키고 빠져 나온다.

 

2. oralce net8 easy config 에서 환경설정

 

시작/프로그램/oracle for  windows 95/oracle net8easy config를 실행시킨다.  ---> choose action의 라디오 버튼을 add/new service를 선택 -->  choose service name에 bae를 입력 , 다음  클릭  --> baqueath(local database)를 선택,  다음을 클릭 -->다음 클릭 --> database sid :ORCL 상태에서 다음을 클릭 --> test service 를 클릭 -->  user id와 password에 system/manager를 입력하고 text함

 

위 사항은 같고 --> user id와 password에 bae/bae(사용할 db)를 입력하고 text함 ....

 

3.데이터베이스 원본 만들기

 

설정  -->  제어판  -->  ODBC 데이터원본 click   -->

   ⓐ 사용자 DNS tab  ----> 추가 ---> oracle ODBC Driver 선택  ---> 마침 ---> oracle8 ODBC driver setup 창이 뜬다.  거기에서 data source name 에  bae ,    service name 에 bae ,       userid 에  bae 를 입력하 고  ok 클릭.

  ⓑ 시스템 DNS tab  ----> 추가 --> oracle ODBC Driver 선택  ---> 마침 ---> oracle8 ODBC driver setup 창이 뜬다.  거기에서 data source name 에  bae ,    service name 에 bae ,       userid 에  bae 를 입력하 고  ok 클릭.

  ⓒ 파일 DNS tab  ----> 추가 --> oracle odbc driver 선택 --> 다음 클릭 --> 찾아보기 클릭  --> Data Sources 에 파일이름을  bae로 입력하고 저장 ---> 마침 클릭 --> oracle8 odbc driver connect  --> service  name : bae

                                                                           user name       : bae

                                                                      password       : bae 를 입력하고 ok 클릭 하면 생성이 된다.

 

4. 파워빌더에서 만든 bae database에 연결...

주의) 처음으로 ODBC와 연결을 하려면 system/manager로 들어갔다가 나와야 한다.

ⓐ 파워빌더 실행 --> batabase를 클릭 --> installed database interfaces메뉴에서 O84 Oracle 8.0.4/8.0.5 를 클릭 --> 오른쪽 마우스 클릭 --> new profile을 클릭 --> profile name : 아무이름이나 (or korea) bae 로 입력

      Login ID : system

       Password : manager 로 입력하고 apply 클릭 하면 생성이 된다.

오른쪽 마우스 클릭 하여 connect 한다. 

그러면 파워빌더에서 사용할 테이블을 생성하기 위하여 5개의 테이블들이 system/manager에 들어가게 됨.  ---> sqlplus를 실행하여 5개의 테이블이 생성이 되었는지 확인한다. select * from tab;

 

 ⓑ 파워빌더 실행 --> batabase를 클릭 --> installed database interfaces메뉴에서 O84 Oracle 8.0.4/8.0.5 를 클릭 --> 오른쪽 마우스 클릭 --> new profile을 클릭 --> profile name : bae 로 입력

      Login ID : bae

       Password : bae 로 입력하고 apply 클릭 하면 생성이 된다.

오른쪽 마우스 클릭 하여 connect 한다. 

                                                                 

5. application open event에 preview내용을 그대로 copy...............

 

 

2) 다른 쉬운 방법

 

제목 : 오라클과 파워빌더 연결(ODBC로 사용)

 

 

1. 유저 생성

 

시작/프로그램/oracle8 personal edition/oralce navigator를 실행 ---> oracle8 presonal edition를 클릭  -->local batabase를 클릭 --> user에서 오른쪽 마우스 클릭 ,  new를 선택하여 bae를 만듬.

 

2. oralce net8 easy config 에서 환경설정

 

시작/프로그램/oracle for  windows 95/oracle net8easy config를 실행시킨다.  ---> choose action의 라디오 버튼을 add/new service를 선택 -->  choose service name에 bae를 입력 , 다음  클릭  --> baqueath(local database)를 선택,  다음을 클릭 -->다음 클릭 --> database sid :ORCL 상태에서 다음을 클릭 --> test service 를 클릭 -->  user id와 password에 system/manager를 입력하고 text함

 

위 사항은 같고 --> user id와 password에 bae/bae(사용할 db)를 입력하고 text함 ....

 

3. 파워빌더에서 만든 bae database에 연결...

주의) 처음으로 ODBC와 연결을 하려면 system/manager로 들어갔다가 나와야 한다.

ⓐ 파워빌더 실행 --> batabase를 클릭 --> installed database interfaces메뉴에서 O84 Oracle 8.0.4/8.0.5 를 클릭 --> 오른쪽 마우스 클릭 --> new profile을 클릭 --> profile name : 아무이름이나 (or korea) bae 로 입력

      Login ID : system

       Password : manager 로 입력하고 apply 클릭 하면 생성이 된다.

오른쪽 마우스 클릭 하여 connect 한다. 

그러면 파워빌더에서 사용할 테이블을 생성하기 위하여 5개의 테이블들이 system/manager에 들어가게 됨.  ---> sqlplus를 실행(system/manager)하여 5개의 테이블이 생성이 되었는지 확인한다. select * from tab;

 

 ⓑ 파워빌더 실행 --> batabase를 클릭 --> installed database interfaces메뉴에서 O84 Oracle 8.0.4/8.0.5 를 클릭 --> 오른쪽 마우스 클릭 --> new profile을 클릭 --> profile name : bae 로 입력

      Login ID : bae

       Password : bae 로 입력하고 apply 클릭 하면 생성이 된다.

오른쪽 마우스 클릭 하여 connect 한다. 

                                                                 

4. application open event에 preview내용을 그대로 copy...............

 

시스템 명	LOGISTEC-LIS	한단의 파워빌더 (Handan’s powerbuilder)	(주)handanCorporation
분     류	파빌기능		작성일	2002. 05. 19
제     목	clipboard [클립보드, 클립판]		작성자	한단

윈도우를 사용하는 시스템에서 프로그램과 프로그램 사이의 정보 교환을 위하여

사용되는 특별한 형태의 기억 장치. 즉, 프로그램에서는 자신이 가지고 있는 데이터의

일부를 클립보드에 저장할 수 있다. 또한 프로그램에서는 클립보드에 저장되어 있는

데이터를 읽어와서 자신의 데이터로 사용할 수 있다. 따라서 프로그램에서는 클립보드를

사용하여 데이터의 위치를 이동시킬 수도 있고, 다른 프로그램에 전달할 수도 있다.

[출처] 파워빌더 기능예제 (다우빌더) |작성자 어린왕자