Hello,
I'm happy to tell you that I did this in a previous assignment. I did it
for 8.5F but it will work for 8.6.
Add this to your code (ppptrp03.p):
<BLOCKQUOTE><font size="1" face="Arial, Verdana">code:</font><HR><pre>
/* define variable */
define variable csset like cs_set.
/* add this at the bottom of the frame definition */
csset colon 15 " BLANK = Current" skip(1)
with frame a side-labels width 80 attr-space THREE-D.
/* add this at the end of the UPDATE statement */
csset
WITH frame a.
/* add this at the end of the "mfquoter.i" list */
{mfquoter.i csset}
/* add this block of code... */
if csset <> "" then do:
find sct_det where sct_sim = csset
and sct_part = in_part
and sct_site = in_site no-lock no-error.
assign curcst = if avail sct_det then sct_cst_tot else 0.
end.
/* after this... around line 215 */
if available pl_mstr and not first-prod
then view frame phead1.
first-prod = no.
/* ... end before this */
ext_std = round(total_qty_oh * glxcst,2).
ext_cur = round(total_qty_oh * curcst,2).
cost_var = 0.
[/code]
If you do not have a browse for the "csset" variable try to add this record
in 36.7.21 (Window Help Maintenance):
<BLOCKQUOTE><font size="1" face="Arial, Verdana">quote:</font><HR>
+--------------------------------------------------------------------+
| Window Help Maintenance (1-Procedure Help) 12/14/99|
+--------------------------------------------------------------------+
+--------------------------------------------------------------------+
| Field: csset |
| Calling Procedure: |
+--------------------------------------------------------------------+
+ Description -------------------------------------------------------+
| Description: Cost Set |
| Procedure To Execute: cslu001.p |
| Window Starts At Row: 7 |
| Lines In Window: 6 |
+--------------------------------------------------------------------+
<HR></BLOCKQUOTE>
It the browse still does not work, try to find a variable that "looks" like
"csset" and attach the browse to it.
Hope this will help!!
Regards,
Rejean Drouin, CDID USA
418-226-6790 (cell)