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; option(*srcstmt:*nodebugio) nomain;
/COPY './meddfn_h.rpgle' /COPY './meddfn_h.rpgle'
/COPY './meddfnap_h.rpgle' /COPY './meddfnap_h.rpgle'
// /COPY GOSCH1/MEDDFN,MEDDFN_H // /COPY GOSCH1/MEDDFN,MEDDFN_H
// /COPY GOSCH1/MEDDFN,MEDDFNAP_H // /COPY GOSCH1/MEDDFN,MEDDFNAP_H
dcl-pr MD_ParseRetrieveBuffer; dcl-pr MD_ParseRetrieveBuffer;
ReceiverBuffer ReceiverBuffer
char(32767) const char(32767) const
@@ -26,7 +26,7 @@
MediaDefinition MediaDefinition
likeds(MD_MediaDefinition_T); likeds(MD_MediaDefinition_T);
end-pr; end-pr;
//===================================================================== //=====================================================================
// //
@@ -40,7 +40,7 @@
// //
//===================================================================== //=====================================================================
dcl-proc MD_ParseRetrieveBuffer; dcl-proc MD_ParseRetrieveBuffer;
dcl-pi *n; dcl-pi *n;
@@ -172,7 +172,7 @@
Device.OffsetToNextDeviceDefinition; Device.OffsetToNextDeviceDefinition;
endif; endif;
endfor; endfor;
end-proc; end-proc;
//===================================================================== //=====================================================================
// //
@@ -182,7 +182,7 @@
// //
//===================================================================== //=====================================================================
dcl-proc MD_RetrieveMediaDefinition export; dcl-proc MD_RetrieveMediaDefinition export;
dcl-pi *n; dcl-pi *n;
@@ -243,4 +243,4 @@
endif; endif;
// MD_CheckApiError(ApiError); // MD_CheckApiError(ApiError);
end-proc; end-proc;