IT Answers » CL Commands

Deleting IFS records after so many days

Rrbond07 — Sun, 13 Jan 2013 19:32:38 +0000

New Answer by Michael Tidmarsh

CL command to compare *QRYDFN files

danmd5systemad — Thu, 08 Dec 2011 11:04:05 +0000

New Answer by MTidmarsh

create 39 barcode using PCL commands

Bamer1 — Thu, 06 Oct 2011 12:34:10 +0000

what is PCL command for 39 barcode sent from AS400

Using CL Commands

Gv1979 — Tue, 20 Sep 2011 10:27:40 +0000

Hi,

How run the cl commands using rpg/400?

how to use the chkobj command in rpg program?
(That mean without using command line from wrkmbrpdm?

Need to use the cpytoimpf command but have problem

AS400PCFileTransfer16 — Fri, 17 Jun 2011 18:55:22 +0000

I have an existing process that uses the following command the only change was to have it use the tildes (~) as a field delimiter.

CPYTOIMPF FROMFILE(*LIBL/BDPRISM) TOSTMF(‘/home/attach/vhaeom2/vhasales.txt’) MBROPT(*REPLACE) STMFCODPAG(1252) RCDDLM(*CRLF) DTAFMT(*FIXED) STRDLM(*NONE) FLDDLM(‘~’) But the command the command execute without error but the tilde is not place between the fields. Below is a small section of the file.

AE0443010 120180C00 00071015623 LIPITOR TAB 20 AE0443010 120180C00 07061015520 KERR VIAL PLAST CR-20 180 AE0443010 120180C00 07061014030 KERR VIAL PLAST PPV-30 AE0443010 120180C00 07061014060 KERR VIAL PLAST PPV-60

What am I doing wrong.

Write a CL to update all jobds on system

CapitalT — Tue, 17 May 2011 16:28:22 +0000

I need to write a CL that will change every jobd on our system w/o having to do it manually.

Writing command WJ that will do the same thing as WRKACTJOB?

Aringarosa — Fri, 06 May 2011 15:41:08 +0000

need you help once more. I want to create a cl program. instead of wrinting wrkactjob, i want to write wj having the same result. The problem is i don´t know programming, so if somebody could make a clp to me so i could read it and understand it, it would be great. Tanx a lot

CPA4088 responds automatically?

PutzGrilla — Sat, 30 Apr 2011 09:43:36 +0000

Hello Friends,

I Have a CL with commands below

SAVLIB:     SAVLIB     LIB(BKPLIB) DEV(TAP01) ENDOPT(*LEAVE) +                         SAVACT(*SYNCLIB) SAVACTMSGQ(SYNCBKP) +                         ACCPTH(*YES) OUTPUT(*PRINT)              MONMSG     MSGID(CPF0000) EXEC(GOTO CMDLBL(ERROR))              GOTO       CMDLBL(SAIDA)

ERROR:      SNDMSG     MSG(‘TEXT TEXT TEXT TEXT’) TOUSR(QSYSOPR)

SAIDA:      ENDPGM

When the tape needs a second volume, the process ends with “C” on the message CPA4088 Load next tape volume on device TAP01. (C G)   Reply . . :   C

                       Work with System Reply List Entries

                                                   Sequence Message Opt   Number   ID       Reply       Compare Value              1    CPA8424 G           *NONE          10    CPA0700 D           *NONE          11    CPA3709 G           *NONE          20    RPG0000 D           *NONE          30    CBE0000 D           *NONE          40    PLI0000 D           *NONE         100    CPA3394 G           *NONE         101    CPA576E R           *NONE         102    CPA4002 I           *NONE         103    CPA572C R           *NONE         104    CPA575D R           *NONE         105    CPA0701 I           *NONE         106    CPF2103 I           *NONE         107    RPG1299 G           *NONE         955    CPA5737 C           ‘Q1PLIN Q1PCTL’            3282    CPA32B2 I           ‘ISERIES_NAVIGATOR’        3293    CPA32B2 I           *NONE

OBS: Why this message CPA4088 responds automatically?

Journaling on i5 when updating from .net

ZIS — Wed, 20 Apr 2011 15:41:23 +0000

We need to update some i5 files (under v6r1) from SQL in a .NET environment. Can I control this process via SQL or will I need to call CL commands from .NET to start/stop journaling & commitment control?

Interactive command in CL

Fmext001 — Wed, 13 Apr 2011 14:13:00 +0000

How to successfully compile a CL program that has an interactive command such as STRSEU?