เว็บมาสเตอร์ ช่วยหน่อยครับ

[aphichai]

อยากทราบคำตอบของ 1982 เมื่อถอดรหัส bcd 8421  มีค่าเท่ากับเท่าไหร่

[ปวดตับ]

ป๋าดดดดดดดด 

[nuifish]

--drop view mandesc;
--drop view MEMBDESC;

--insert into ACCPORT_DET2
-- select mRecNo,detNo,AcID,DivID,Mem_ID,oprRecNo,
--            dttype,drtype,intMrk,postInf,LeftOffset,
--            Descp,Detail,DetAmt,Amt,billRecNo,Sflag
-- from ACCPORT_DET
-- where mrecno in (select recno from ACCPORT where AcDate>='01/04/2546')

--drop View AccPrePORT;
--
--create View AccPrePORT
-- as
--select recno,ACDATE,TRTYPE,CMP_ID,DETNO,ACID,DIVID,MEM_ID,dttype,
--       drtype as CrItem,
--       case when DRTYPE='0' then DETAMT
--                       else 0.00
--       end as DrAmt,
--       case when DRTYPE='1' then DETAMT
--                       else 0.00
--       end as CrAmt,
--       case when DTTYPE='csh' then DETAIL
--                              else AcName
--       end as Detail,Data
-- from (
--select a.*,b.*,b.descp as Data,
--   (select Name from ACCOUNT c where c.AcNo=b.AcID and c.cmp_id in ('000',a.cmp_id)) as AcName
--  from ACCPORT a left join ACCPORT_DET b on b.mrecno=a.recno
--
--select a.*,b.*,c.Name as AcName,b.descp as Data
--  from ACCPORT a left join ACCPORT_DET b on b.mrecno=a.recno,ACCOUNT c
-- where c.AcNo=b.AcID and c.cmp_id in ('000',a.cmp_id)
--
-- ) a;
--
--GRANT SELECT ON AccPrePORT TO PUBLIC WITH GRANT OPTION;

drop View MberStock;

create View MberStock
 as
select mbrecno,sum(balance) as totStock
  from STOCK
group by mbrecno;

GRANT SELECT ON MberStock TO PUBLIC WITH GRANT OPTION;

drop View MbStockDetail;

create View MbStockDetail
 as
select * from MBER_DETAIL
 where status_flag='A'
   and masrec>=0
   and dtype<>'L';

GRANT SELECT ON MbStockDetail TO PUBLIC WITH GRANT OPTION;

drop View MbLoanDetail;

create View MbLoanDetail
 as
select * from MBER_DETAIL
 where status_flag='A'
   and masrec>0
   and dtype='L';

GRANT SELECT ON MbLoanDetail TO PUBLIC WITH GRANT OPTION;

drop View WrtCount4Loan;

create View WrtCount4Loan
 as
select Loan_Recno as LoanRecNo,count(*) as items
  from MEM_WARRANTEE
 where status_flag not in ('x','X')
group by Loan_RecNo;

GRANT SELECT ON WrtCount4Loan TO PUBLIC WITH GRANT OPTION;

drop View DvdMbDetail;

create View DvdMbDetail
 as
select a.mem_id as mem_no,dtdate,trtype,
       bfwBal as BfwAmt,AddAmt,SubAmt,
       bal as balAMt,CAPAVR as DivDAmt,
       TIMECNT as stckAge,a.FEE DivDrate,
       b.div_id as div_no,b.cmp_id,a.recno,a.mbrecno,
       b.StockBal,b.intsum,b.intprj,b.Dividends_flag as DvdFlg
  from Mber_Detail a left join MemBer b on b.RecNo=a.MbRecNo
 where a.dtype<>'L'
   and a.status_flag<>'X';

GRANT SELECT ON DvdMbDetail TO PUBLIC WITH GRANT OPTION;

