Sub form value not fetch in same voucher

;;; i want do $CurrRat *Qty in Rate Field But $CurrRat value not fetched ,what should do ? kindly suggest



[Field:EXPYES]

Use: Logical Field
Set as:""

Storage:EXPYES
Add : SubForm : EXCRATE : $EXPYES

[Report:EXCRATE]
Object:Voucher
Form:EXCRATE
[Form:EXCRATE]

Part: pART1

[PartART1]
Line:curr2,curr3;;ExchangeRateTitle, ExchangeRateEffect


[Field:Curr]

Use: Name Field
Set as:""
Storage:Curr
Invisible: if $EXPYES="NO" then Yes else No



[Field:CurrL]
Use: medium Prompt
Set as: "Currancy Type :"
Skip: Yes
Style: Normal Bold
Invisible: if $EXPYES="NO" then Yes else No

[Field:CurrRateL]
Use:Medium Prompt
Set as: "Currancy Rate :"
Skip: Yes
Style: Normal bold
Invisible: if $EXPYES="NO" then Yes else No

[Field:CurrRat]

Use: Number Field

Set as:""

Storage:CurrRat
Invisible: if $EXPYES="NO" then Yes else No

[System:UDF]

EXPYES: Logical :98
Curr : String: 99
CurrRat : Number: 100

 

@@Amitji Kindly suggest

 

tried not working sir

 

it fetch "0" value

 

;;;kindly help on this , on narration its fetch proper value , when on rate its not fetch


[#Part: EI Consignee]

Use : VCH Basic Left
Line : EI Consignee,Curr;,curr2,curr3

[Line:curr]

Field : Expi,EXPYES
; Local: Field:Medium Prompt: Set as:"Export Invoice ?"

[Field:Expi]
Use: Medium Prompt
Set as:"Export Invoice"
Skip: Yes
Style: Normal bold

[Line:curr2]

Fields:CurrL,Curr


[Line:curr3]
Fields:CurrRateL,CurrRa

[Field:EXPYES]

Use: Logical Field
Set as:""

Storage:EXPYES
Add : SubForm : EXCRATE : $EXPYES

[Report:EXCRATE]
Object:Voucher
Form:EXCRATE
[Form:EXCRATE]

Part: pART1

[PartART1]
Line:curr2,curr3;;ExchangeRateTitle, ExchangeRateEffect


[Field:Curr]

Use: Name Field
Set as:$Curr;""
Storage:Curr
Invisible: if $EXPYES="NO" then Yes else No



[Field:CurrL]
Use: medium Prompt
Set as: "Currancy Type :"
Skip: Yes
Style: Normal Bold
Invisible: if $EXPYES="NO" then Yes else No

[Field:CurrRateL]
Use:Medium Prompt
Set as: "Currancy Rate :"
Skip: Yes
Style: Normal bold
Invisible: if $EXPYES="NO" then Yes else No

[Field:CurrRa]

Use: Number Field

Set as:$Currat;""

Storage:Currat
Invisible: if $EXPYES="NO" then Yes else No

[System:UDF]

EXPYES: Logical :98
Curr : String: 99
Currat : Number: 20012
EnableExport: Logical: 101




;;;;





[#Field:vcH BATCH RATE]

Delete:Set by Condition

Set as:$$Number:$Currat

[#Field:vch rate]
Delete:Set by Condition
Set as:$$Number:$Currat

[#Field:vch NARRATION]

Set as:$$Number:$Currat

 

@sattam BHAI KINDLY SUGGEST ON THIS ALSO