Create RPGLE program from text

40 pts.
Tags:
AS/400
RPG
RPGLE
I have been looking for a way to delete audit journal receivers by date. I found a program online by Carsten Flensburg. I've downloaded the files for this but they are in text form. I am not a developer, maybe a novice CL programmer :) .
There are 4 files he has created:
Member

Name     Source Description

CBX959 RPGLE Remove Journal Receivers -- CPP

CBX959H PNLGRP Remove Journal Receivers -- Help

CBX959V RPGLE Remove Journal Receivers -- VCP

CBX959X CMD Remove Journal Receivers -- CMD
Is there a simple way to convert to the program type listed? I am not opposed to copying and pasting to create code but I've never created RPG or RPGLE programs. Any help is appreciated.
0

Answer Wiki

Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.

Discuss This Question: 6  Replies

 
There was an error processing your information. Please try again later.
Thanks. We'll let you know when a new response is added.
Send me notifications when members answer or reply to this question.
  • CharlieBrowne

    Since you are on the AS/400, it is all built in for you. Journal can have attributes set to Manage and Delete Receivers. Look at the CHGJRN command and look at the help text (F1) to see how you need to set values to get the results you are looking for.

    Please come back if you have any specific questions once you have competed this task.

    Thanks for coming to ITKE

    62,385 pointsBadges:
    report
  • ToddN2000
    What was the link to the site? It may help us better understand what you are looking for. Why reinvent the wheel if you don't have to. Take Charlies advice and use what is already available from IBM.
    Like he said if you are still looking for more, come back and we can help.
    135,525 pointsBadges:
    report
  • BigT2112
    I am familiar with the chgjrn command but I thought that you can't delete any old ones according to your specs on the delete parameter if any receiver other than the attached one is in the same directory. I was just looking for something quick instead of manually deleting or moving a bunch of files. I appreciate your answers.
    40 pointsBadges:
    report
  • BigKat
    FTP to the IBMi,
    'cd library' to the sourcefile library,
    'put mbrname.txt sourcfile.mbrname' for each text file

    Go to the IBMi in PDM and set the type (CMD, RPGLE, PNLGRP)
    9,460 pointsBadges:
    report
  • BigKat
    you can do similar with 'get sourcefile.mbrname mbrname.txt' to get a text copy of your program source too.
    9,460 pointsBadges:
    report
  • BigKat
    you can automate this from your (Windows) PC by creating a file called transfer.bat with NotePad in the same directory you have your text members
    @echo off
    C:\Windows\System32\ftp.exe -s:%0
    goto done
    open IBMiName
    UserProfile
    password
    prompt off
    cd SourceLib
    put CBX959.txt qrpglesrc.CBX959
    put CBX959H.txt qpnlsrc.CBX959H
    put CBX959V.txt qrpglesrc.CBX959V
    put CBX959X.txt qcmdsrc.CBX959X
    quit
    :done
    pause
    save the .bat file and run it (double-click it)
    9,460 pointsBadges:
    report

Forgot Password

No problem! Submit your e-mail address below. We'll send you an e-mail containing your password.

Your password has been sent to:

To follow this tag...

There was an error processing your information. Please try again later.

Thanks! We'll email you when relevant content is added and updated.

Following

Share this item with your network: