1 Reply Latest reply on Nov 19, 2014 11:11 AM by philmodjunk

    IWP Stops

    Kirk_1

      Title

      IWP Stops

      Post

      I'm using pro 12.

      One of my IWP scripts has developed a bad habit of showing the layouts its going to.

      I understand the main cause of this is a script step that is not compatible with IWP. I had a few in there and eliminated them. It still freezes at the same spot.

      This is my script. It stops on after the find I've highlighted in red. The debugger does not stop on an error when i run it on a client and there is a found set after the find. It is going where it is supposed to and finding what it is supposed to find. Just stops after that.

       

             
      • If [ not PatternCount ( Get ( ApplicationVersion ) ; "Server" ) ]
      •      
      • If [ Get ( AccountPrivilegeSetName ) ≠ "[Full Access]" ]
      •      
      • Allow User Abort [ Off ]
      •      
      • End If
      •      
      • If [ PatternCount ( ( Get ( ApplicationVersion ) ) ; "web" ) ]
      •      
      • Show/Hide Toolbars [ Lock; Hide ]
      •      
      • Else
      •      
      • Freeze Window
      •      
      • End If
      •      
      • #
      •      
      • End If
      •      
      • #
      •      
      • Set Error Capture [ On ]
      •      
      • If [ not IsEmpty ( Rates Display::RD_PKID ) ]
      •      
      • #Truck Load email
      •      
      • If [ Quote::QTLTL_TK = "TK" ]
      •      
      • Send Mail [ Send via E-mail Client; To: "cservice@flgsi.com"; Subject: "Rate and Availability Request"; Message: Quote::QTInfoField_iwp ]
      •      
      • Exit Script [ ]
      •      
      • End If
      •      
      • #Rates already exist
      •      
      • If [ 1 ]
      •      
      • Set Variable [ $portalCount; Value:Count ( Rates Display::RD_PKID ) ]
      •      
      • Go to Related Record [ From table: “Rates Display”; Using layout: “web_rates_display” (Rates Display) ] [ Show only related records ]
      •      
      • If [ Get ( FoundCount ) ≠ $portalCount or Get ( LastError ) ]
      •      
      • Exit Script [ ]
      •      
      • End If
      •      
      • Delete All Records [ No dialog ]
      •      
      • Go to Layout [ original layout ]
      •      
      • Else
      •      
      • End If
      •      
      • End If
      •      
      • Go to Layout [ “FrontierLogistics” (FrontierLogistics) ]
      •      
      • Set Variable [ $fsc; Value:FrontierLogistics::FL_FSC ]
      •      
      • Go to Layout [ “IWP_Quote” (Quote) ]
      •      
      • Set Variable [ $class1; Value:Quote Description::DTClass ]
      •      
      • Set Variable [ $class2; Value:Quote Description 2::DTClass ]
      •      
      • Set Variable [ $class3; Value:Quote Description 3::DTClass ]
      •      
      • Set Variable [ $weight1; Value:Quote::QTWeight1 ]
      •      
      • Set Variable [ $weight2; Value:Quote::QTWeight2 ]
      •      
      • Set Variable [ $weight3; Value:Quote::QTWeight3 ]
      •      
      • Set Variable [ $ozip; Value:Quote::QTOriginZip ]
      •      
      • Set Variable [ $shipstate_intra; Value:Quote::QTShipperState ]
      •      
      • Set Variable [ $shipstate; Value:Case ( PatternCount ( "AZ CA CO ID MT NV NM OR UT WA WY";Quote::QTShipperState); "~W"; PatternCount ( "IL IN IA KY MI OH WV WI AR KS LA MO OK TX MN NE ND SD " ; Quote::QTShipperState) ; "~MW"; PatternCount ( "CT DE DC MA ME MD MS NH NJ NY PA RI VT AL FL GA MS NC SC TN VA" ;Quote::QTShipperState ) ; "~E" ; ) ]
      •      
      • Set Variable [ $constate_intra; Value:Quote::QTConsigneeState ]
      •      
      • Set Variable [ $constate; Value:Case ( PatternCount ( "AZ CA CO ID MT NV NM OR UT WA WY"; Quote::QTConsigneeState); "~W"; PatternCount ( "IL IN IA KY MI OH WV WI AR KS LA MO OK TX MN NE ND SD " ;Quote::QTConsigneeState) ; "~MW"; PatternCount ( "CT DE DC ME MA MD MS NH NJ NY PA RI VT AL FL GA MS NC SC TN VA" ; Quote::QTConsigneeState ) ; "~E" ; ) ]
      •      
      • Set Variable [ $dzip; Value:Quote::QTDestinationZip ]
      •      
      • Set Variable [ $custid; Value:Quote::QT_FKCustomer ]
      •      
      • Go to Layout [ “Discounts FAK and Assessorial ” (Customer) ]
      •      
      • Enter Find Mode [ ]
      •      
      • Set Field [ Customer::CS__PKCustomerID; $custid ]
      •      
      • Perform Find [ ]

       

             
      • If [ Get ( FoundCount ) and not Get ( LastError ) ]
      •      
      • Go to Portal Row [ Select; First ]
      •      
      • Loop
      •      
      • Exit Loop If [ IsEmpty ( Discounts::D_FKVendor ) ]
      •      
      • Set Variable [ $portalRow; Value:Get ( ActivePortalRowNumber ) ]
      •      
      • Set Variable [ $carrier; Value:Vendor::VNName ]
      •      
      • Set Variable [ $LimitedAccess; Value:Discounts::DCLimited Access ]