@profoundlogic/codermake 2.0.7 → 2.0.8

package/dist/makefiles/ibmi.mk

@@ -255,6 +255,38 @@ $(SET_LIBL)
 system "crtprtf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
 endef
 
+# Build System/38 display file
+define BUILD_DSPF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SET_LIBL)
+system "qsys38/crtdspf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+endef
+
+# Build System/38 physical file
+define BUILD_PF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SET_LIBL)
+system "qsys38/crtpf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+endef
+
+# Build System/38 logical file
+define BUILD_LF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SET_LIBL)
+system "qsys38/crtlf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+endef
+
+# Build System/38 printer file
+define BUILD_PRTF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SET_LIBL)
+system "qsys38/crtprtf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+endef
+
 # Build SQL table
 define BUILD_SQLTABLE_TO_FILE
 $(call SETUP_LOG,$(notdir $@))

package/dist/makefiles/unix.mk

@@ -367,6 +367,50 @@ EOF
 touch '$@'
 endef
 
+# Build System/38 display file
+define BUILD_DSPF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SSH) $(QSHELL) <<'EOF'
+  $(SET_LIBL)
+  system "qsys38/crtdspf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+EOF
+touch '$@'
+endef
+
+# Build System/38 physical file
+define BUILD_PF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SSH) $(QSHELL) <<'EOF'
+  $(SET_LIBL)
+  system "qsys38/crtpf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+EOF
+touch '$@'
+endef
+
+# Build System/38 logical file
+define BUILD_LF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SSH) $(QSHELL) <<'EOF'
+  $(SET_LIBL)
+  system "qsys38/crtlf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+EOF
+touch '$@'
+endef
+
+# Build System/38 printer file
+define BUILD_PRTF38_TO_FILE
+$(call SETUP_LOG,$(notdir $@))
+$(call CREATE_SOURCE_MEMBER,$<,qddssrc)
+$(SSH) $(QSHELL) <<'EOF'
+  $(SET_LIBL)
+  system "qsys38/crtprtf file($(TARGET_LIB)/$(call ibmi_name_sh,$@)) srcfile($(TARGET_LIB)/qddssrc) srcmbr($(call ibmi_name_sh,$<))"
+EOF
+touch '$@'
+endef
+
 # Build SQL table
 define BUILD_SQLTABLE_TO_FILE
 $(call SETUP_LOG,$(notdir $@))

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@profoundlogic/codermake",
-  "version": "2.0.7",
+  "version": "2.0.8",
   "description": "Make wrapper framework for IBM i development that simplifies build rules",
   "main": "dist/bin/index.js",
   "type": "module",

package/skills/codermake/SKILL.md

@@ -163,6 +163,10 @@ ENDPGMEXP
 | `.pf` | `.file` | Physical File (*FILE) | `CRTPF` |
 | `.lf` | `.file` | Logical File (*FILE) | `CRTLF` |
 | `.prtf` | `.file` | Printer File (*FILE) | `CRTPRTF` |
+| `.dspf38` | `.file` | Display File (*FILE) | `QSYS38/CRTDSPF` (System/38, `DSPF38` member) |
+| `.pf38` | `.file` | Physical File (*FILE) | `QSYS38/CRTPF` (System/38, `PF38` member) |
+| `.lf38` | `.file` | Logical File (*FILE) | `QSYS38/CRTLF` (System/38, `LF38` member) |
+| `.prtf38` | `.file` | Printer File (*FILE) | `QSYS38/CRTPRTF` (System/38, `PRTF38` member) |
 | `.table.sql` | `.file` | SQL Table (*FILE) | `RUNSQLSTM` |
 | `.index.sql` | `.file` | SQL Index (*FILE) | `RUNSQLSTM` |
 | `.view.sql` | `.file` | SQL View (*FILE) | `RUNSQLSTM` |

package/skills/codermake/references/compile-listings.md

@@ -87,9 +87,9 @@ For ILE CL (`CRTBNDCL`, `CRTCLMOD`), the listing structure is similar to RPG --
 
 For OPM CL (`CRTCLPGM`), the output is typically shorter and errors reference source sequence numbers.
 
-## DDS listings (.dspf, .pf, .lf, .prtf)
+## DDS listings (.dspf, .pf, .lf, .prtf, and their System/38 `.dspf38`/`.pf38`/`.lf38`/`.prtf38` variants)
 
-DDS compilation errors from `CRTDSPF`, `CRTPF`, `CRTLF`, or `CRTPRTF` produce `CPD` messages:
+DDS compilation errors from `CRTDSPF`, `CRTPF`, `CRTLF`, or `CRTPRTF` produce `CPD` messages. The System/38 `.dspf38`, `.pf38`, `.lf38`, and `.prtf38` variants use the corresponding `QSYS38/...` commands.
 
 ```
 CPD7302   30   Record format SCREEN1 not found in file referenced.

package/skills/codermake/references/file-types.md

@@ -215,6 +215,25 @@ report.file: report.prtf
 
 **CL command:** `CRTPRTF FILE(LIB/REPORT) SRCFILE(LIB/QDDSSRC)`
 
+### System/38 compatible DDS (.pf38, .lf38, .dspf38, .prtf38)
+
+System/38 compatible versions of `.pf`, `.lf`, `.dspf`, and `.prtf`. They build
+through dedicated recipes that qualify the compile command from `QSYS38`. The
+parameters currently match the base DDS recipes, but the commands are
+`QSYS38/CRTPF`, `QSYS38/CRTLF`, `QSYS38/CRTDSPF`, and `QSYS38/CRTPRTF`. The
+temporary source member's source type is derived from the file extension:
+`.pf38` → `PF38`, `.lf38` → `LF38`, `.dspf38` → `DSPF38`, `.prtf38` → `PRTF38`.
+Use these when a source member must retain its System/38 source type.
+
+```makefile
+custp38.file: custp38.pf38                 # QSYS38/CRTPF,   PF38 member
+custl38.file: custl38.lf38 custp38.file    # QSYS38/CRTLF,   LF38 member
+hello38.file: hello38.dspf38               # QSYS38/CRTDSPF, DSPF38 member
+rpt38.file: rpt38.prtf38                   # QSYS38/CRTPRTF, PRTF38 member
+```
+
+**CL commands:** `QSYS38/CRTPF` / `QSYS38/CRTLF` / `QSYS38/CRTDSPF` / `QSYS38/CRTPRTF`
+
 ### SQL table from .table.sql
 
 Creates a SQL table by running a DDL script.