Welcome, guest! Login / Register - Why register?
Psst.. new poll here.
[email protected] webmail now available. Want one? Go here.
Cannot use outlook/hotmail/live here to register as they blocking our mail servers. #microsoftdeez
Obey the Epel!

Paste

Pasted as Java by registered user chrisonline ( 4 years ago )
/**
    * calculateAmounts - Calculate amounts for cash discount
    */
   public void calculateAmounts(double XXCDPC) {
      XXCDPC /= 100;
      if (INVIP.getIVTP().EQ("01") || CRS722DS.getP9GRNT() == 1) {
         XNBASE = XTORTO;
      } else {
         XNBASE = XNORTO;
      }
      XNBASE -= XNPIAM; // subtract advance invoice amount(XNPIAM) amount from XNBASE
      if (OHEAD.getTINC() == 1 && CRS722DS.getP9GRNT() == 2 || OHEAD.getTINC() == 0 && CRS722DS.getP9GRNT() == 2 && INVIP.getIVTP().EQ("01")) {
         XNBASE -= XNVTAM;
      }
      XNCASH = mvxHalfAdjust((double) XNBASE * XXCDPC, OHEAD.getDCCD());
      XNTPAY = XTORTO - XNCASH - XNPIAM; // subtract advance invoice amount (XNPIAM) amount from XTORT
      PXRTVROU.PPROAM = 0d;
      PXRTVROU.PPCONO = LDAZD.CONO;
      PXRTVROU.PPCUCD.move(DHEAD.getCUCD());
      PXRTVROU.PPROPP = OTYPE.getROPP();
      PXRTVROU.PPAMRO = XNTPAY;
      PXRTVROU.PPNERR = 0;
      PXRTVROU.CRTVROU();
      if (PXRTVROU.PPNERR == 1 && OTYPE.getROPP() != 0) {
         PXRTVROU.PPROPP = 0;
         PXRTVROU.PPNERR = 0;
         PXRTVROU.CRTVROU();
      }
      if (PXRTVROU.PPNERR == 0) {
         XNTPAY = PXRTVROU.PPROAM;
      }
      XNTPAY = mvxHalfAdjust(XNTPAY, OHEAD.getDCCD());
      // Convert fields to alpha
      this.PXDCCD = DSCUCD.getYQDCCD();
      this.PXFLDD = 13;
      this.PXEDTC = 'J';
      this.PXDCFM = LDAZD.DCFM;
      this.PXNUM = XNCASH;
      this.PXALPH.clear();
      SRCOMNUM.COMNUM();
      OUT.WYTCAS.moveRight(this.PXALPH);
      this.PXDCCD = DSCUCD.getYQDCCD();
      this.PXFLDD = 13;
      this.PXEDTC = 'J';
      this.PXDCFM = LDAZD.DCFM;
      this.PXNUM = XNTPAY;
      this.PXALPH.clear();
      SRCOMNUM.COMNUM();
      OUT.WYTPAY.moveRight(this.PXALPH);
   }

 

Revise this Paste

Your Name: Code Language: