giteaadmin/DUTAS
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Neeraj Changes

Browse Source
This commit is contained in:
faizana
2025-09-16 08:52:41 -04:00
parent c69d1eaef6
commit 8a1f878add
19 changed files with 56 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

3
Batch/DTSBD380.cob
View File

@ -84,6 +84,9 @@
00083 TSKL-REC. DTSBD380
00084 DTSBD380
00085 DTSBD380
RCODE MOVE '002' TO T002-REC-TYPE. DTSBD380
RCODE MOVE '003' TO T003-REC-TYPE. DTSBD380
RCODE MOVE '040' TO T040-REC-TYPE. DTSBD380
00086 IF TSKL-AUTO-EMP-STATUS-88 DTSBD380
00087 PERFORM P1000-AUTO-EMP-STATUS THRU P1000-EXIT DTSBD380
00088 ELSE DTSBD380