깨비네 마을 ~ 'ㅁ'/

1) 해당 datawindow의 itemchanged 이벤트에 filter 스크립트 작성(entry datawindow에 조회된 데이타 filter) filter컬럼명 : filter_yn CASE "filter_yn" dw_entry.SetReDraw(False) if data = 'Y' then dw_entry.SetFilter("jan_amt 0") else dw_entry.SetFilter("") end if dw_entry.Filter() dw_entry.SetReDraw(True) 2) dw_head에 filter 컬럼 dropdownlistbox로 설정 : state_gb(filter컬럼) state_gb로 선택된 내용으로 조회 후 자동 filter 설정하기 ue_retrieve 이벤트에서 ..

먼저, 1) ue_insert에 순차적으로(마지막row추가) 입력하게 한다 /*===========================================================================*/ /* Event : ue_insert */ /* Description : 추가버튼 클릭시 발생 */ /* Update : 수정불가 */ /*===========================================================================*/ String ls_yymm, ls_div long ll_cur_row, ll_row_count if dw_entry.AcceptText() 1 then return ls_yymm = String(dw_1.object..

해당 datawindow의 constructor event This.of_SetBase(True) This.of_SetSort(True) This.inv_base.of_SetColumnNameSource(2) // header로 sort This.inv_sort.of_SetUseDisplay(True) // dddw같은 경우 display value로 sort This.inv_sort.of_SetColumnHeader(True) // DATAWINDOW COLUMN을 자동으로 Modify Integer i, li_column_count String ls_column_name, ls_modify li_column_count = Integer(This.Describe("DataWindow.Column.Cou..

String ls_path, ls_file blob blob_image, blob_temp long Job, ll_filelen integer li_x, li_y, net, li_loop, i Integer ll_file String ls_yymm Long ll_cnt, ll_chk pointer oldpointer // Declares a pointer variable ls_yymm = String(dw_1.object.yymm[1], 'yyyymm') if isnull(ls_yymm) or trim(ls_yymm) = '' then messagebox("알림", "DOWNLOAD할 년월을 입력하세요") return 1 end if select count(*) into :ll_cnt from tb_ta..

[ 파일 업로드 ] blob blob_temp, blob_tot integer li_filenum, li_index, li_loop String ls_file, ls_filename long ll_filelen, ll_read String ls_yymm Long ll_cnt, ll_rtn pointer oldpointer // Declares a pointer variable ls_yymm = String(dw_1.object.yymm[1], 'yyyymm') if isnull(ls_yymm) or trim(ls_yymm) = '' then messagebox("알림", "UPLOAD 대상 년월을 입력하세요") return 1 end if oldpointer = SetPointer(HourGlass!) ..

[ DB Profile에서 해당 접속 db선택 후 연결시 에러 발생 ] Please connect as the powerbuilder catalog owner. This is necessary for the initial connection to Oracle Grant privileges on the repository. 위와 같은 에러가 나면 1) system계정으로 연결 grant select_catalog_role to 접속user명; 2) 1)번으로 해결이 안되면 profile에서 해당 접속할 db의 system계정으로 접속 후 다시 해당user로 접속한다

완료 메세지만 뜨고 실제로 프로그램 동작 안했을 경우 grant all on PA_PROFIT_DATA_CREATE to public 으로 권한을 준다(실행권한만 따로 줘도 된다) crate public synonym PA_PROFIT_DATA_CREATE for swg.PA_PROFIT_DATA_CREATE 도 같이 준다(요건 SYSTEM계정으로 실행) [[파워빌더 소스]] String Err String Errmsg = space(100) DECLARE calc1_proc PROCEDURE FOR PA_PROFIT_DATA_CREATE.SP_PROFIT_01(:gs_company, :ls_yymm, :gs_userid) ; EXECUTE calc1_proc; // err code와 err msg se..

CREATE OR REPLACE FUNCTION f_Num2Hangul( Number_In Number, Type_IN VARCHAR2 ) RETURN VARCHAR2 IS Return_Val VARCHAR2(62); Curr_Val VARCHAR2(20); i number; j number; Zero_Skip varchar(1); strNum Varchar(1); BEGIN return_Val := ''; Curr_Val := ''; strNum := ''; if Number_In > 0 then Curr_Val := ltrim(rtrim(replace(to_char(Number_In),',',''))); i := Lengthb(Curr_Val); j := Lengthb(Curr_Val); loop Z..

DECLARE calcu_proc1 PROCEDURE FOR PA_20001.sp_20001('1', '1', :ls_Now_Month, :gs_company, :gs_userid, & :current_dt, :gs_ip_add ); EXECUTE calcu_proc1; SELECT PA_20001.SF_sp_20001_10('1'), PA_20001.SF_sp_20001_10('2') INTO :Err, :ErrMsg FROM dual; IF Integer(Err) 0 THEN rollback; MessageBox("오류", Trim(Errmsg)) ls_check = '0' dw_entry.object.info_1[1] = '오류' ELSE COMMIT; dw_entry.object.info_1[1]..