進捗データベース4GL - エクスポートファイルの計算数

Question

以下のステートメントが実行されます。しかし、私はwShipment.Volumeを1728で割り、その結果をエクスポートします。

たとえば、wShipment.Volumeが3456の場合、結果2をレポートにエクスポートする必要があります。

OUTPUT TO \\tsclient\U\All_Orders_item.csv. 

FOR EACH r4_wms.wShipmentDet NO-LOCK, 

FIRST r4_wms.wShipment OF r4_wms.wShipmentDet NO-LOCK where wShipment.shipmentNO>6500 and wShipmentDet.Owner="MIDEAUS", 

FIRST r4_wms.wOrder OF r4_wms.wShipmentDet NO-LOCK, 

FIRST r4_wms.wOrderline OF r4_wms.wShipmentDet NO-LOCK 
BY wShipment.ShipmentNo DESC: 

EXPORT DELIMITER "," 

      wOrder.OrderNo 

      wShipment.Volume 

      wShipment.Weight SKIP. 

END. 

OUTPUT CLOSE. 

Answer 1

あなただけの1728で分割したい場合は、EXPORT文でその権利を行うことができます。

wShipment.Volume/1728 

しかし、あなたは立方フィートを探しているように「1728」が聞こえること（12× 12×12）。あなたがボリュームの立方フィートの最小全体の数が必要な場合は、このようにそれを計算することができます。

DEFINE VARIABLE RoundedVol AS INTEGER NO-UNDO. 

RoundedVol = TRUNCATE(wShipment.Volume/1728, 0). 
IF wShipment.Volume MOD 1728 > 0 THEN 
    RoundedVol = RoundedVol + 1. 

その後EXPORTステートメントにRoundedVolを追加します。それはあなたに立方フィートを任意の端数で切り上げます。したがって、1729のボリュームの場合、2になります。