--drop View MBER_DVDREFUND_SUM;
--
--create View MBER_DVDREFUND_SUM
-- as
--select * from (
-- select a.cmp_id,a.Div_No,a.Mem_No,a.mbRecNo,bfdate,bldate,
--        case when stckflag='N' then BfDvd else 0.00 end as BfDvdAmt,
--        case when stckflag='N' then nwDvd else 0.00 end as nwDvdAmt,
--        case when mainiflag='N' then MainiRef else 0.00 end as amIntRef,
--        case when prjiflag='N' then prjiRef else 0.00 end as prjIntRef
--   from MBER_DVDREFUND a
-- where statusflag='N'
--     and nwDvd>=0.00
-- ) a;
--
--GRANT SELECT ON MBER_DVDREFUND_SUM TO PUBLIC WITH GRANT OPTION;

drop View mDiviSion;

create View mDivision
 as
SELECT da.CMP_ID,da.DIV_NO,da.NAME,da.ACCHQ,
       case when substr(Div_NO,2,5)='00000' then '' else
        (select Name from DIVISION ma
          where ma.cmp_id=da.cmp_id
            and ma.Div_No=substr(da.Div_No,1,1) || '00000') end as EduDistName,
       case when substr(Div_NO,3,4)='0000'  then '' else
        (select Name from DIVISION ma
          where ma.cmp_id=da.cmp_id
            and ma.Div_No=substr(da.Div_No,1,2) || '0000')  end as AumPhur
 FROM DIVISION da;

GRANT SELECT ON mDivision TO PUBLIC WITH GRANT OPTION;

drop View AccDlytrn;

create view AccDlytrn
 as
select cmp_id,acdate,acid,
       sum(DrAmt) as drAmt,
       sum(CrAmt) as crAmt,
       count(*) as items,
       trtype,drtype,postinf from (

 select a.cmp_id,a.trtype,a.acdate,a.sflag as aflag,b.*,
           case drtype when '1' then detamt
                       else 0.00 end as DrAmt,
           case drtype when '0' then detamt
                       else 0.00 end as CrAmt
    from ACCPORT a left join ACCPORT_DET b
       on b.mrecno=a.recno

) aa
 where aa.aflag='A'
 group by cmp_id,acdate,acid,trtype,drtype,postinf;

GRANT SELECT ON AccDlytrn TO PUBLIC WITH GRANT OPTION;
-- ==================================
--drop View MasLoan;

drop View MasStckLoan;

create View MasStckLoan
 as
select a.* from (
select a.Mem_ID,a.mbrecno,a.recno,a.loan_no,a.loan_no_ext,a.Apply_Date as ApplyDate,
       a.Last_Update as LastUpdate,a.Last_IntDate as LsIntDate,a.due_Date as dueDate,
       a.instalment as Lsinstalment,a.INT_CASE as paytype,
       a.Balance as CapOutsBal,b.Req_Case as ReqCase,b.cmp_id,b.Div_ID as DivID,'L' as datatype,
       case b.REQ_CASE when 'S' then 0.00
                       when 'H' then 0.00
       else a.PayMent
       end as lsPayMent,a.memo,a.wrttype,BFW_BALANCE as BfwCap
 from Loan a left join MEMBER b on b.recno=a.mbrecno
union
select a.Mem_ID,a.mbrecno,a.recno,'หุ้น' as loan_no,0 as loan_no_ext,a.Apply_Date as ApplyDate,
       a.Last_Update as LastUpdate,current Date as LsIntDate,current Date as dueDate,
       a.INSTALMENT as Lsinstalment,' ' as paytype,
       a.BALANCE as CapOutsBal,b.REQ_CASE as ReqCase,b.cmp_id,b.Div_ID as DivID,
       a.STCK_TYPE as datatype,
       case b.REQ_CASE when 'S' then 0.00
                       when 'H' then 0.00
                       when 'T' then 0.00
       else a.PAYMENT
       end as lsPayMent,a.memo,'_' as wrttype,BFW_BALANCE as BfwCap
 from Stock a left join MEMBER b on b.recno=a.mbrecno
) a;

