Re: CHKDIR command

I am interested to know if AI learns when humans correct it. As it is,
it is absolutely brilliant in what it can do. I am importing large amounts
of data into an online store and am having problems with bad phone
numbers. I gave Grok a list of bad phone numbers with the country code, it
comes back with a well formatted response, telling me which country
the number is in, how to format the calling number.

After posting data to the online site I am getting back an excel file with
many thousands of rows telling me which items were posted and which failed.
Working with the excel is cumbersome, so I ask Grok to give me the excel
code that will copy the rows with an error to a 2nd sheet in the excel
file. It gave me the following along with instructions on how to enter the
code and then run it. Incredible


Sub CopyFailedOrdersToSheet1()
Dim wsSource As Worksheet
Dim wsTarget As Worksheet
Dim lastRow As Long
Dim i As Long
Dim targetRow As Long
Dim copyCount As Long

On Error GoTo ErrorHandler

' Set sheet references (change names if needed)
Set wsSource = ThisWorkbook.Sheets("orders")
Set wsTarget = ThisWorkbook.Sheets("Sheet1")

' Optional: Clear previous content in Sheet1
' Comment out the next line if you want to append instead of replace
wsTarget.Cells.Clear

' Copy headers (assuming row 1 contains headers)
wsSource.Rows(1).Copy wsTarget.Rows(1)
targetRow = 2 ' Start data rows from row 2

' Find last used row in column CA of source
lastRow = wsSource.Cells(wsSource.Rows.Count, "CB").End(xlUp).Row

copyCount = 0

' Loop through rows (skip header)
For i = 2 To lastRow
If Trim(wsSource.Cells(i, "CB").Value) = "Failed" Then ' Trim to
handle any stray spaces
' Copy the entire row
wsSource.Rows(i).Copy

' Paste as values + number formats (fully editable)
wsTarget.Rows(targetRow).PasteSpecial
Paste:=xlPasteValuesAndNumberFormats

' Alternative: Paste everything including formats/colors
' wsTarget.Rows(targetRow).PasteSpecial Paste:=xlPasteAll

targetRow = targetRow + 1
copyCount = copyCount + 1
End If
Next i

Application.CutCopyMode = False
Application.ScreenUpdating = True

MsgBox "Copy complete!" & vbCrLf & _
copyCount & " rows with 'Failed' in column CB were copied to
Sheet1." & vbCrLf & _
"Data is now fully editable.", vbInformation

Exit Sub

ErrorHandler:
Application.CutCopyMode = False
MsgBox "An error occurred: " & Err.Description, vbCritical
End Sub

On Fri, Mar 13, 2026 at 4:57 PM Infodorado InfoDorado via MIDRANGE-L <
midrange-l@xxxxxxxxxxxxxxxxxx> wrote:

[Soapbox opinion]
I am the tech world's number one skeptic on AI. The first AI demo on
Google should have put the kibosh on it for at least a decade.
It produced six images of American "founding fathers". Five of them were
presented as in various shades of black, and one was presented as an native
Indian complete with headdress fit for a chief.
Google took it off pretty quick. And subsequent attempts by them and
others *seemed* more accurate, except AI has hallucinated all kinds of
fiction, presenting lies as if it were a result of search.

I think ALL computer-generated text and images should be 100 percent
open-source. As a disclaimer I think copyright and patents in general are
not ethical. It's not material property. The laws gave Thomas Edison more
prominence that Nicolas Tesla until the Internet exposed the shame. Then
the patent office illegally confiscated one of Tesla's patents to Marconi
because the payout was less (cretins!) and only after its worth dropped and
a long lawsuit did they correct the "error".
And now we have Microsoft and Apple doing legal agreements to share
"intellectual property" for copyrights that are obvious (like a coding
algorithm for matching country codes to the country it belongs to.
--Thanks to all who read thru this, and my disculpas to those who don't
like this kind of post.
--I highly recommend Stephan Kinsella's book "Against Intellectual
Property" for more depth.

--Alan

On 03/13/2026 4:16 PM EDT Dan Bale via MIDRANGE-L <

midrange-l@xxxxxxxxxxxxxxxxxx> wrote:

We upgraded to 7.5 with the latest cume and TRs last month. WRKOBJ

OBJ(*ALL/CHKDIR*) returned only CHKDIRE in the TAATOOL library.

- Dan Bale

-----Original Message-----
From: MIDRANGE-L <midrange-l-bounces@xxxxxxxxxxxxxxxxxx> On Behalf Of

Stephen Richter

Sent: Friday, March 13, 2026 3:24 PM
To: Midrange Systems Technical Discussion <midrange-l@xxxxxxxxxxxxxxxxxx

Subject: CHKDIR command

my man Grok is insisting that the CHKDIR command exists on the IBM i.

Is

that true?

here is what Grok says:

Since you're on IBM i 7.5 (V7R5M0) and the CHKDIR command is not found,

that means your system does not have the required Technology Refresh (TR)
level installed yet.The CHKDIR command was introduced in relatively recent

TRs:

- IBM i 7.5 → first available around TR2 or TR3 (late 2022 / early

2023

timeframe)
- IBM i 7.4 → TR5 or TR6

Many 7.5 systems shipped initially without the latest cumulative PTFs or

group PTFs, so CHKDIR is missing until you apply the appropriate PTFs.

Google AI says no:

IBM i does not have a native, IBM-supplied CL command named CHKDIR to

check if an Integrated File System (IFS) folder exists. Instead, developers
commonly use the CHKIFSOBJ...

*** CONFIDENTIALITY NOTICE: The information contained in this

communication may be confidential, and is intended only for the use of the
recipients named above. If the reader of this message is not the intended
recipient, you are hereby notified that any dissemination, distribution, or
copying of this communication, or any of its contents, is strictly
prohibited. If you have received this communication in error, please return
it to the sender immediately and delete the original message and any copy
of it from your computer system. If you have any questions concerning this
message, please contact the sender. ***

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing

list

To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription

related questions.
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
To post a message email: MIDRANGE-L@xxxxxxxxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: https://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
Before posting, please take a moment to review the archives
at https://archive.midrange.com/midrange-l.

Please contact support@xxxxxxxxxxxxxxxxxxxx for any subscription related
questions.