ecki/MEDDFN
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

formatier

Browse Source
This commit is contained in:
Eckhard Gosch
2026-08-22 16:47:52 +02:00
parent 2012610615
commit 7a17c65712
1 changed files with 61 additions and 61 deletions
Download Patch File Download Diff File Expand all files Collapse all files
meddfnprs.rpgle
+9 -9
View File
@@ -9,16 +9,16 @@
//
//==========================================================================
ctl-opt
ctl-opt
option(*srcstmt:*nodebugio) nomain;
/COPY './meddfn_h.rpgle'
/COPY './meddfnap_h.rpgle'
/COPY './meddfn_h.rpgle'
/COPY './meddfnap_h.rpgle'
// /COPY GOSCH1/MEDDFN,MEDDFN_H
// /COPY GOSCH1/MEDDFN,MEDDFNAP_H
dcl-pr MD_ParseRetrieveBuffer;
dcl-pr MD_ParseRetrieveBuffer;
ReceiverBuffer
char(32767) const
@@ -26,7 +26,7 @@
MediaDefinition
likeds(MD_MediaDefinition_T);
end-pr;
end-pr;
//=====================================================================
//
@@ -40,7 +40,7 @@
//
//=====================================================================
dcl-proc MD_ParseRetrieveBuffer;
dcl-proc MD_ParseRetrieveBuffer;
dcl-pi *n;
@@ -172,7 +172,7 @@
Device.OffsetToNextDeviceDefinition;
endif;
endfor;
end-proc;
end-proc;
//=====================================================================
//
@@ -182,7 +182,7 @@
//
//=====================================================================
dcl-proc MD_RetrieveMediaDefinition export;
dcl-proc MD_RetrieveMediaDefinition export;
dcl-pi *n;
@@ -243,4 +243,4 @@
endif;
// MD_CheckApiError(ApiError);
end-proc;
end-proc;