Q&A
- 데이타베이스
query1.last를 사용했는데요
제대로 작동하지 못할때가 많습니다.
어떨때는 제대로 자료를 찾고 또 못찾구....
다른 방법이 있을까요
일자별로 순번을 자동으로 되도록 하는 방법인데요
c/s환경입니다.
그러니까 해당 테이블에서 일자별로 검색해서 가장마지막 레코드에
+1 하는거요...
소스 검토해보시고요 문제점이 있는지 알려주시면
평생(????)은혜 잊지 않을께용~~~ 새해 복 마니마니 받으세요~~~
Try
with Query1, Query1.sql do
begin
Close;
Clear;
add(' SELECT * ');
add(' FROM tacbdm ');
add(' WHERE tacdate2 LIKE :A ');
add(' ORDER BY tac_code,tacdate2 ');
params[0].asstring :=MaskEdit5.Text;//일자
Open;
if Query1.Recordcount <> 0 then
begin
Query1.last;
tacnoch:=query1.fieldbyname('tac_no2').asstring;
Inccode := strtoint(copy(query1.fieldbyname('tac_no2').asstring,
9, 4));
taccode := MaskEdit5.text+format('%.4d',[inccode+1]);
end else
begin
Inccode := Strtoint('0000');
taccode := MaskEdit5.text+Format('%.4d',[Inccode+1]);
end;
end; //begin....end...
Except
Showmessage('자료를 open 할수없습니다.-종료합니다-');
end; //try except end...
제대로 작동하지 못할때가 많습니다.
어떨때는 제대로 자료를 찾고 또 못찾구....
다른 방법이 있을까요
일자별로 순번을 자동으로 되도록 하는 방법인데요
c/s환경입니다.
그러니까 해당 테이블에서 일자별로 검색해서 가장마지막 레코드에
+1 하는거요...
소스 검토해보시고요 문제점이 있는지 알려주시면
평생(????)은혜 잊지 않을께용~~~ 새해 복 마니마니 받으세요~~~
Try
with Query1, Query1.sql do
begin
Close;
Clear;
add(' SELECT * ');
add(' FROM tacbdm ');
add(' WHERE tacdate2 LIKE :A ');
add(' ORDER BY tac_code,tacdate2 ');
params[0].asstring :=MaskEdit5.Text;//일자
Open;
if Query1.Recordcount <> 0 then
begin
Query1.last;
tacnoch:=query1.fieldbyname('tac_no2').asstring;
Inccode := strtoint(copy(query1.fieldbyname('tac_no2').asstring,
9, 4));
taccode := MaskEdit5.text+format('%.4d',[inccode+1]);
end else
begin
Inccode := Strtoint('0000');
taccode := MaskEdit5.text+Format('%.4d',[Inccode+1]);
end;
end; //begin....end...
Except
Showmessage('자료를 open 할수없습니다.-종료합니다-');
end; //try except end...
1
COMMENTS
(NOTICE) You must be logged in to comment on this post.
-
- Welcome
- 1999.12.30 19:43
- 0 COMMENTS
- /
- 0 LIKES
-
- 박성훈
- •
- 1999.12.30 19:32
- 1 COMMENTS
- /
- 0 LIKES
-
화앙비홍•1999.12.30 19:52박성훈 wrote: > 판매데이타를 가지고 있는 파라독스 테이블이 월별로 만들어 집니다. 그런데 사용자는 ...
-
- 초보
- •
- 1999.12.30 19:29
- 1 COMMENTS
- /
- 0 LIKES
-
이대선•1999.12.30 21:10초보 wrote: > MediaPlayer를 사용하여 Panel부분에 Avi을 나타나게 하려고 하는 데 > avi파일 화면만큼 ...
-
- 박성훈
- •
- 1999.12.30 19:16
- 3 COMMENTS
- /
- 0 LIKES
-
혀노•1999.12.30 19:26테이블을 DBGrid와 연결 시켰다면,,,, 테이블 이벤트를 찾아보시면 OnCalcField 이벤트가 있을거에요 ...
-
지희•1999.12.31 02:58> 박성훈 wrote: > > 회원과 직원테이블에(파라독스,델파이3) 생일구분과 결혼기념일 구분필드가 있습니다...
-
코지민•1999.12.30 21:05> 박성훈 wrote: > > 회원과 직원테이블에(파라독스,델파이3) 생일구분과 결혼기념일 구분필드가 있습니다...
-
- 넘황당
- 1999.12.30 19:04
- 0 COMMENTS
- /
- 0 LIKES
-
- 엄화용
- •
- 1999.12.30 18:36
- 1 COMMENTS
- /
- 0 LIKES
query1.last를 사용했는데요 제대로 작동하지 못할때가 많습니다. 어떨때는 제대로 자료를 찾고 또 못찾구.... 다른 방법이 있을까요 일자별로 순번을 자동으로 되도록 하는 방법인데요 c/s환경입니다. 그러니까 해당 테이블에서 일자별로...-
엄화용•1999.12.30 19:18엄화용 wrote: > query1.last를 사용했는데요 > 제대로 작동하지 못할때가 많습니다. > 어떨때...
-
-
- 호
- 1999.12.30 12:33
- 0 COMMENTS
- /
- 0 LIKES
-
- 유니
- 1999.12.30 09:24
- 0 COMMENTS
- /
- 0 LIKES
-
- 정연섭
- 1999.12.30 08:46
- 0 COMMENTS
- /
- 0 LIKES
-
- 맨발의 청춘
- 1999.12.30 05:26
- 0 COMMENTS
- /
- 0 LIKES
-
- 호
- •
- 1999.12.30 05:00
- 2 COMMENTS
- /
- 0 LIKES
-
젠키•1999.12.30 19:44호 wrote: > 안녕하세요? > 퀵레포트를 사용하다가 보니 숫자 출력할 때 3자리 마다 ,를 삽입할 수가 > ...
-
유도삼•1999.12.30 05:25호 wrote: > 안녕하세요? > 퀵레포트를 사용하다가 보니 숫자 출력할 때 3자리 마다 ,를 삽입할 수가 > ...
-
- 신재식
- •
- 1999.12.30 04:31
- 3 COMMENTS
- /
- 0 LIKES
-
김주석•1999.12.30 20:16신재식 wrote: > 네트워크로 오라클 데이타베이스 시스템(7.2.3.0)에 접속하여 쿼리를 한 결과의 한글이 ...
-
DBIB•1999.12.30 18:38신재식 wrote: > 네트워크로 오라클 데이타베이스 시스템(7.2.3.0)에 접속하여 쿼리를 한 결과의 한글이 ...
-
젠키•1999.12.30 19:40bde설정에서 langdriver를 'Paradox Korea 949' 설정하여 사용하시기 바랍니다.
-
- 김민호
- •
- 1999.12.30 04:11
- 1 COMMENTS
- /
- 0 LIKES
-
박성훈•1999.12.30 19:21김민호 wrote: > 새해 복 마니 받으세요..... > spinedit는 수를 증감시키는데.. > 거기에다 Data형을 ...
-
- 오명석
- •
- 1999.12.30 02:23
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•1999.12.30 03:00오명석 wrote: > TPrint 인쇄에 관해 > > 스트링그리드의 내용을 인쇄할려고 하는데 그리드 행에서 각 ...
-
- 국경훈
- •
- 1999.12.30 02:13
- 1 COMMENTS
- /
- 0 LIKES
-
구창민•1999.12.30 02:56국경훈 wrote: > > 델파이 초보개발자 입니다. > 문자열을 받아서 이것들을 특정 문자(;)를 이용해서...
-
- 여용구
- •
- 1999.12.30 01:52
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.12.30 01:57이 질/답게시판에서 검색을... 여용구 wrote: > 드라이브의 남은 용량을 체크하고 싶습니다. 어떻게 해...
-
- 김지현
- •
- 1999.12.30 00:19
- 1 COMMENTS
- /
- 0 LIKES
-
김주석•1999.12.30 01:06procedure GP_EXCEL_DATA (form_name : TForm ; var qry_name : TQuery ; ...
-
- 김주석
- 1999.12.30 00:05
- 0 COMMENTS
- /
- 0 LIKES
-
- 강정훈
- •
- 1999.12.29 23:58
- 1 COMMENTS
- /
- 0 LIKES
-
안치봉•1999.12.30 01:10스트링그리드의 Objects 라는 속성을 이용하세요. 가각의 셀에 부합하는 정보를 넣는곳인데... 형을 보...
> query1.last를 사용했는데요
> 제대로 작동하지 못할때가 많습니다.
> 어떨때는 제대로 자료를 찾고 또 못찾구....
> 다른 방법이 있을까요
> 일자별로 순번을 자동으로 되도록 하는 방법인데요
> c/s환경입니다.
>
> 그러니까 해당 테이블에서 일자별로 검색해서 가장마지막 레코드에
> +1 하는거요...
> 소스 검토해보시고요 문제점이 있는지 알려주시면
> 평생(????)은혜 잊지 않을께용~~~ 새해 복 마니마니 받으세요~~~
>
>
>
>
> Try
> with Query1, Query1.sql do
> begin
> Close;
> Clear;
> add(' SELECT * ');
> add(' FROM tacbdm ');
> add(' WHERE tacdate2 LIKE :A ');
> add(' ORDER BY tac_code,tacdate2 ');
> params[0].asstring :=MaskEdit5.Text;//일자
> Open;
>
> if Query1.Recordcount <> 0 then
> begin
> Query1.last;
> tacnoch:=query1.fieldbyname('tac_no2').asstring;
> Inccode := strtoint(copy(query1.fieldbyname('tac_no2').asstring,
> 9, 4));
> taccode := MaskEdit5.text+format('%.4d',[inccode+1]);
> end else
> begin
> Inccode := Strtoint('0000');
> taccode := MaskEdit5.text+Format('%.4d',[Inccode+1]);
> end;
> end; //begin....end...
>
> Except
> Showmessage('자료를 open 할수없습니다.-종료합니다-');
> end; //try except end...
* 이론...글쎄 ...
제가 order by를 잘못했습니다.
tac_no2로 했어야 했는데
결과값이 제대로 나오네요...
죄송합니다.