GRANT SELECT ON MasStckLoan TO PUBLIC WITH GRANT OPTION;
-- ==================================
--select a.mbrecno,a.recno,a.Loan_No,a.loan_no_Ext,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.tmeNO
--            else  a.lstime
--           end as lstime,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.SubAmt
--            else  a.LSPAYMENT
--           end as LastPayMth,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.BAL
--            else a.CapOutSBAL
--           end as LsOutsBal,
--           a.ApplyDate,a.LastUpDate,
--           b.mxRecNo,b.dtdate,b.TRTYPE
-- from (
--select  mbrecno,recno,Loan_No,loan_no_Ext,ApplyDate,LastUpDate,lsInstalment as lstime,LSPAYMENT,CapOutSBAL,ReqCase
--   from MASLOAN
--  where ApplyDate<='31/07/2546') a
-- left join (
--  select a.mxRecNo,b.* from (
--   select mbrecno,dtype,masrec,mRefID,max(RecNo) as MxRecNo
--      from MBER_DETAIL
--    where dtdate<='31/07/2546'
--        and dtype='L'
--   group by  mbrecno,dtype,masrec,mRefID) a
-- left join MBER_DETAIL b
--         on b.recno=a.mxRecNo) b
--         on b.masrec=a.recno
-- order by a.mbrecno desc,a.Loan_No,a.Loan_No_Ext
-- fetch first 10 rows only;
-- ==================================
drop view WRT_DAILYFUND;

create view WRT_DAILYFUND
 as
select aa.*,dm.areaDiv
 from (select mb.mem_no,mb.div_id,1 as itmQty,wf.*
             from MEM_WRTFUND wf left join MEMBER mb
                on mb.recno  =wf.mbrecno
              and mb.cmp_id=wf.cmp_id) aa
 left join DIVISION dm
         on dm.cmp_id=aa.cmp_id
       and dm.div_no=aa.div_ID;

GRANT SELECT ON WRT_DAILYFUND TO PUBLIC WITH GRANT OPTION;
-- ==================================
drop View PaidWrtFUND;

create View PaidWrtFUND
 as
select mbrecno,substr(docno,1,2) as LoanGrp,sum(addAmt)-sum(subAmt) as paid
  from MEM_WRTFUND
where status_flg<>'X'
group by mbrecno,substr(docno,1,2);

GRANT SELECT ON PaidWrtFUND TO PUBLIC WITH GRANT OPTION;  

[ร้านสปื๋วฟิชชิ่งช็อป]

อ๊ากกกกกกกกก!!!!!!!!!

[bm farm]

--drop view mandesc;
--drop view MEMBDESC;

--insert into ACCPORT_DET2
-- select mRecNo,detNo,AcID,DivID,Mem_ID,oprRecNo,
--            dttype,drtype,intMrk,postInf,LeftOffset,
--            Descp,Detail,DetAmt,Amt,billRecNo,Sflag
-- from ACCPORT_DET
-- where mrecno in (select recno from ACCPORT where AcDate>='01/04/2546')

--drop View AccPrePORT;
--
--create View AccPrePORT
-- as
--select recno,ACDATE,TRTYPE,CMP_ID,DETNO,ACID,DIVID,MEM_ID,dttype,
--       drtype as CrItem,
--       case when DRTYPE='0' then DETAMT
--                       else 0.00
--       end as DrAmt,
--       case when DRTYPE='1' then DETAMT
--                       else 0.00
--       end as CrAmt,
--       case when DTTYPE='csh' then DETAIL
--                              else AcName
--       end as Detail,Data
-- from (
--select a.*,b.*,b.descp as Data,
--   (select Name from ACCOUNT c where c.AcNo=b.AcID and c.cmp_id in ('000',a.cmp_id)) as AcName
--  from ACCPORT a left join ACCPORT_DET b on b.mrecno=a.recno
--
--select a.*,b.*,c.Name as AcName,b.descp as Data
--  from ACCPORT a left join ACCPORT_DET b on b.mrecno=a.recno,ACCOUNT c
-- where c.AcNo=b.AcID and c.cmp_id in ('000',a.cmp_id)
--
-- ) a;
--
--GRANT SELECT ON AccPrePORT TO PUBLIC WITH GRANT OPTION;

drop View MberStock;

create View MberStock
 as
select mbrecno,sum(balance) as totStock
  from STOCK
