# 1_์ค์
# K-Studio
osryu@topengnet.com 1q2w3e4r1!Q
# ERP
master YlwEdu2093!#
# SQLServer
192.168.2.196,14246 devoutedu ERPrydbr209#
# 1์ผ์ฐจ
# K-Studio์ ์๋น์ค
# workflow
# K-Studio์ ๋ฐ์ดํฐ์์ง
์ปจํธ๋กคCaption DataBlock DataFieldName DataFieldCd ์ฝ๋๊ฐ ํ์ํ๊ฒฝ์ฐ
# ์๋น์ค๊ตฌ์ข
Biz Service => Data Service
๋น์ฆ๋์ค์๋น์ค๋ฅผ ๋ง๋ค๊ณ , K-WF๋ ์ฌ๋ฌ๊ฐ ์ค์ ๊ฐ๋ฅ
# 5. SQL-WF
Biz > DB
biz > s
# 2๊ต์
K-Studio ์ํฌํ๋ก์ฐํ์ ํ๋ฉด์์ ์ฐ์ธก๋ง์ฐ์ค
๋น์ฆ์๋น์ค์ ํ์ดํ๋ ์ธ์์ ์ผ์ชฝ์ธ ์ค๋ฅธ์ชฝ ์์ ์ ์ฅ
๊ฐ๋ฐ์์ฌ์ดํธ์์
--๊ฐ๋ฐ์์ปค๋ฎค๋ํฐ devcomm.ksystem.co.kr --๊ฐ๋ฐ์๋ค์ ์ํ๊ณต๊ฐ(๊ถ๊ธํ์ฌํญ์ ์งใน๋ฌธ๊ฐ๋ฅ) kdc.ksystem.co.kr
??? ์ ๊ทผ๊ถํ๋ฑ๋ก ํ๋ฉด๋ฏธ๋ฆฌ๋ณด๊ธฐ์๋์
ํ๋ฉด์ ํ ์ด๋ธ๋ฑ๋ก(DM)ํ๋ฉด์ด ์์
ํ๋ฉด์ ๋ณด ๋ถ๋ฌ์ค๊ธฐ
๋ฉ๋ด์ผ ์
ํ๋ฉด - (๋น์ฆ๋์ค)์๋น์ค - SP Ever.Edu.Sales.BizEduEstimate_Edu01 ๋น์ฆ๋์ค-๊ฒฌ์ ๋ง์คํฐ
edudevEdu01_SEduEstimateQuery Q-์กฐํ edudevEdu01_SEduEstimateCheck E-์ฒ๋ฆฌ edudevEdu01_SEduEstimateSave S-์ ์ฅ
edudevEdu01_SEduEstimateitemQuery edudevEdu01_SEduEstimateitemCheck edudevEdu01_SEduEstimateitemSave
_TEduSampleMaster_Edu01 _TEduSampleDetail_Edu01
http://download.ksystem.co.kr:8083/mjkang/edu/K-Studio2.0_EDU/2.EstimateSave.zip
ํ๋ฉด -(๋น์ฆ๋์ค)
ํ๋ฉด EstimateSeq 1 => IN -> SP -> OUT ( ๊ฒฌ์ ๋ฒํธ NO001, ์ ํ์ฐ, ...)
1 2 3 4 NO YLW-20210602001
ctrl + e ๋ ์คํ ctrl + s ์ ์ฅ
#
์ ๋ฌด๋ณ์ธ๋ถํค์์ฑ์ ์๋ฑ๋ก์ ๊ตฌ์ฑ์ ์๊ฐ ์ํ๋
# 2์ผ์ฐจ
# 1๊ต์
ํ๋ฉด ๋ง์ถ๊ธฐ
์ํธ๋ง๋ค๊ธฐ
# ์ต์ ์ํธ
# ๊ทธ๋ฆฌ๋ 10์นธ์ ๋
์ ์ฒด์์ฑ ๋๋ฒ์งธ์ ๋ณ๊ฒฝ ํ๋ชฉ ์ฝ๋ํฌํ๋ก ๋ณ๊ฒฝ ๋ก์ฐ10์ค ํ๋ชฉ ๋จ์ ์ฝ๋ํฌํ ์ฝ๋ ์ฌ์ฉ ๋ชปํ๊ฒ DIS์ฒ๋ฆฌ
๊ฒฌ์ ๋ด๋ถ์ฝ๋ ๊ฒฌ์ ์๋ฒ๋ด๋ถ์ฝ๋ ํ๋ชฉ๋ด๋ถ์ฝ๋ ๋จ์๋ด๋ถ์ฝ๋
์ฝ๋ ๋ณด์ง ๋ชปํ๊ฒ ์จ๊น์ฒ๋ฆฌ HID;
ํ๋ ์ฒ๋ฆฌํ ์ํธ์ด๊ธฐํ
์๋,ํ๋ชฉ NOS;
ํด๋ฐ๋ฒํผ 5๊ฐ ์์ฑ
๋ฒํผ ํด๋ฆญ ํ ์ ๋ชฉ์ ์ ๊ท, ์ด๋ฒคํธ์ ํ์ ํ
5๊ฐ ๋ฒํผ์ ์ ๊ทN, ์กฐํQ,์ ์ฅS,์ญ์ D , ํ์ญ์ \C-SheetDelete
๋น์นธ ์ค๋ฅธ์ชฝ์์ ๋ฉ์๋ ์์ฑ
๋ฉ์๋๋น๋ฏธ New , ํ์ N-์ ๊ท ๋ฉ์ค๋์ ์ด๋ฒคํธ์ถ๊ฐ
์ ๊ทํ๋ฉด์ Click์ด๋ฒคํธ์ New์ ํ
Get ์ ์บ๋ฒ์ค ๋งคํ
GridCanvasC2 ์กฐํ์ ์ฅ
์ฒดํฌใ ๋ฒํผ์ถ๊ฐ ์ ์ฅ์์๋ NotNullCheck์ฒดํฌ Get ๋ง์คํฐ Get ๋ใ ํ ์ผ
Set์๋ ์ด๋ก์ ์ฒดํฌ๋ ๋ชจ๋ํฐ
# 2๊ต์
DELETE
sp_helptext
๊ฒฌ์ ๋ด๋ถ์ฝ๋ ๊ฒฌ์ ์๋ฒ๋ด๋ถ์ฝ๋ ํ๋ชฉ๋ด๋ถ์ฝ๋ ๋จ์๋ด๋ถ์ฝ๋ ํ๋งค๋จ๊ฐ ์๋ ํ๋งค๊ธ์ก ๋น๊ณ ํ๋ชฉ ๋จ์
์ํธ์ญ์
m_SendXml m_RecvXml
๋๋ฒ๊ทธ๋ชจ๋ CTRL + F12
EstimateSeq EstimateNo EstimateSerl
๋ฌธ์ ์ ๊ฒฝ์ฐ ํ๋ฉด์์ ์ก์ ์ ์์
sql server profiler ์ถ์ ์์ฑ์
%edu01%
edudevEdu01_SEduEstimateQuery Q-์กฐํ edudevEdu01_SEduEstimateCheck E-์ฒ๋ฆฌ edudevEdu01_SEduEstimateSave S-์ ์ฅ
edudevEdu01_SEduEstimateitemQuery edudevEdu01_SEduEstimateitemCheck edudevEdu01_SEduEstimateitemSave
์ฟผ๋ฆฌ์คํ์ ๊ฐ๊ฐ์ ์งํํด์ ๋ฌธ์ ๊ฐ ์๋์ง ํ์ธํ๋ ํํ๋ก ์งํ
sp_helptext edudevEdu01_SEduEstimateQuery; sp_helptext edudevEdu01_SEduEstimateCheck; sp_helptext edudevEdu01_SEduEstimateSave;
sp_helptext edudevEdu01_SEduEstimateitemQuery; sp_helptext edudevEdu01_SEduEstimateitemCheck; sp_helptext edudevEdu01_SEduEstimateitemSave;
ํธ๋์ญ์ ์ถ๊ฐ ์ฌ๋ถ ์ ์ฒดํฌ์ฌ๋ถ์์ ํ๋ก์์ ธ๊ฐ ๋ณ๊ฒฝ๋จ
ํ๋ฉด ์๋ก ์์ฑ ๊ธ์ก์๋๊ณ์ฐ ๋ํ ์ผ์ ๋ฐ์ดํฐ์ถ๊ฐ
๊ทธ๋ฆฌ๋ ์์ ์ฝ๋ผ ํ๋ฉด ์กฐํ์ ํ๋ฉด์์ ํ ์ธ๋ฑ์ค ํ ํ ๋๋์ด๊ฐ๋๊ฒ
๊ฒฌ์ ์
๋ ฅ
๊ธ์ก ์๋ ๊ณ์ฐ ---1
๋ํ
์ผ์ ๋ฐ์ดํฐ ์์ผ๋ฉด ์ฒดํฌ๋ก์ง์ถ๊ฐ ---2
-- ํ๊ธฐ ์ฒดํฌ ๋ก์ง์ ์์ ํ์ฌ ํ์ํ ์ฒดํฌ๋ก์ง์ ์ถ๊ฐํฉ๋๋ค.
EXEC dbo._SCOMMessage @MessageType OUTPUT,
@Status OUTPUT,
@Results OUTPUT,
1293 , -- (SELECT * FROM _TCAMessageLanguage WHERE LanguageSeq = 1 AND MessageSeq like '%ํ์ธ%')
@LanguageSeq , --- ์ํธ์ ๋ฐ์ดํฐ๋ฅผ ํ์ธํ์ธ์
279, '์ํธ' , -- SELECT * FROM _TCADictionary WHERE LanguageSeq = 1 AND Word = '์ํธ'
355, '๋ฐ์ดํฐ' -- SELECT * FROM _TCADictionary WHERE LanguageSeq = 1 AND Word = '๋ฐ์ดํฐ'
UPDATE #BIZ_OUT_DataBlock2
SET Result = @Results ,
MessageType = @MessageType,
Status = @Status
FROM #BIZ_OUT_DataBlock2
WHERE (SELECT COUNT(1) FROM #BIZ_OUT_DataBlock2 WHERE WorkingTag = 'A')< 1 -- 0๊ฐ ์ผ๋
๊ฒฌ์ ์กฐํํ๋ฉด๊ฐ๋ฐ ---3
CellText(SSNew,SSNew.ActiveRow,'Price') CellText(SSNew,SSNew.ActiveRow,'Qty')
Price = CellText(SSNew,SSNew.ActiveRow,'Price') Qty = CellText(SSNew,SSNew.ActiveRow,'Qty') CurAmt = Price * Qty
SetText(SSNew,SSNew.ActiveRow,'CurAmt', CurAmt)
CellText(SSNew,SSNew.ActiveRow,'Price') * CellText(SSNew,SSNew.ActiveRow,'Qty')
MessageBoxShow(CellText(SSNew,SSNew.ActiveRow,'Price'),CellText(SSNew,SSNew.ActiveRow,'Qty'))
edudevEdu01_SEduEstimateitemCheck;์์ดํ ์ฒดํฌ์์ ์ฃผ์ํด์
SELECT @Results
# 14์30๋ถ
Ever.Edu.Sales.BizEduEstimateList_Edu01
# 16:00
์ ํ๊ธฐ๋ฅ
JumpOut('JumpOutDataKey')
# 16:20
##์นผ๋ผ๋ณ๊ฒฝ
local col for col= 0 , SSNew.MaxCols -1 do SSNew.ActiveCol = col
if SSNew.ActiveColumnName == 'CurAmt'
then
SSNew.ActiveCol = col
SSNew.ActiveCellBackColor = -2031936
end
end
# ์ปฌ๋ฌ๋ณ๊ฒฝ
local col for col= 0 , SSNew.MaxCols -1 do SSNew.ActiveCol = col
if SSNew.ActiveColumnName == 'CurAmt'
then
SSNew.ActiveCol = col
SSNew.ActiveCellBackColor = -2031936
end
end
local col for col= 0 , SSNew.MaxCols -1 do SSNew.ActiveCol = col
if SSNew.ActiveColumnName == 'EmpName'
then
SSNew.ActiveCol = col
SSNew.ActiveCellBackColor = -1
end
end
Query ๋ณ๊ฒฝ์ฌ๋ถํธ๊ฐ์ธ vbYesNoCancel
# ์ฌ๋ฌ๊ณณ์์ ์ฌ์ฉ
RunPgmMethod('ColorChange')
# 3์ผ์ฐจ
# 1๊ต์น (9:40)
xml๋ก ๋ชจ๋ ์ถ๋ ฅ๋ฌผ์ ๋ณด๋
http://download.ksystem.co.kr:8083/mjkang/edu/K-Studio2.0_EDU/2.EstimateSave.zip http://download.ksystem.co.kr:8083/mjkang/edu/K-Studio2.0_EDU/3.EstimateListQuery.zip http://download.ksystem.co.kr:8083/mjkang/edu/K-Studio2.0_EDU/4.EstimatePrint.zip
c:\users\public\appdata\local\younglimwon\ksystem ver.5 genuine\์ธ๋ถ๊ฐ๋ฐ๊ต์ก\RdView\Data\FrmEduEstimate_Edu08.xml
c:\users\public\appdata\local\younglimwon\ksystem ver.5 genuine\์ธ๋ถ๊ฐ๋ฐ๊ต์ก\RdView\Data\FrmEduEstimate_Edu08.xml
_TEduSampleMaster_Edu01 _TEduSampleDetail_Edu01
# 2๊ต์ (10:50)
์ค์ฆ์ฟผ๋ฆฌ ๋์์ด๋ ์คํ
์ค์ฆ ๋์์ด๋์์ ๋๋ธํด๋ฆญ
esc ์ ์ฒด์ ํ ์ค๋ฅธ์ชฝ์ผ๋ก F2 ์ฌ์ ๋ ฅ
์์ ํด๋ ์ฌ์ค์ ํ๋ฉด odi ์ฌ์ค์ ์ ๋ฌธ์ ํด๊ฒฐ
# 3๊ต์ (13:20)
# ๋ณ๊ฒฝ์
This.SetText(This.GetDataSetValue("DataBlock1.DateFr").substring(0,4) + "๋ " + This.GetDataSetValue("DataBlock1.DateFr").substring(6,4) + "์ " + This.GetDataSetValue("DataBlock1.DateFr").substring(8,6) + "์ผ ~ " + This.GetDataSetValue("DataBlock1.DateTo").substring(0,4) + "๋ " + This.GetDataSetValue("DataBlock1.DateTo").substring(6,4) + "์ " + This.GetDataSetValue("DataBlock1.DateTo").substring(8,6) + "์ผ" );
# ๋ณ๊ฒฝํ
This.SetText(This.GetDataSetValue("DataBlock1.EstimateDate").substring(0,4) + "๋ " + This.GetDataSetValue("DataBlock1.EstimateDate").substring(6,4) + "์ " + This.GetDataSetValue("DataBlock1.EstimateDate").substring(8,6) + "์ผ "
SUBSTRING
ROUND CEILING
SELECT CONVERT(NVARCHAR,CONVERT(MONEY(1000000000),1)) AS AMT
# 4๊ต์ (15:00)
Ksystem -FileService
โ - jekyll - mobaxterm โ