Quantcast
Channel: Sage 100
Viewing all articles
Browse latest Browse all 36990

Forum Post: RE: RMA Data Entry

$
0
0
Hi Here is my modified script on  Post_read of RA_ReturnHeader ---------------------------------------------------- rma = "" oLines = 0 invno = "" dtlinv = "" dtlrma = "" StartInvNo = "       " retval = oBusObj.EditState             If retval 2 then                         ' this means it is an existing RMA retval = oBusObj.GetValue("RMANo$",rma) Set oLines = oBusObj.AsObject(oBusObj.Lines) retval = oLines.SetKeyValue("RMANo$",rma) retval = oLines.SetKeyValue("LineKey$","000001")   ' this is to grab first detail line retval = oLines.SetKey() retval = oLines.GetValue("RMANo$",dtlrma)   retval = oLines.GetValue("InvoiceNo$",dtlinv) retval = oSession.AsObject(oSession.UI).MessageBox("", "Invoice No " + dtlinv)  ' this is correct StartInvNo = dtlinv retval = oSession.AsObject(oSession.UI).MessageBox("", "start Invoice No " + StartInvNo) ' this is correct retval = oScript.SetStorageVar("StartInvNo$", StartInvNo)         ' this somehow fails evident by next message where retval comes as 0 retval = oSession.AsObject(oSession.UI).MessageBox("", "storage retval " + CStr(retval)) End if ------------------------------------------------------------- My question is why setstorage call is failing. My idea is set the storege variable and then retrieve it in Details tab so I can test if user is continuing with the same inv # or not. Any help will be appreciated.  

Viewing all articles
Browse latest Browse all 36990

Trending Articles



<script src="https://jsc.adskeeper.com/r/s/rssing.com.1596347.js" async> </script>