这个是显示文件
0001.00 A REF(CUSMSTP)
0002.00 A CHGINPDFT(CS)
0003.00 A PRINT(QSYSPRT)
0004.00 A INDARA
0005.00 A CA03(03 'END OF JOB')
0006.00 A R HEAD
0007.00 A OVERLAY
0008.00 A 2 4TIME
0009.00 A DSPATR(HI)
0010.00 A 2 28'CUSTOMER FILE SEARCH'
0011.00 A DSPATR(HI RI)
0012.00 A 2 70DATE
0013.00 A EDTCDE(Y)
0014.00 A DSPATR(HI)
0015.00 A R FOOT1
0016.00 A 23 6'ENTER - CONTINUE'
0017.00 A DSPATR(HI)
0018.00 A 23 29'F3 - END JOB'
0019.00 A R FOOT2
0020.00 A 23 6'ENTER - CONTINUE'
0021.00 A DSPATR(HI)
0022.00 A 23 29'F3 - END JOB'
0023.00 A DSPATR(HI)
0024.00 A 23 47'F4 - RESTART ZIP CODE
0025.00 A DSPATR(HI)
0026.00 A R PROMPT
0027.00 A OVERLAY
0028.00 A 4 4'ENTER ZIP CODE'
0029.00 A DSPATR(HI)
0030.00 A ZIP R Y I 4 19DSPATR(CS)
0031.00 A DSPATR(UL)
0032.00 A CHECK(RZ)
0033.00 A 61 ERRMSG('ZIP NOT F')
0034.00 A R SUBFILE SFL
0035.00 A NAME R 9 4
0036.00 A ARBAL R 9 27EDTCDE(J)
0037.00 A R SUBCTL SFLCTL(SUBFILE)
0038.00 A 55 SFLCLR
0039.00 A N55 SFLDSPCTL
0040.00 A N55 SFLDSP
0041.00 A 33 SFLEND(*MORE)
0042.00 A SFLSIZ(9999)
0043.00 A SFLPAG(5)
0044.00 A* ROLLUP(95 'ROLL UP')
0045.00 A OVERLAY
0046.00 A CA04(04 'RESTART ZIP CDE')
0047.00 A 4 4'ZIP CODE'
0048.00 A ZIP R O 4 14DSPATR(HI)
0049.00 A 7 4'CUSTOMER NAME'
0050.00 A DSPATR(HI UL)
0051.00 A 7 27'A/R BALANCE'
0052.00 A DSPATR(HI UL)
****************** End of data ****************************************
分享到：
相关推荐
1. **定义DDS规格**：首先，你需要为subfile定义一个DDS规格，其中包含所有必要的字段布局和数据源信息。 2. **编写程序代码**：接下来是编写实际的RPG程序代码，这部分代码将负责读取数据并将其呈现到subfile上。 3...
2. 定义DSPF中的SUBFILE：在DSPF格式中，定义一个SUBFILE，设置其记录格式与DTAQ的记录格式匹配。 3. 读取DTAQ数据：在DSPF程序的初始阶段，使用RQSLTQ（Read Queue Select）或QRYDTAQ（Query Data Queue）命令获取...
在任一OS下，建立一个大文件，把它假象成硬盘，在其中实现一个简单的模拟文件系统。 编写一管理程序对此空间进行管理，要求： 1． 实现盘块管理 2． 实现文件的读写操作 3． 每组最多2人，小组内要有明确分工，课程...
- `new File(path)`创建了一个指向该路径的`File`对象。 2. **检查目录**： - `if (file.isDirectory())`判断当前对象是否为目录。 - 如果是目录，则通过`file.list()`方法获取该目录下的所有文件/子目录，并...
然后依次读取并写入到一个新文件中，从而完成合并过程。 #### 总结 以上介绍了如何使用Python实现大文件的分割与合并。通过这些方法，我们可以有效地管理大型文件，无论是出于存储效率还是网络传输的需求。此外，...
在这个例子中，`printDir` 方法首先检查当前目录是否为空。如果不是，则遍历所有子项。如果遇到子目录，则递归调用 `printDir` 方法；如果是文件，则打印文件名并增加计数器。 #### 三、总结 通过以上介绍，我们...
接下来，我们将构建一个自定义的递归函数`copyDir()`，它接受两个参数：源目录`$dirSrc`和目标目录`$dirTo`。函数的主要逻辑如下： 1. 检查目标路径`$dirTo`，如果它已经存在且不是一个目录，函数将返回错误并退出...
foreach ($subFile['name'] as $subKey => $subVal) { if ($subFile['name'][$subKey]) { $fileData = $this->_getFileData($subFile, $subKey); $checkData = array( 'maxSize' => $apkConfig['FILE_MAX_SIZE']...
本教程将通过一个小型的Demo来演示如何获取应用的名称、版本、缓存大小以及应用程序的整体大小等关键信息。下面我们将详细讨论这些知识点。 首先，我们要获取应用的基本信息，如应用名称和版本。这可以通过`...
此文档不仅提供了一个完整的示例代码，还包含了必要的理论背景和实现细节。 #### 二、核心概念与技术 1. **ZipFile 类**： - `ZipFile` 类是Java标准库中的一个类，它用于读取ZIP格式的文件。通过这个类可以获取...
每次达到预设的子文件大小时，就需要创建一个新的子文件，并将文件指针重置到新文件的开头。在整个过程中，需要注意文件指针的正确移动和错误处理。 例如，以下是一个简单的文件分割程序的基本框架： ```c #...
总的来说，`path.resolve`在Node.js中是一个非常实用的工具，尤其在处理文件系统路径时，能帮助开发者将不明确的相对路径转换为明确的绝对路径，从而避免路径解析错误。在实际开发中，尤其是在处理模块加载、文件...
2. **构建临时映射表**：遍历输入的扁平化数据，构建一个临时映射表`tmpMap`，其中键为节点ID，值为对应的节点对象。 3. **构建树结构**：再次遍历输入数据，对于每一个节点： - 如果存在父节点，则将该节点添加到...
例如，一个文件系统中的“文件”和“目录”都可以视为组件，它们都具有打开、关闭等操作。 ```java public interface Component { void add(Component child); void remove(Component child); Component ...
foreach($subFile['name'] as $subKey => $subVal) { // ...省略部分代码... if($subFile['name'][$subKey] != '') { // ...省略部分代码... } } // ...省略部分代码... ``` #### 4. 关键点总结 - **表单设置*...
在.NET开发环境中，读取Excel文件是常见的任务，特别是处理数据导入导出或者数据分析时。C#语言提供了多种方式来实现这一功能，其中包括使用OLEDB数据提供程序。本知识点主要介绍如何使用C#来自动识别并读取Excel ...
首先，让我们看一个简单的例子，计算单个文件的大小。`filesize()`函数是PHP提供的内置函数，它可以直接返回指定文件的大小，单位为字节。例如： ```php $file_path = "path_to_your_file"; $file_size = filesize...
`rmdir()`需要一个参数 `$dirname`，即要删除的目录的完整路径。如果目录为空并且用户具有相应的权限，该函数将成功删除目录。如果操作失败，比如目录不为空或者权限不足，PHP会抛出一个E_WARNING级别的错误。 然而...