group by mbrecno;

GRANT SELECT ON MberStock TO PUBLIC WITH GRANT OPTION;

drop View MbStockDetail;

create View MbStockDetail
 as
select * from MBER_DETAIL
 where status_flag='A'
   and masrec>=0
   and dtype<>'L';

GRANT SELECT ON MbStockDetail TO PUBLIC WITH GRANT OPTION;

drop View MbLoanDetail;

create View MbLoanDetail
 as
select * from MBER_DETAIL
 where status_flag='A'
   and masrec>0
   and dtype='L';

GRANT SELECT ON MbLoanDetail TO PUBLIC WITH GRANT OPTION;

drop View WrtCount4Loan;

create View WrtCount4Loan
 as
select Loan_Recno as LoanRecNo,count(*) as items
  from MEM_WARRANTEE
 where status_flag not in ('x','X')
group by Loan_RecNo;

GRANT SELECT ON WrtCount4Loan TO PUBLIC WITH GRANT OPTION;

drop View DvdMbDetail;

create View DvdMbDetail
 as
select a.mem_id as mem_no,dtdate,trtype,
       bfwBal as BfwAmt,AddAmt,SubAmt,
       bal as balAMt,CAPAVR as DivDAmt,
       TIMECNT as stckAge,a.FEE DivDrate,
       b.div_id as div_no,b.cmp_id,a.recno,a.mbrecno,
       b.StockBal,b.intsum,b.intprj,b.Dividends_flag as DvdFlg
  from Mber_Detail a left join MemBer b on b.RecNo=a.MbRecNo
 where a.dtype<>'L'
   and a.status_flag<>'X';

GRANT SELECT ON DvdMbDetail TO PUBLIC WITH GRANT OPTION;

--drop View MBER_DVDREFUND_SUM;
--
--create View MBER_DVDREFUND_SUM
-- as
--select * from (
-- select a.cmp_id,a.Div_No,a.Mem_No,a.mbRecNo,bfdate,bldate,
--        case when stckflag='N' then BfDvd else 0.00 end as BfDvdAmt,
--        case when stckflag='N' then nwDvd else 0.00 end as nwDvdAmt,
--        case when mainiflag='N' then MainiRef else 0.00 end as amIntRef,
--        case when prjiflag='N' then prjiRef else 0.00 end as prjIntRef
--   from MBER_DVDREFUND a
-- where statusflag='N'
--     and nwDvd>=0.00
-- ) a;
--
--GRANT SELECT ON MBER_DVDREFUND_SUM TO PUBLIC WITH GRANT OPTION;

drop View mDiviSion;

create View mDivision
 as
SELECT da.CMP_ID,da.DIV_NO,da.NAME,da.ACCHQ,
       case when substr(Div_NO,2,5)='00000' then '' else
        (select Name from DIVISION ma
          where ma.cmp_id=da.cmp_id
            and ma.Div_No=substr(da.Div_No,1,1) || '00000') end as EduDistName,
       case when substr(Div_NO,3,4)='0000'  then '' else
        (select Name from DIVISION ma
          where ma.cmp_id=da.cmp_id
            and ma.Div_No=substr(da.Div_No,1,2) || '0000')  end as AumPhur
 FROM DIVISION da;

GRANT SELECT ON mDivision TO PUBLIC WITH GRANT OPTION;

drop View AccDlytrn;

create view AccDlytrn
 as
select cmp_id,acdate,acid,
       sum(DrAmt) as drAmt,
       sum(CrAmt) as crAmt,
       count(*) as items,
       trtype,drtype,postinf from (

 select a.cmp_id,a.trtype,a.acdate,a.sflag as aflag,b.*,
           case drtype when '1' then detamt
                       else 0.00 end as DrAmt,
           case drtype when '0' then detamt
                       else 0.00 end as CrAmt
    from ACCPORT a left join ACCPORT_DET b
       on b.mrecno=a.recno

) aa
 where aa.aflag='A'
 group by cmp_id,acdate,acid,trtype,drtype,postinf;

GRANT SELECT ON AccDlytrn TO PUBLIC WITH GRANT OPTION;
-- ==================================
--drop View MasLoan;

