Powerbuilder2010. 8. 29. 16:28

Where 좌변 Case문.




 WHERE ( A.F20CRT BETWEEN :as_date_dt_from AND :as_date_dt_to
      AND   ( V.ZC3CEM  LIKE :as_empno OR V.ZC3CEM2  LIKE :as_empno )
      AND   A.F20QDP BETWEEN :as_dept_cd_from AND :as_dept_cd_to
      AND   (CASE IFNULL(A.F20DOCN, '') WHEN '' THEN 'Y' ELSE 'N' END) = :as_erp_yn
      AND    A.F20STS    LIKE :as_sts )
        OR ( A.F20PRN = :as_key )
  WITH UR
저작자표시 비영리 변경금지
Posted by Julyus
2010. 8. 25. 13:50

우클릭으로 DW 정보 얻기

보호되어 있는 글입니다.
내용을 보시려면 비밀번호를 입력하세요.

2010. 8. 22. 17:37

이메일 보내기 from CAPS

보호되어 있는 글입니다.
내용을 보시려면 비밀번호를 입력하세요.

2010. 8. 9. 10:20

CAPS TEC src

보호되어 있는 글입니다.
내용을 보시려면 비밀번호를 입력하세요.

Powerbuilder2010. 8. 2. 23:17

PB SSC 소스컨트롤 오류

C:\Windows\pbshr105.dll 를 지우세요

소스 컨트롤 오류

scc SCC 오류
저작자표시 비영리 변경금지
Posted by Julyus
Powerbuilder2010. 7. 20. 09:49

DW TabOrder 동적으로 넣어주기.



dw_main.modify("r30ssyb.tabsequence=50 ")




저작자표시 비영리 변경금지
Posted by Julyus
2010. 7. 15. 21:36

선택한 컬럼의 내용을 클립보드에 담기.

보호되어 있는 글입니다.
내용을 보시려면 비밀번호를 입력하세요.

Powerbuilder2010. 7. 14. 20:34

dw 컬럼 동적 변동 및 sort()



ls_gbn2 = func.of_nvl(this.GetItemString(row, 'gbn2'   ), 'LEAC')
dw_main.SetRedraw(FALSE)
If ls_gbn2 = 'LEAC' Then
dw_main.Modify("t_leac.X='"+ String(Long(dw_main.Describe("t_prd.X")) + Long(dw_main.Describe("t_prd.Width")) + 13)+"'")
dw_main.Modify("t_leacnm.X='"+ String(Long(dw_main.Describe("t_leac.X")) + Long(dw_main.Describe("t_leac.Width")) + 13)+"'")
dw_main.Modify("t_dta.X='"+ String(Long(dw_main.Describe("t_leacnm.X")) + Long(dw_main.Describe("t_leacnm.Width")) + 13)+"'")
dw_main.Modify("leac.X='"+ String(Long(dw_main.Describe("prd.X")) + Long(dw_main.Describe("prd.Width")) + 13)+"'")
dw_main.Modify("leacnm.X='"+ String(Long(dw_main.Describe("leac.X")) + Long(dw_main.Describe("leac.Width")) + 13)+"'")
dw_main.Modify("dta.X='"+ String(Long(dw_main.Describe("leacnm.X")) + Long(dw_main.Describe("leacnm.Width")) + 13)+"'")
dw_main.SetSort("dcd asc, leac asc, dta asc")
dw_main.Sort()
ElseIf ls_gbn2 = 'DTA' Then
dw_main.Modify("t_dta.X='"+ String(Long(dw_main.Describe("t_prd.X")) + Long(dw_main.Describe("t_prd.Width")) + 13)+"'")
dw_main.Modify("t_leac.X='"+ String(Long(dw_main.Describe("t_dta.X")) + Long(dw_main.Describe("t_dta.Width")) + 13)+"'")
dw_main.Modify("t_leacnm.X='"+ String(Long(dw_main.Describe("t_leac.X")) + Long(dw_main.Describe("t_leac.Width")) + 13)+"'")
dw_main.Modify("dta.X='"+ String(Long(dw_main.Describe("prd.X")) + Long(dw_main.Describe("prd.Width")) + 13)+"'")
dw_main.Modify("leac.X='"+ String(Long(dw_main.Describe("dta.X")) + Long(dw_main.Describe("dta.Width")) + 13)+"'")
dw_main.Modify("leacnm.X='"+ String(Long(dw_main.Describe("leac.X")) + Long(dw_main.Describe("leac.Width")) + 13)+"'")
dw_main.SetSort("dcd asc, dta asc, leac asc")
dw_main.Sort()
End If
dw_main.SetRedraw(TRUE)
저작자표시 비영리 변경금지
Posted by Julyus
Powerbuilder2010. 7. 13. 10:15

array의 row갯수만큼 For문 돌리기







For ll_i = 1 To UpperBound(ls_pgm_id[])
Next
저작자표시 비영리 변경금지
Posted by Julyus
Powerbuilder2010. 7. 12. 20:50

dw Parameter (매개변수)를 Array로 넘기기.



/*호출*/
ll_rv = this.Retrieve(ls_pgm_ary[])


/*dw SQL*/
SELECT M.PGM_ID, M.PGM_USE_YN
  FROM CLVDTALB.PF_PGM_MST M
 WHERE M.PGM_ID IN (:AS_PGM_ID)
AND M.PGM_NO IN (SELECT MB.PGM_NO FROM CLVDTALB.PF_PGM_BTN MB WHERE MB.PGM_NO = M.PGM_NO AND MB.BTN_USE_YN = 'Y')
AND M.PGM_NO IN (SELECT MR.PGM_NO FROM CLVDTALB.PF_PGM_ROLE MR WHERE MR.PGM_NO = M.PGM_NO )


/*Arguments*/
Arguments=(("AS_PGM_ID", String Array))
저작자표시 비영리 변경금지
Posted by Julyus

티스토리툴바