Picture Clause

Picture Clause

BU: variable PIC / PICTURE karater

Berguna untuk menentukan jenis tipe data untuk variable saja, tetapi dapat juga digunakan untuk menampilkan bentuk data output. Berikut ini Picture Clause yang digunakan dalam bahasa COBOL :
+ Picture karakter 9

Digunakan untuk menyimpan data dalam bentuk numeric, sedangkan untuk menentukan jumlah data yang disimpan ditentukan oleh banyaknya 9 yang anda ketik setelah perintah PlC , perhatikan contoh !
HARGA PlC 9999. - berarti variable harga memiliki 4 digit (posisi) angka numeric, tetapi anda dapat juga menyingkatnya dengan menggunakan tanda kurung “( )”, sehingga menjadi :
HARGA PlC 9(4).

+ Picture karakter A.

Digunakan untuk menyimpan data dalam bentuk alphabetic dan bersifat rata kiri.. Ketentuan jumlah karakter untuk Picture karakter A sama dengan ketentuan jumlah karakter Picture karakter 9.
+ Picture karakter X.

Digunakan untuk menyimpan data dalam bentuk alphanumeric atau campuran huruf, angka dan special karakter. Bersifat rata kiri.
+ Picture karakter V.

Digunakan untuk jumlah digit dibelakang koma untuk bilangan decimal, jadi picture karakter jenis ini hanya bisa digunakan bersama picture karakter 9.
Contoh :

02 HARGA PlC 999V99 - 234.50 -5 digit dan 2 digit belakang koma.
02 HARGA PlC 9(4)V9(3) -4654.125 - 7 digit dan 3 digit belakang koma.
+ Picture Karakter P.

Digunakan bersama dengan picture karakter V, digunakan untuk menimbulkan angka 0, picture karakter ini jarang digunakan.
Contoh :

02 HARGA PlC 9PPV - 500.

+ Picture Karakter S.

Digunakan untuk memberi tanda minus (-), karena bila digunakan picture karakter 9 nilai default yang ditampilkan hanya nilai positif walaupun hasil dari perhitungan adalah negatif. Jadi dengan picture karakter ini anda dapat menampilkan nilai negatif. Perlu diingat bahwa penggunaan pic karakter s tidak menambah jumlah digit.
Contoh :
02 SALDO PlC S99 --25 - tetap 2 digit.



3.2. Picture Editing.

Sebelum membahas picture editing, ada baiknya kita tahu perbedaan picture clause dan picture editing. Pebedaan picture clause dan picture editing adalah :
Pada picture clause digunakan untuk memberikan informasi pada compiler COBOL mengatur memori untuk data yang disimpan dan akan digunakan kemudian, sedangkan picture editing digunakan untuk melakukan perubahan bentuk data yang akan dicetak untuk output, agar lebih mudah dibaca.
Catatan :

Picture editing tidak dapat digunakan langsung sebagai variable penerima, seperti halnya picture clause.
Berikut ini picture editing pada bahasa pemrograman COBOL.


+ Picture editing karakter Z.

Digunakan untuk menghilangkan nilai 0 didepan bilangan, digunakan bersama picture clause 9.
Contoh :

12345 - PlC ZZZZZ - 12345.

0123 - PlC ZZZZZ - 123.

00123 - PlC Z9999 - 0123.

+ Picture editing karakter $.

Untuk memberikan tanda $ pada output, letaknya diujung kiri. Contoh :
12345 - PlC $ 99999 - $12345.

+ Picture editing karakter (.) dan (,).

Karakter (.) digunakan untuk menunjukan letak posisi koma pada bilangan desimal. Karakter (,) digunakan untuk memberi bentuk koma, biasanya digunakan untuk menyatakan nilai uang.
Contoh :

123.45 - PlC 999.99 - 123.45

+Picture editing karakter “-“
Jika anda menggunakan picture editing jenis ini maka bilangan akan dicetak minus, bila bernilai negatif , tetapi bila bernilai positif akan diganti dengan blank.
Contoh :

12345 - PlC –9(5) - 12345

+Picture editing karakter “+”

Digunakan untuk memberikan tanda plus pada permulaan atau pada bagian akhir dari suatu bilangan. Jika nilai yang diberikan bernilai negatif (-) maka akan ditampilkan minus, tetapi jika nilai yang diterima adalah positif maka akan ditampilkan tanda positif (+).

+ Picture editing karakter DB dan CR.

Untuk memberikan akhiran DB atau CR pada suatu bilangan, biasanya digunakan untuk aplikasi akuntansi.
Contoh :

12345 - PlC 9(5)CR - 12345CR

+ Picture editing karakter B.

Digunakan untuk menyisipkan blank pada posisi karakter B itu ada, untuk mengedit nilai data bukan numeric.
Contoh:

123456 - PlC 99B9B999 - 12 3 456

+Picture editing karakter “*”
Digunakan untuk mengganti nilai 0 pada suatu bilangan dengan tanda *
Contoh :

123- PlC **999 -**123

+ Picture editing karakter 0.

Digunakan untuk menyisipkan karakter 0 dimana karakter 0 itu berada.
Contoh :

12345 - PlC 9(5)0 - 123450

+ Picture editing karakter “/”.

Digunakan untuk menyisipkan tanda “/” ada posisi karakter “/”

berada.

0 komentar:

Posting Komentar

Jumat, 12 November 2010