drop View MasStckLoan;

create View MasStckLoan
 as
select a.* from (
select a.Mem_ID,a.mbrecno,a.recno,a.loan_no,a.loan_no_ext,a.Apply_Date as ApplyDate,
       a.Last_Update as LastUpdate,a.Last_IntDate as LsIntDate,a.due_Date as dueDate,
       a.instalment as Lsinstalment,a.INT_CASE as paytype,
       a.Balance as CapOutsBal,b.Req_Case as ReqCase,b.cmp_id,b.Div_ID as DivID,'L' as datatype,
       case b.REQ_CASE when 'S' then 0.00
                       when 'H' then 0.00
       else a.PayMent
       end as lsPayMent,a.memo,a.wrttype,BFW_BALANCE as BfwCap
 from Loan a left join MEMBER b on b.recno=a.mbrecno
union
select a.Mem_ID,a.mbrecno,a.recno,'หุ้น' as loan_no,0 as loan_no_ext,a.Apply_Date as ApplyDate,
       a.Last_Update as LastUpdate,current Date as LsIntDate,current Date as dueDate,
       a.INSTALMENT as Lsinstalment,' ' as paytype,
       a.BALANCE as CapOutsBal,b.REQ_CASE as ReqCase,b.cmp_id,b.Div_ID as DivID,
       a.STCK_TYPE as datatype,
       case b.REQ_CASE when 'S' then 0.00
                       when 'H' then 0.00
                       when 'T' then 0.00
       else a.PAYMENT
       end as lsPayMent,a.memo,'_' as wrttype,BFW_BALANCE as BfwCap
 from Stock a left join MEMBER b on b.recno=a.mbrecno
) a;

GRANT SELECT ON MasStckLoan TO PUBLIC WITH GRANT OPTION;
-- ==================================
--select a.mbrecno,a.recno,a.Loan_No,a.loan_no_Ext,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.tmeNO
--            else  a.lstime
--           end as lstime,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.SubAmt
--            else  a.LSPAYMENT
--           end as LastPayMth,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.BAL
--            else a.CapOutSBAL
--           end as LsOutsBal,
--           a.ApplyDate,a.LastUpDate,
--           b.mxRecNo,b.dtdate,b.TRTYPE
-- from (
--select  mbrecno,recno,Loan_No,loan_no_Ext,ApplyDate,LastUpDate,lsInstalment as lstime,LSPAYMENT,CapOutSBAL,ReqCase
--   from MASLOAN
--  where ApplyDate<='31/07/2546') a
-- left join (
--  select a.mxRecNo,b.* from (
--   select mbrecno,dtype,masrec,mRefID,max(RecNo) as MxRecNo
--      from MBER_DETAIL
--    where dtdate<='31/07/2546'
--        and dtype='L'
--   group by  mbrecno,dtype,masrec,mRefID) a
-- left join MBER_DETAIL b
--         on b.recno=a.mxRecNo) b
--         on b.masrec=a.recno
-- order by a.mbrecno desc,a.Loan_No,a.Loan_No_Ext
-- fetch first 10 rows only;
-- ==================================
drop view WRT_DAILYFUND;

create view WRT_DAILYFUND
 as
select aa.*,dm.areaDiv
 from (select mb.mem_no,mb.div_id,1 as itmQty,wf.*
             from MEM_WRTFUND wf left join MEMBER mb
                on mb.recno  =wf.mbrecno
              and mb.cmp_id=wf.cmp_id) aa
 left join DIVISION dm
         on dm.cmp_id=aa.cmp_id
       and dm.div_no=aa.div_ID;

GRANT SELECT ON WRT_DAILYFUND TO PUBLIC WITH GRANT OPTION;
-- ==================================
drop View PaidWrtFUND;

create View PaidWrtFUND
 as
select mbrecno,substr(docno,1,2) as LoanGrp,sum(addAmt)-sum(subAmt) as paid
  from MEM_WRTFUND
where status_flg<>'X'
group by mbrecno,substr(docno,1,2);

