|
1. 개발/실행 플랫폼
(1) OS : winows 7
(2) 개발툴 : felphi 7
(3) 사용 Database : firebird 2.1
2. 개발 중인 프로그램 장비 점검표 그레프
3. 질문 내용
안녕하세요?
장비 점검표 이상유무 결과를 O, X 로 체크 하도록 만들었습니다.
이것을 Chart 차트로 그래프를 만드는 과정에서 제동이 걸리는근요 방법은 한번에 퀴리하는 방법을 택했는데
월별로 양호, 불량 카운트에서 값이 제대로 안나옵니다. 분명히 퀴리 구성이 잘못된것 같은데 실력이 부족해서
더이상 진척리 않됩니다. 아래는 변변치못한 소스이고요 첨부파알은 그래프 입니다.그래프를 보시면 불량건수
가 나와야 하는데 월의 날짜수 만 카운트되어 그래프 파고가 일정하게 나옵니다.
01 ~ 12 까지는 월별 이고요 ck_chk1 ~ ck-xhk3번 까지는 양호'o', 불량 'x' 로 DB에 자장된 표시입니다.
var
sSQL : String;
iRow : Integer;
MTSum1 : Array[1..13] of Integer;
i,j : Integer;
iFor : Integer;
begin
for iFor := 1 to 13 do
MTSum1[iFor] := 0;
// 조회하고져하는 날자를 입력하였으면...
sSQL := ' SELECT ' +
' COUNT(DECODE(FIR_MONTH, ''01'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST1, ' +
' COUNT(DECODE(FIR_MONTH, ''02'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST2, ' +
' COUNT(DECODE(FIR_MONTH, ''03'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST3, ' +
' COUNT(DECODE(FIR_MONTH, ''04'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST4, ' +
' COUNT(DECODE(FIR_MONTH, ''05'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST5, ' +
' COUNT(DECODE(FIR_MONTH, ''06'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST6, ' +
' COUNT(DECODE(FIR_MONTH, ''07'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST7, ' +
' COUNT(DECODE(FIR_MONTH, ''08'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST8, ' +
' COUNT(DECODE(FIR_MONTH, ''09'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST9, ' +
' COUNT(DECODE(FIR_MONTH, ''10'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST10,' +
' COUNT(DECODE(FIR_MONTH, ''11'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST11,' +
' COUNT(DECODE(FIR_MONTH, ''12'',CK_CHK1, ''X'',CK_CHK2, ''X'',CK_CHK3, ''X'', 0)) ST12 ' +
' COUNT(FIR_MONTH) MTSUM
' FROM TF_FIREFIG '+
' WHERE FIR_DATE BETWEEN ''' + ME_FIR_Date1.Text + ''' '+
' AND ''' + ME_FIR_Date2.Text + '''';
|
[질문]장비 점검표 그래프로 보기가 참 힘드네요.