Picture Clause

Picture Clause

BU: variable PIC / PICTURE karater

Berguna untuk menentukan jenis tipe data untuk variable saja, tetapi dapat juga digunakan untuk menampilkan bentuk data output. Berikut ini Picture Clause yang digunakan dalam bahasa COBOL :
+ Picture karakter 9

Digunakan untuk menyimpan data dalam bentuk numeric, sedangkan untuk menentukan jumlah data yang disimpan ditentukan oleh banyaknya 9 yang anda ketik setelah perintah PlC , perhatikan contoh !
HARGA PlC 9999. - berarti variable harga memiliki 4 digit (posisi) angka numeric, tetapi anda dapat juga menyingkatnya dengan menggunakan tanda kurung “( )”, sehingga menjadi :
HARGA PlC 9(4).

+ Picture karakter A.

Digunakan untuk menyimpan data dalam bentuk alphabetic dan bersifat rata kiri.. Ketentuan jumlah karakter untuk Picture karakter A sama dengan ketentuan jumlah karakter Picture karakter 9.
+ Picture karakter X.

Digunakan untuk menyimpan data dalam bentuk alphanumeric atau campuran huruf, angka dan special karakter. Bersifat rata kiri.
+ Picture karakter V.

Digunakan untuk jumlah digit dibelakang koma untuk bilangan decimal, jadi picture karakter jenis ini hanya bisa digunakan bersama picture karakter 9.
Contoh :

02 HARGA PlC 999V99 - 234.50 -5 digit dan 2 digit belakang koma.
02 HARGA PlC 9(4)V9(3) -4654.125 - 7 digit dan 3 digit belakang koma.
+ Picture Karakter P.

Digunakan bersama dengan picture karakter V, digunakan untuk menimbulkan angka 0, picture karakter ini jarang digunakan.
Contoh :

02 HARGA PlC 9PPV - 500.

+ Picture Karakter S.

Digunakan untuk memberi tanda minus (-), karena bila digunakan picture karakter 9 nilai default yang ditampilkan hanya nilai positif walaupun hasil dari perhitungan adalah negatif. Jadi dengan picture karakter ini anda dapat menampilkan nilai negatif. Perlu diingat bahwa penggunaan pic karakter s tidak menambah jumlah digit.
Contoh :
02 SALDO PlC S99 --25 - tetap 2 digit.



3.2. Picture Editing.

Sebelum membahas picture editing, ada baiknya kita tahu perbedaan picture clause dan picture editing. Pebedaan picture clause dan picture editing adalah :
Pada picture clause digunakan untuk memberikan informasi pada compiler COBOL mengatur memori untuk data yang disimpan dan akan digunakan kemudian, sedangkan picture editing digunakan untuk melakukan perubahan bentuk data yang akan dicetak untuk output, agar lebih mudah dibaca.
Catatan :

Picture editing tidak dapat digunakan langsung sebagai variable penerima, seperti halnya picture clause.
Berikut ini picture editing pada bahasa pemrograman COBOL.


+ Picture editing karakter Z.

Digunakan untuk menghilangkan nilai 0 didepan bilangan, digunakan bersama picture clause 9.
Contoh :

12345 - PlC ZZZZZ - 12345.

0123 - PlC ZZZZZ - 123.

00123 - PlC Z9999 - 0123.

+ Picture editing karakter $.

Untuk memberikan tanda $ pada output, letaknya diujung kiri. Contoh :
12345 - PlC $ 99999 - $12345.

+ Picture editing karakter (.) dan (,).

Karakter (.) digunakan untuk menunjukan letak posisi koma pada bilangan desimal. Karakter (,) digunakan untuk memberi bentuk koma, biasanya digunakan untuk menyatakan nilai uang.
Contoh :

123.45 - PlC 999.99 - 123.45

+Picture editing karakter “-“
Jika anda menggunakan picture editing jenis ini maka bilangan akan dicetak minus, bila bernilai negatif , tetapi bila bernilai positif akan diganti dengan blank.
Contoh :

12345 - PlC –9(5) - 12345

+Picture editing karakter “+”

Digunakan untuk memberikan tanda plus pada permulaan atau pada bagian akhir dari suatu bilangan. Jika nilai yang diberikan bernilai negatif (-) maka akan ditampilkan minus, tetapi jika nilai yang diterima adalah positif maka akan ditampilkan tanda positif (+).

+ Picture editing karakter DB dan CR.

Untuk memberikan akhiran DB atau CR pada suatu bilangan, biasanya digunakan untuk aplikasi akuntansi.
Contoh :

12345 - PlC 9(5)CR - 12345CR

+ Picture editing karakter B.

Digunakan untuk menyisipkan blank pada posisi karakter B itu ada, untuk mengedit nilai data bukan numeric.
Contoh:

123456 - PlC 99B9B999 - 12 3 456

+Picture editing karakter “*”
Digunakan untuk mengganti nilai 0 pada suatu bilangan dengan tanda *
Contoh :

123- PlC **999 -**123

+ Picture editing karakter 0.

Digunakan untuk menyisipkan karakter 0 dimana karakter 0 itu berada.
Contoh :

12345 - PlC 9(5)0 - 123450

+ Picture editing karakter “/”.

Digunakan untuk menyisipkan tanda “/” ada posisi karakter “/”

berada.

Tidak ada komentar:

Posting Komentar