DO FORM coDeptAddEdit WITH ; lcDesc,lcScreenOption,lnCost,llConfirm,llEnforce,llTimeChg,lcDeptChg,lnID,lcStocLoc, ; shift1start,shift1end,shift2start,shift2end,shift3start,shift3end,llPrintNew, ; llPrintEdit,llPrintMove,llPrintCancel,lcschedule,lval1,lval2,lval3,lval4,lval5,lval6,lval7, ; lval8,lval9,lval10,lcPrinter2,lcPrinter3,llFreeText,llSB_PT,lnSBType,lnRowHeight, ; llShowUtil,llBtn1,llBtn2,llBtn3,lsendhl7chg,dChargeDate,lcPbarID TO llUpdateand here is the code in the init of the form (sorry it's one long line)
PARAMETERS tcDesc,tcScreen,tiRoomCost,tlConfirm,tlEnforce,tlTimeCharges,tcDeptID,tiDeptID,tcStockLoc,tc1Start,tc1End,tc2Start,tc2End,tc3Start,tc3End,tlprint1,tlprint2,tlprint3,tlPrint4,tcschedule,val1,val2,val3,val4,val5,val6,val7,val8,val9,val10,tcPrt2,tcPrt3,tlFreeText,tlSBPT,tnSBType,tnRow,tlShowUtil,tlbtn1,tlbtn2,tlbtn3,tlSendChg,tdChgDate,tcPbarID WAIT [# from pcount=]+TRANSFORM(PCOUNT()) windowThe wait winodw returns # from pcount=43