GRANT SELECT ON PaidWrtFUND TO PUBLIC WITH GRANT OPTION;  

  ..

[คูณบารมี]

 

[WEBMASTER]

อยากทราบคำตอบของ 1982 เมื่อถอดรหัส bcd 8421  มีค่าเท่ากับเท่าไหร่

ไม่รู้ว่าได้คำตอบไปหรือยัง 

bcd8421 เป็นรหัสของเลขฐานสองที่มีแต่ 0 และ 1 ดังนั้นถ้าจะให้ง่ายให้ทำเป็นตารางเทียบรหัสกับเลขฐาน 10 จะง่ายครับ

เช่น

1 = ?
2 = ?
3 = ?
.
.
.
10 = ?

ผมถอดรหัสให้แล้วครับ ได้ผลลัพธ์ 1982 = 0001 1001 1000 0010
1 = 0001
9 = 1001
8 = 1000
2 = 0010

ผิดพลาดประการใดต้องขออภัยด้วยนะครับ จบมานานแล้วจนจำไม่ได้ 

[WEBMASTER]

--drop view mandesc;
--drop view MEMBDESC;

--insert into ACCPORT_DET2
-- select mRecNo,detNo,AcID,DivID,Mem_ID,oprRecNo,
--            dttype,drtype,intMrk,postInf,LeftOffset,
--            Descp,Detail,DetAmt,Amt,billRecNo,Sflag
-- from ACCPORT_DET
-- where mrecno in (select recno from ACCPORT where AcDate>='01/04/2546')

--drop View AccPrePORT;
--
--create View AccPrePORT
-- as
--select recno,ACDATE,TRTYPE,CMP_ID,DETNO,ACID,DIVID,MEM_ID,dttype,
--       drtype as CrItem,
--       case when DRTYPE='0' then DETAMT
--                       else 0.00
--       end as DrAmt,
--       case when DRTYPE='1' then DETAMT
--                       else 0.00
--       end as CrAmt,
--       case when DTTYPE='csh' then DETAIL
--                              else AcName
--       end as Detail,Data
-- from (
--select a.*,b.*,b.descp as Data,
--   (select Name from ACCOUNT c where c.AcNo=b.AcID and c.cmp_id in ('000',a.cmp_id)) as AcName
--  from ACCPORT a left join ACCPORT_DET b on b.mrecno=a.recno
--
--select a.*,b.*,c.Name as AcName,b.descp as Data
--  from ACCPORT a left join ACCPORT_DET b on b.mrecno=a.recno,ACCOUNT c
-- where c.AcNo=b.AcID and c.cmp_id in ('000',a.cmp_id)
--
-- ) a;
--
--GRANT SELECT ON AccPrePORT TO PUBLIC WITH GRANT OPTION;

drop View MberStock;

create View MberStock
 as
select mbrecno,sum(balance) as totStock
  from STOCK
group by mbrecno;

GRANT SELECT ON MberStock TO PUBLIC WITH GRANT OPTION;

drop View MbStockDetail;

create View MbStockDetail
 as
select * from MBER_DETAIL
 where status_flag='A'
   and masrec>=0
   and dtype<>'L';

GRANT SELECT ON MbStockDetail TO PUBLIC WITH GRANT OPTION;

drop View MbLoanDetail;

create View MbLoanDetail
 as
select * from MBER_DETAIL
 where status_flag='A'
   and masrec>0
   and dtype='L';

GRANT SELECT ON MbLoanDetail TO PUBLIC WITH GRANT OPTION;

drop View WrtCount4Loan;

create View WrtCount4Loan
 as
select Loan_Recno as LoanRecNo,count(*) as items
  from MEM_WARRANTEE
 where status_flag not in ('x','X')
group by Loan_RecNo;

GRANT SELECT ON WrtCount4Loan TO PUBLIC WITH GRANT OPTION;

drop View DvdMbDetail;

create View DvdMbDetail
 as
