Welcome to ITKE MacAttack! The best idea is to start a new question so our experts can try to help you.

For more information on how our community works, check out our FAQ.

A number of years ago in our shop we implemented a date file for such things. This was before some of the handy date functions become readily available. The file contains dates for many years.

Each record contains the date in various formats plus the date number following the same numbering as Excel. To determine the number of days between two dates we chain to the file with each of the dates and subtract one date number from the other. Not at all elegant but it works and has proven very handy. Use of this file has dropped off in recent years but we still use it occasionally for situations such as you describe.

If you want to know a date 30 days from today, just get today’s date number from the file, add 30 to it and retrieve the new date using the new date number as the key.

Again, this a really old school but it works nicely in some applications like query.

To determine what skills are in HOT demand, contact a local recruiter to find out what kind of positions they are having a had time filling.
What is HOT in one geographic area may not be HOT in another. So you need to determine where you want to work. a current HOT skill may not also mean more $. You need to look at what is best for you long term.

Sorry about the previous comment – I didn’t read the initial question closely.

UDATE, *DATE, UMONTH, *MONTH, UDAY, *DAY, UYEAR, *YEAR are available in RPGLE (they provide the run time date which may or may not be congruent with your requirements), as are the %DATE and %TIMESTAMP functions.

The DATE keyword in display and printer files is also capable of supplying the system date.

We answer technical questions at this site.
Have you done any research yourself on this topic?
If so, do you have a specific business related question that we can assist you with?

I’m trying to run a macro within a macro from my text.mac file. I tried various syntax with no avail. Can someone help out? Also, if there is reference for all the Macro commands that would be really helpful too.

you can user *Start with SETLL instead of using *Loval for the nonkeyed file.

Try the following tips to resolve the issue:
-> Run the commands Outlook.exe /cleanviews
-> Uncheck the option ‘cache exchange mode’
-> Recreate the AD profile for users.
Now, enable transport logging and then ‘turn off the shared folder’.
I hope your problem will be solved.

The above error can occur due to Lotus Notes corruption.
Follow the given steps to resolve the above error:
(1) Exit Lotus Notes application.
(2) Delete the log.nsf and cache.ndk files .
location of files : C:\notes\data directory.
(3) Restart Lotus Notes application.
(4) Uninstall and Re- Install Lotus Notes application again.

I hope this will resolve the problem.
This error can also arise due to some other reasons such as the user or admin attempted re-installation process over an actual installation process .
Or it may also occur if the server document has a Directory Assistance database field containing a non-existent file name.In such case follow the given steps:
-> Open the names.nsf using Notes client,
-> Open the Server> Servers view
-> Open the server document for Domino server that you’re installing on.
-> Delete the non-existent file name in the Directory Assistance field.

I hope that above steps will help you to solve your issue

Here’s a little CL PGM CONVERT RPGIII TO RPG 1V.

PGM PARM(&PROGRAM &SOURCE &LIBRARY)
DCL VAR(&PROGRAM) TYPE(*CHAR) LEN(10)
DCL VAR(&LIBRARY) TYPE(*CHAR) LEN(10)
DCL VAR(&SOURCE) TYPE(*CHAR) LEN(10)
DCL VAR(&SRCTYPE) TYPE(*CHAR) LEN(10)

/* IF NOT RPG3, SKIP ALL PROCESSING */
RTVMBRD FILE(&LIBRARY/&SOURCE) MBR(&PROGRAM) +
SRCTYPE(&SRCTYPE)
IF COND(&SRCTYPE *NE ‘RPG ‘) THEN(DO)
SNDMSG MSG(‘Convert failed. ‘ *CAT &PROGRAM *TCAT ‘ +
is not a RPG3 program.’) TOUSR(*REQUESTER)
GOTO END
ENDDO

CHKOBJ OBJ(&LIBRARY/CRPG3SAVED) OBJTYPE(*FILE)
MONMSG MSGID(CPF9801) EXEC(CRTSRCPF +
FILE(&LIBRARY/CRPG3SAVED) RCDLEN(120) +
TEXT(‘Saved RPG3 prior to conversion’))
CPYSRCF FROMFILE(&LIBRARY/&SOURCE) +
TOFILE(&LIBRARY/CRPG3SAVED) FROMMBR(&PROGRAM)
RMVM FILE(&LIBRARY/&SOURCE) MBR(&PROGRAM)
CVTRPGSRC FROMFILE(&LIBRARY/CRPG3SAVED) +
FROMMBR(&PROGRAM) TOFILE(&LIBRARY/&SOURCE)
END: ENDPGM

thanks a lot tom

But I could not get the details when I OUTFILE using DSPFD,…
.
Why not? It is included for TYPE(*ATR).
.
What OS version are you needing this for?
.
hi…..am also try but did’t work…

Hi Tom/Charlie,

I Tried the same as mentioned but the outfile field MBRCDC ( Record Capacity) is not giving the correct value. Can you tell me the OUTFILE field?

Thanks,
Dev

As long as the trigger action is part of the COMMIT transaction, any rows written to a log file will be rolled back when the transaction is rolled back. Writing to a log file generally is not a very good use of a trigger anyway. If you need to “log” database activity, use a journal. You’ll have a journal anyway if you’re working with commitment control, so what’s the point of a “log file”?
.
Tom

Can you give us the basis behind your question?
Going from System A to System B, basic data integrity checking would be record counts, and viewing basic file contents.

I’m think you may be asking regarding porting ting data for an application; in which case you will probably have very different DB files on the two machines. So, you may want to know that all customers still have the correct addresses, and other information.

So, can you give us more information as to why you need to know this, we can help you.

Welcome to ITKE, kundan25! This definition from WhatIs.com will help you get started.

To learn more about our community, check out our FAQ.

Sorry, you should post this on an Autocad specific site.