Konverzní rutina

Konverzní rutina CONVERSION_EXIT_ALPHA dokáže upravit znakový řetězec o počáteční nuly. Můžeme je přidat, nebo naopak odebrat. Toto se náramně hodí pro případ, že Vám zlobí výběr pomocí příkazu select. Většinou jde o problém, že máte vstupní parametr číslo materiálu 123456 (celkem 6 znaků) ale select očekává 18 znaků včetně počátečních nul 000000000000123456. Případně naopak.
přidáváme počáteční nuly

REPORT ZCONV.

data: par1(10),

par2(10).

par1 = '123456'.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

INPUT = par1.

IMPORTING

OUTPUT = par2.

write: / par1.

write: / par2.

pokud chceme obráceně nuly odebrat pozměníme kod programu

REPORT ZCONV.

data: par1(10),

par2(10).

par1 = '0000123456'.

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_OUTPUT'

EXPORTING

INPUT = par1.

IMPORTING

OUTPUT = par2.

write: / par1.

write: / par2.

Použití konverzní rutiny též odstraní většinu problémů při použití funkčních modulů.

Napsat komentář

Vaše emailová adresa nebude zveřejněna. Vyžadované informace jsou označeny *

*