Hai, Berikut sample code untuk konversi value variable ke dalam bentuk currency menggunakan write statement.
Berikut rumus sintax nya
WRITE {source|(source_name)} TO destination
[format_options].
Contoh penggunaan:
Misalkan kita ingin merubah format 90000 menjadi 90.000 (Format Currency IDR), berikut sample codenya:
REPORT ZILMUPROGRAM.
DATA: SALES TYPE P VALUE 90000,
SALES_V TYPE C LENGTH 20.
WRITE SALES TO SALES_V CURRENCY 'IDR'.
WRITE SALES_V.
Jika kode tersebut dijalankan maka akan menjadi
Semoga Membantu