select a.mem_id as mem_no,dtdate,trtype,
       bfwBal as BfwAmt,AddAmt,SubAmt,
       bal as balAMt,CAPAVR as DivDAmt,
       TIMECNT as stckAge,a.FEE DivDrate,
       b.div_id as div_no,b.cmp_id,a.recno,a.mbrecno,
       b.StockBal,b.intsum,b.intprj,b.Dividends_flag as DvdFlg
  from Mber_Detail a left join MemBer b on b.RecNo=a.MbRecNo
 where a.dtype<>'L'
   and a.status_flag<>'X';

GRANT SELECT ON DvdMbDetail TO PUBLIC WITH GRANT OPTION;

--drop View MBER_DVDREFUND_SUM;
--
--create View MBER_DVDREFUND_SUM
-- as
--select * from (
-- select a.cmp_id,a.Div_No,a.Mem_No,a.mbRecNo,bfdate,bldate,
--        case when stckflag='N' then BfDvd else 0.00 end as BfDvdAmt,
--        case when stckflag='N' then nwDvd else 0.00 end as nwDvdAmt,
--        case when mainiflag='N' then MainiRef else 0.00 end as amIntRef,
--        case when prjiflag='N' then prjiRef else 0.00 end as prjIntRef
--   from MBER_DVDREFUND a
-- where statusflag='N'
--     and nwDvd>=0.00
-- ) a;
--
--GRANT SELECT ON MBER_DVDREFUND_SUM TO PUBLIC WITH GRANT OPTION;

drop View mDiviSion;

create View mDivision
 as
SELECT da.CMP_ID,da.DIV_NO,da.NAME,da.ACCHQ,
       case when substr(Div_NO,2,5)='00000' then '' else
        (select Name from DIVISION ma
          where ma.cmp_id=da.cmp_id
            and ma.Div_No=substr(da.Div_No,1,1) || '00000') end as EduDistName,
       case when substr(Div_NO,3,4)='0000'  then '' else
        (select Name from DIVISION ma
          where ma.cmp_id=da.cmp_id
            and ma.Div_No=substr(da.Div_No,1,2) || '0000')  end as AumPhur
 FROM DIVISION da;

GRANT SELECT ON mDivision TO PUBLIC WITH GRANT OPTION;

drop View AccDlytrn;

create view AccDlytrn
 as
select cmp_id,acdate,acid,
       sum(DrAmt) as drAmt,
       sum(CrAmt) as crAmt,
       count(*) as items,
       trtype,drtype,postinf from (

 select a.cmp_id,a.trtype,a.acdate,a.sflag as aflag,b.*,
           case drtype when '1' then detamt
                       else 0.00 end as DrAmt,
           case drtype when '0' then detamt
                       else 0.00 end as CrAmt
    from ACCPORT a left join ACCPORT_DET b
       on b.mrecno=a.recno

) aa
 where aa.aflag='A'
 group by cmp_id,acdate,acid,trtype,drtype,postinf;

GRANT SELECT ON AccDlytrn TO PUBLIC WITH GRANT OPTION;
-- ==================================
--drop View MasLoan;

drop View MasStckLoan;

create View MasStckLoan
 as
select a.* from (
select a.Mem_ID,a.mbrecno,a.recno,a.loan_no,a.loan_no_ext,a.Apply_Date as ApplyDate,
       a.Last_Update as LastUpdate,a.Last_IntDate as LsIntDate,a.due_Date as dueDate,
       a.instalment as Lsinstalment,a.INT_CASE as paytype,
       a.Balance as CapOutsBal,b.Req_Case as ReqCase,b.cmp_id,b.Div_ID as DivID,'L' as datatype,
       case b.REQ_CASE when 'S' then 0.00
                       when 'H' then 0.00
       else a.PayMent
       end as lsPayMent,a.memo,a.wrttype,BFW_BALANCE as BfwCap
 from Loan a left join MEMBER b on b.recno=a.mbrecno
union
select a.Mem_ID,a.mbrecno,a.recno,'หุ้น' as loan_no,0 as loan_no_ext,a.Apply_Date as ApplyDate,
       a.Last_Update as LastUpdate,current Date as LsIntDate,current Date as dueDate,
       a.INSTALMENT as Lsinstalment,' ' as paytype,
       a.BALANCE as CapOutsBal,b.REQ_CASE as ReqCase,b.cmp_id,b.Div_ID as DivID,
       a.STCK_TYPE as datatype,
       case b.REQ_CASE when 'S' then 0.00
                       when 'H' then 0.00
                       when 'T' then 0.00
       else a.PAYMENT
       end as lsPayMent,a.memo,'_' as wrttype,BFW_BALANCE as BfwCap
 from Stock a left join MEMBER b on b.recno=a.mbrecno
) a;

