Versions Compared

Old Version 3

changes.mady.by.user Rieko Saitoh

Saved on

compared with

New Version Current

changes.mady.by.user Rieko Saitoh

Saved on

Key

  • This line was added.
  • This line was removed.
  • Formatting was changed.

...

DEFINE     FIELD(#PNME) TYPE(*CHAR) LENGTH(20)
DEFINE     FIELD(#PVAL) TYPE(*CHAR) LENGTH(20)
DEF_LIST   NAME(#PLST) FIELDS((#PNME) (#PVAL)) TYPE(*WORKING)
 

CHANGE     FIELD(#PNME) TO('''X-Invoice''')
CHANGE     FIELD(#PVAL) TO(T9300)
ADD_ENTRY  TO_LIST(#PLST)
 
USE        BUILTIN(JSM_COMMAND) WITH_ARGS('SET PROPERTY(*LIST) SERVICE_LIST(PNME,PVAL)') TO_GET(#JSMSTS #JSMMSG #PLST)