No edit summary |
|||
(18 intermediate revisions by the same user not shown) | |||
Line 5: | Line 5: | ||
===Assignment : To Create the Unit Price Calculation=== | ===Assignment : To Create the Unit Price Calculation=== | ||
* Create | * Create the DIY field such as '''UDF_mUnitPrice''' in Sales documents (eg. sales invoice) | ||
* Purpose: User will key-in the base unit price to convert into new unit price based on the UOM rate in Maintain Stock Item. | * Purpose: User will key-in the base unit price to convert into new unit price based on the UOM rate in Maintain Stock Item. | ||
::[[File: 01 A1-Sales Invoice Entry-UDF mUnitPrice.jpg|740px]] | ::[[File: 01 A1-Sales Invoice Entry-UDF mUnitPrice.jpg|740px]] | ||
Line 14: | Line 14: | ||
===Steps=== | ===Steps=== | ||
====Insert DIY Field==== | |||
:01. Click '''Tools | DIY | SQL Control Center...''' | :01. Click '''Tools | DIY | SQL Control Center...''' | ||
:02. At the left panel look for '''Sales Invoice''' | :02. At the left panel look for '''Sales Invoice'''. | ||
:03. Right Click the '''Sales Invoice''' | :03. Point to Items Fields. | ||
:04. On the right panel, insert the DIY field as per the TABLE below. | |||
::{| class="wikitable" | |||
|- | |||
! Name !! Data Type !! Size !! SubSize !! Caption !! Required !! Default Value !! Display Format | |||
|- | |||
| mUnitPrice || Float || 10 || 2 || UDF_mUnitPrice || FALSE (Untick) || BLANK || #,0.00;-#,0.00 | |||
|} | |||
::[[File:02 A1-SL - ItemFields.jpg|640px]] | |||
:05. Click Save. | |||
:06. Update operation successful message. Click OK. | |||
:07. DONE | |||
<br /> | |||
====Insert DIY Script==== | |||
:01. Click '''Tools | DIY | SQL Control Center...''' | |||
:02. At the left panel look for '''Sales Invoice''' . | |||
:03. Right Click the '''Sales Invoice'''. | |||
::[[File:DIYField-03.jpg]] | ::[[File:DIYField-03.jpg]] | ||
:04. Select '''New Event''' | :04. Select '''New Event'''. | ||
::[[File:DIYScript-01.jpg]] | ::[[File:DIYScript-01.jpg]] | ||
:05. Enter any name (eg Calc) in the '''Name''' field (Only Alphanumeric & no spacing) | :05. Enter any name (eg Calc) in the '''Name''' field (Only Alphanumeric & no spacing). | ||
:06. Select '''OnGridColumnValueChanged''' for '''Event''' field | :06. Select '''OnGridColumnValueChanged''' for '''Event''' field. | ||
:07. Click OK | :07. Click OK. | ||
:08. Click the Calc (name create at Step 5 above) on the left panel | :08. Click the Calc (name create at Step 5 above) on the left panel. | ||
::[[File:02 A1-SL - OnGridColValChg-Calc.jpg|840px]]<br /> | ::[[File:02 A1-SL - OnGridColValChg-Calc.jpg|840px]]<br /> | ||
:09. Copy below script & paste to the Right Panel (Script Section) | :09. Copy below script & paste to the Right Panel (Script Section). | ||
<syntaxhighlight lang="delphi"> | <syntaxhighlight lang="delphi"> | ||
begin | begin | ||
Line 36: | Line 54: | ||
end. | end. | ||
</syntaxhighlight> | </syntaxhighlight> | ||
:10. Click '''Save''' button | :10. Click '''Save''' button. | ||
:::---------------------------------------------------------------------------------------------------------------------------------------------------- | :::---------------------------------------------------------------------------------------------------------------------------------------------------- | ||
Line 42: | Line 60: | ||
|- | |- | ||
| [[File:Template.Warning-01.jpg|80px]]|| | | [[File:Template.Warning-01.jpg|80px]]|| | ||
* Avoid update the same existing field name ''Unit Price''. You have to create different name ie. UDF_mUnitPrice | * Avoid update the same existing field name ''Unit Price''. You have to create different name ie. UDF_mUnitPrice. | ||
|} | |} | ||
:::---------------------------------------------------------------------------------------------------------------------------------------------------- | :::---------------------------------------------------------------------------------------------------------------------------------------------------- | ||
<br /> | |||
===Result Test=== | ===Result Test=== | ||
:01. Go to Stock | Maintain Stock Item... | :01. Go to Stock | Maintain Stock Item... | ||
:02. Edit the | :02. Edit the item code '''ANT'''. | ||
:03. Insert additional UOM with different RATE, eg. 1 CARTON = 12 UNITS | :03. Insert additional '''UOM''' with different RATE, eg. '''1 CARTON = 12 UNITS''' and '''1 BOX = 60 UNITS'''. | ||
::[[File:03 A1-ST-MaintainStk Item.jpg]] | ::[[File:03 A1-ST-MaintainStk Item.jpg|740px]] | ||
<br /> | |||
:04. Create new sales invoice from Sales | Invoice... | |||
:05. Call out the columns name '''UDF_mUnitPrice''' and '''Rate'''. | |||
::[[File:03 A1-Sales Invoice Entry.jpg|940px]] | |||
<br /> | |||
:06. Insert and select the item code '''ANT'''. | |||
:07. Select the '''UOM''' to '''CARTON'''. '''Rate''' will be changed to '''12'''. | |||
:08. Input the value into '''UDF_mUnitPrice'''. '''U/Price''' will be calculated from your DIY script formula '''(UDF_mUnitPrice x Rate)'''. | |||
::[[File:03 A1-Sales Invoice -Detail.jpg|640px]] | |||
<br /> |
Latest revision as of 07:42, 9 November 2015
Update Info
Last Script Update : 09 Nov 2015
Level : Basic
Assignment : To Create the Unit Price Calculation
- Create the DIY field such as UDF_mUnitPrice in Sales documents (eg. sales invoice)
- Purpose: User will key-in the base unit price to convert into new unit price based on the UOM rate in Maintain Stock Item.
- Calculation for Unit Price := UDF_mUnitPrice x Rate
Steps
Insert DIY Field
- 01. Click Tools | DIY | SQL Control Center...
- 02. At the left panel look for Sales Invoice.
- 03. Point to Items Fields.
- 04. On the right panel, insert the DIY field as per the TABLE below.
Name Data Type Size SubSize Caption Required Default Value Display Format mUnitPrice Float 10 2 UDF_mUnitPrice FALSE (Untick) BLANK #,0.00;-#,0.00
Insert DIY Script
- 01. Click Tools | DIY | SQL Control Center...
- 02. At the left panel look for Sales Invoice .
- 03. Right Click the Sales Invoice.
- 04. Select New Event.
- 05. Enter any name (eg Calc) in the Name field (Only Alphanumeric & no spacing).
- 06. Select OnGridColumnValueChanged for Event field.
- 07. Click OK.
- 08. Click the Calc (name create at Step 5 above) on the left panel.
- 09. Copy below script & paste to the Right Panel (Script Section).
begin
if SameText(EditingField, 'ItemCode')or
SameText(EditingField, 'UDF_mUnitPrice') then begin
DataSet.FindField('UnitPrice').AsFloat :=
DataSet.FindField('Rate').AsFloat * DataSet.FindField('UDF_mUnitPrice').AsFloat;
end;
end.
- 10. Click Save button.
- ----------------------------------------------------------------------------------------------------------------------------------------------------
- ----------------------------------------------------------------------------------------------------------------------------------------------------
Result Test
- 01. Go to Stock | Maintain Stock Item...
- 02. Edit the item code ANT.
- 03. Insert additional UOM with different RATE, eg. 1 CARTON = 12 UNITS and 1 BOX = 60 UNITS.
- 04. Create new sales invoice from Sales | Invoice...
- 05. Call out the columns name UDF_mUnitPrice and Rate.
- 06. Insert and select the item code ANT.
- 07. Select the UOM to CARTON. Rate will be changed to 12.
- 08. Input the value into UDF_mUnitPrice. U/Price will be calculated from your DIY script formula (UDF_mUnitPrice x Rate).