GRANT SELECT ON MasStckLoan TO PUBLIC WITH GRANT OPTION;
-- ==================================
--select a.mbrecno,a.recno,a.Loan_No,a.loan_no_Ext,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.tmeNO
--            else  a.lstime
--           end as lstime,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.SubAmt
--            else  a.LSPAYMENT
--           end as LastPayMth,
--           case
--            when a.LastUpDate>b.dtDate and b.mxRecNo>0 then b.BAL
--            else a.CapOutSBAL
--           end as LsOutsBal,
--           a.ApplyDate,a.LastUpDate,
--           b.mxRecNo,b.dtdate,b.TRTYPE
-- from (
--select  mbrecno,recno,Loan_No,loan_no_Ext,ApplyDate,LastUpDate,lsInstalment as lstime,LSPAYMENT,CapOutSBAL,ReqCase
--   from MASLOAN
--  where ApplyDate<='31/07/2546') a
-- left join (
--  select a.mxRecNo,b.* from (
--   select mbrecno,dtype,masrec,mRefID,max(RecNo) as MxRecNo
--      from MBER_DETAIL
--    where dtdate<='31/07/2546'
--        and dtype='L'
--   group by  mbrecno,dtype,masrec,mRefID) a
-- left join MBER_DETAIL b
--         on b.recno=a.mxRecNo) b
--         on b.masrec=a.recno
-- order by a.mbrecno desc,a.Loan_No,a.Loan_No_Ext
-- fetch first 10 rows only;
-- ==================================
drop view WRT_DAILYFUND;

create view WRT_DAILYFUND
 as
select aa.*,dm.areaDiv
 from (select mb.mem_no,mb.div_id,1 as itmQty,wf.*
             from MEM_WRTFUND wf left join MEMBER mb
                on mb.recno  =wf.mbrecno
              and mb.cmp_id=wf.cmp_id) aa
 left join DIVISION dm
         on dm.cmp_id=aa.cmp_id
       and dm.div_no=aa.div_ID;

GRANT SELECT ON WRT_DAILYFUND TO PUBLIC WITH GRANT OPTION;
-- ==================================
drop View PaidWrtFUND;

create View PaidWrtFUND
 as
select mbrecno,substr(docno,1,2) as LoanGrp,sum(addAmt)-sum(subAmt) as paid
  from MEM_WRTFUND
where status_flg<>'X'
group by mbrecno,substr(docno,1,2);

GRANT SELECT ON PaidWrtFUND TO PUBLIC WITH GRANT OPTION;  

คำสั่งใช้ตกปลาหรือเปล่าครับ 

[MetalArt]

..เคยเรียนมาเหมือนกัน.. งง..สูตรไรหว่า..

[nuifish]

คำสั่ง ขออนุญาต ไปลองยางเส้นใหม่ครับ 

[น้าวัยทองฯ]

โค๊ะ คำถามนี้ยากแท้ ขอผ่าน หุหุ

[giggog1]

0001 1001 1000 0010 คำตอบถอดรหัส Digit ฐาน 10เป็น ฐาน 2

1         9     8       2
เเบบ 4bit

0   = 0000
1   = 0001
2   = 0010
3   = 0011
4   = 0100
5   = 0101
6   = 0110
7   = 0111
8   = 1000
9   = 1001
เรียนช่างอิเล็กหรือคับ สมัยนี้ยังมีเรียน mcs 51อยู่มั้ยอะ เด็กดิจิตอล2หลักไม่0ก็1

[n.md]

เด็กบัญชี งง

[K€nGja1]

ฮ่าๆ     สุดยอดทั้งนั้น  อิอิ

[PooM_12asTa]

5555