Need Help in Voucher customization ( Calculation Not Working)

[#Line:EI ColumnTwo]
Add:Right Fields:After: VCH ActualQtyTitle:msvalueadd

[Field:msvalueadd]
Width : @@VCHQtyWidth
Setas : $$LocaleString:"Value added"
Style : Small
Align : Center
Border : Thin Right
Invisible : If @@IsJobOrdersOn OR @@IsExciseSupplementaryInv Then Yes Else NOT $DiffActualQty OR @@IsPhysStock OR @@IsStockJrnl
Skip : Yes
Fixed : Yes


[#Field: VCH ActualQtyTitle]
Delete:Border
[#Field: VCH QtyTitle]
;Background:red
Width:25.8

[#Line: EI InvInfo]
add:Right Fields :After: VCH ActualQty: vjamount


[Field:vjamount]
Use : Amount Field
Width : @@VCHQtyWidth
Set always : Yes
Storage : mj1
Align : Center



[System:UDF]
Mj1:Amount:10057
mj2:Quantity:10058


[#Field: VCH ActualQty]
Use : Qty Primary Field
Width : @@VCHQtyWidth
Set always : Yes
Storage : Mj2
Border : Thin Left Right

[#Field: VCH BilledQty]
ResetVal : $mj2+ ( $mj2 * $mj1)
[#Field: EI QtyTotal]
add: Field :After: EI ActualQtyTotal:vjtotal

[Field:vjtotal]
Use : Number Field
Set always : Yes
Skip : No
Width : 8
Align: Center

[#Line: EXPINV Column2]

Add: Right Field:After: EXPINV ActualQtyTitle: cityp1

[Field:cityp1]
Use:QtyTitleField
Set as:"Val.Added"
Width:5
Style:small
Align : Centre
Border: Thin LEFT

[#Line: EXPINV Column1]

Add: Right Field:At Beginning : citycl

[Field:citycl]
Width:5
;Print BG:RED
Border: FULL THIN BOTTOM
[#Line: EXPINV InvDetails]

Add:Right Field:After: EXPINV ActualQty:inwms3

[Field: inwms3]
Use : QtyTitleField
width:5
Set as: $Mj1
Border: thin left


[#Field: EXPINV ActualQty]

Storage:Mj2

[#Field: EXPINV ActualQtyTotal]
Delete:Set as
Delete:Border
Width:5