Hi
I would like to write a simple CIM that delete records in 2.1.1 (Customer maintenance).
The problem is that I don't know how to put F5 or Ctrl-D in the CIM file.
This is the program I wrote:
def var i as int.
DEF VAR lBRun AS LOG NO-UNDO.
def var ipcprog as char init "yyadcsmt.p".
{mfdtitle.i}
output to "C:\mfg\EndU\delcim.cim".
for each xxDel_cust no-lock:
export xxcm_addr.
???? - THE DELETE COMMAND ???
export "y".
end.
OUTPUT CLOSE.
INPUT FROM "C:\mfg\EndU\delcim.cim".
OUTPUT TO "C:\mfg\EndU\delcim.log".
ASSIGN
lBRun = batchrun
batchrun = Yes.
{gprun.i ipcProg}
batchrun = lBRun.
OUTPUT CLOSE.
INPUT CLOSE.
Is there's a way to do it?
Thanks
Falcor
I would like to write a simple CIM that delete records in 2.1.1 (Customer maintenance).
The problem is that I don't know how to put F5 or Ctrl-D in the CIM file.
This is the program I wrote:
def var i as int.
DEF VAR lBRun AS LOG NO-UNDO.
def var ipcprog as char init "yyadcsmt.p".
{mfdtitle.i}
output to "C:\mfg\EndU\delcim.cim".
for each xxDel_cust no-lock:
export xxcm_addr.
???? - THE DELETE COMMAND ???
export "y".
end.
OUTPUT CLOSE.
INPUT FROM "C:\mfg\EndU\delcim.cim".
OUTPUT TO "C:\mfg\EndU\delcim.log".
ASSIGN
lBRun = batchrun
batchrun = Yes.
{gprun.i ipcProg}
batchrun = lBRun.
OUTPUT CLOSE.
INPUT CLOSE.
Is there's a way to do it?
Thanks
Falcor
