REPORTFORM;FIX7_E.frf
TITLE;FIX ASSETS CALCULATION BY DEPARTMENT REPORT
SQL;select fixmst.FIXID, fixmst.FIXDESC, fixmst.DATESTART,
SQL;fixmst.COST, fixmst.BEG_COST, fixmst.RATE,fixmst.YEAR_COST,
SQL; fixmst.DPTID, depart.DDESC,
SQL;fixmst.BEG_COST + fixmst.YEAR_COST AS THISYEAR, 
SQL;fixmst.COST - fixmst.BEG_COST - fixmst.YEAR_COST AS REPBAL
SQL;from fixmst 
SQL;left join depart on fixmst.DPTID = depart.DID
SQL;where (fixmst.sale <> "Y" or isnull(fixmst.sale))
SQL;order by fixmst.DPTID,depart.DDESC, fixmst.FIXID, fixmst.FIXDESC
CONDITION;FROM DPT CODE~FIXMST.DPTID~Chr~2~SELECT DID FROM DEPART~DEP
CONDITION;FROM ASSET CODE~FIXMST.FIXID~Chr~2~SELECT FIXID FROM FIXMST~FIX
EXCELSQL;select fixmst.DATESTART AS "วันที่ซื้อ", fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", 
EXCELSQL;fixmst.AGE AS "อายุ", fixmst.RATE AS "อัตราค่าเสื่อม (%)", fixmst.COST AS "ราคาซื้อ", fixmst.LAST_COST AS "ราคาซาก",
EXCELSQL;fixmst.DPTID AS "รหัสแผนก", fixmst.JOBNO AS "รหัส JOB"
EXCELSQL;from fixmst 
EXCELSQL;order by fixmst.DATESTART, fixmst.FIXID
EXCELSQL;select fixmst.DATESTART AS "วันที่ซื้อ", fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", 
EXCELSQL;fixmst.AGE AS "อายุ", fixmst.RATE AS "อัตราค่าเสื่อม (%)", fixmst.COST AS "ราคาซื้อ", fixmst.LAST_COST AS "ราคาซาก",
EXCELSQL;fixmst.DPTID AS "รหัสแผนก", fixmst.JOBNO AS "รหัส JOB"
EXCELSQL;from fixmst 
EXCELSQL;order by fixmst.DATESTART, fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", fixmst.INSAGE AS "อายุประกัน", fixmst.INSDATE AS "วันเริ่มประกัน", 
EXCELSQL;fixmst.INSDATE2 AS "วันหมดประกัน", fixmst.AGE AS "อายุ", fixmst.LAST_COST AS "ราคาซาก", fixmst.DPTID AS "รหัสแผนก"
EXCELSQL;from fixmst 
EXCELSQL;where (fixmst.sale <> "Y" or isnull(fixmst.sale))
EXCELSQL;order by fixmst.INSDATE2
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",fixmst.SALEDATE AS "วันที่ขาย",
EXCELSQL;(fixmst.COST-fixmst.BEG_COST-fixmst.YEAR_COST) AS "มูลค่าคงเหลือ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.DPTID AS "รหัสแผนก", fixmst.JOBNO AS "รหัสJOB"
EXCELSQL;from fixmst 
EXCELSQL;where fixmst.SALE = "Y"
EXCELSQL;order by fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",fixmst.SALEDATE AS "วันที่ขาย",
EXCELSQL;(fixmst.COST-fixmst.BEG_COST-fixmst.YEAR_COST) AS "มูลค่าคงเหลือ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.DPTID AS "รหัสแผนก", fixmst.JOBNO AS "รหัสJOB"
EXCELSQL;from fixmst 
EXCELSQL;where fixmst.SALE = "Y"
EXCELSQL;order by fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",fixmst.SALEDATE AS "วันที่ขาย",
EXCELSQL;(fixmst.COST-fixmst.BEG_COST-fixmst.YEAR_COST) AS "มูลค่าคงเหลือ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.DPTID AS "รหัสแผนก", fixmst.JOBNO AS "รหัสJOB"
EXCELSQL;from fixmst 
EXCELSQL;where fixmst.SALE = "Y"
EXCELSQL;order by fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.BEG_COST AS "ค่าเสื่อมยกมา", fixmst.RATE AS "อัตราค่าเสื่อม %", fixmst.YEAR_COST AS "ค่าเสื่อมในปีนี้",
EXCELSQL;fixmst.BEG_COST + fixmst.YEAR_COST AS "ค่าเสื่อมรวมในปีนี้", fixmst.COST - fixmst.BEG_COST - fixmst.YEAR_COST AS "ค่าเสื่อมยกไป",
EXCELSQL;fixmst.DPTID AS "รหัสแผนก"
EXCELSQL;from fixmst 
EXCELSQL;where (fixmst.sale <> "Y" or isnull(fixmst.sale))
EXCELSQL;order by fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน",
EXCELSQL;fixmst.FIXGROUP AS "รหัสประเภททรัพย์สิน", fixgroup. FIXGROUPDESC AS "รายละเอียดประเภททรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.BEG_COST AS "ค่าเสื่อมยกมา", fixmst.RATE AS "อัตราค่าเสื่อม %", fixmst.YEAR_COST AS "ค่าเสื่อมในปีนี้",
EXCELSQL;fixmst.BEG_COST + fixmst.YEAR_COST AS "ค่าเสื่อมรวมในปีนี้", fixmst.COST - fixmst.BEG_COST - fixmst.YEAR_COST AS "ค่าเสื่อมยกไป",
EXCELSQL;fixmst.DPTID AS "รหัสแผนก"
EXCELSQL;from fixmst left join fixgroup on fixmst.FIXGROUP = fixgroup.FIXGROUP
EXCELSQL;where (fixmst.sale <> "Y" or isnull(fixmst.sale))
EXCELSQL;order by fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.BEG_COST AS "ค่าเสื่อมยกมา", fixmst.RATE AS "อัตราค่าเสื่อม %", fixmst.YEAR_COST AS "ค่าเสื่อมในปีนี้",
EXCELSQL;fixmst.BEG_COST + fixmst.YEAR_COST AS "ค่าเสื่อมรวมในปีนี้", fixmst.COST - fixmst.BEG_COST - fixmst.YEAR_COST AS "ค่าเสื่อมยกไป",
EXCELSQL;fixmst.DPTID AS "รหัสแผนก"
EXCELSQL;from fixmst 
EXCELSQL;where (fixmst.sale <> "Y" or isnull(fixmst.sale))
EXCELSQL;order by fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน",
EXCELSQL;fixmst.FIXGROUP AS "รหัสประเภททรัพย์สิน", fixgroup. FIXGROUPDESC AS "รายละเอียดประเภททรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.BEG_COST AS "ค่าเสื่อมยกมา", fixmst.RATE AS "อัตราค่าเสื่อม %", fixmst.YEAR_COST AS "ค่าเสื่อมในปีนี้",
EXCELSQL;fixmst.BEG_COST + fixmst.YEAR_COST AS "ค่าเสื่อมรวมในปีนี้", fixmst.COST - fixmst.BEG_COST - fixmst.YEAR_COST AS "ค่าเสื่อมยกไป",
EXCELSQL;fixmst.DPTID AS "รหัสแผนก"
EXCELSQL;from fixmst left join fixgroup on fixmst.FIXGROUP = fixgroup.FIXGROUP
EXCELSQL;where (fixmst.sale <> "Y" or isnull(fixmst.sale))
EXCELSQL;order by fixmst.FIXID
EXCELSQL;select fixmst.FIXID AS "รหัสทรัพย์สิน", fixmst.FIXDESC AS "รายละเอียดทรัพย์สิน", fixmst.DATESTART AS "วันที่ซื้อ",
EXCELSQL;fixmst.COST AS "ราคาซื้อ", fixmst.BEG_COST AS "ค่าเสื่อมยกมา", fixmst.RATE AS "อัตราค่าเสื่อม %",fixmst.YEAR_COST AS "ค่าเสื่อมปีนี้", 
EXCELSQL;fixmst.BEG_COST + fixmst.YEAR_COST AS "ค่าเสื่อมสะสมรวมในปีนี้",
EXCELSQL;fixmst.COST - fixmst.BEG_COST - fixmst.YEAR_COST AS "ค่าเสื่อมยกไป",
EXCELSQL;fixmst.DPTID AS "รหัสแผนก",
EXCELSQL;depart.DDESC AS "รายละเอียดแผนก"
EXCELSQL;from fixmst 
EXCELSQL;left join depart on fixmst.DPTID = depart.DID
EXCELSQL;where (fixmst.sale <> "Y" or isnull(fixmst.sale))
EXCELSQL;order by fixmst.DPTID,depart.DDESC, fixmst.FIXID, fixmst.FIXDESC
