Copybook Error

Hari ini, hari sabtu.
Meski seharusnya libur, /me ke kantor...
soalnya penasaran banget ama program yang 2 hari lalu kubuat... masa sih error ??

Sejak tadi siang jam 11.00 an aku mulai menutak-atik code ini..
dilihat dari sisi manapun benar.. tapi kok error ya.. T__T

pesen errornya selalu :

"JGOTGS01 RUNTGS01 - ABEND=S0C7 U0000 REASON=00000007 401"

Dicari ke mana2 (googling).. tetep gak menemukan pesan error yang pasti (beberapa situs bilang gini, yang lain bilang gitu).. dan dari beberapa diantaranya katanya sih karena invalid data...

this error is caused by an data exception, occurs due when we entered
non-numeric data in numeric fieid.

kucari ke mana2.. gak ketemu juga. @_@

Pada saat sudah hampir putus asa (sebenarnya sih udah putus asa dari 1/2 jam yang lalu) akhirnya... kututup copybook untuk mengatasi ABEND (abnormal Ended) error.

So kalo ada error, TIDAK kuserahkan ke ABEND routine standard, tapi kutangani sendiri menggunakan message dan log ke sysout.

Dan... It Works ! WOW !

Aneh... padahal biasanya ABEND routine ini njalaninnya ya.. seperti yang kupake pada program ini...

Ada yang ngubah ? Mungkin saja...

@_@ huuuuh... 4 jam hanya gara2 Routine Standard yang tidak standard lagi ???

so... pelajaran yang diambil :

1. Kalo programmu error, selalu ada yang salah. Compiler selalu benar. Mungkin error bukan di programmu, bisa saja di environment, di resource yang kamu pake, di security access, atau di otakmu :D Pokoknya, komputer selalu benar !

2. Copybook, Library, Shared Library buatan manusia, dan bisa dibuah manusia. Biasanya benar, tapi bisa juga salah, atau bisa saja tadinya benar tapi jadi salah. So.. kalo kamu yakin environment udah benar, program udah benar, check library / copybooknya :)

3. Jangan putus asa... jangan putus asa dan jangan putus asa !!!
Sudah berapa kali kita mendapatkan keajaiban gara2 tidak putus asa ini ? Teruskan budaya tidak putus asamu !!


Ah.. capek.. pulang ah.. otak udah puanaaaaas.... yang penting udah ketemu di mana letak kesalahannya, dan program sudah jalan ( meski belum sempurna ). Ntar disempurnakan di hari berikutnya (Minggu atau senin ya? )

See yaaa