Differences
This shows you the differences between two versions of the page.
list_members [2019/03/18 11:39] |
list_members [2021/04/05 11:23] (current) |
||
---|---|---|---|
Line 1: | Line 1: | ||
+ | ====== List Members ====== | ||
+ | <sxh> | ||
+ | H dftactgrp(*no) actgrp(*caller) bnddir(' | ||
+ | |||
+ | /if not defined(QUSEC) | ||
+ | /define QUSEC | ||
+ | /copy QSYSINC/ | ||
+ | /endif | ||
+ | |||
+ | |||
+ | /include '/ | ||
+ | /include '/ | ||
+ | |||
+ | |||
+ | D listFileMembers... | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | |||
+ | | ||
+ | *inlr = *on; | ||
+ | |||
+ | |||
+ | P main B | ||
+ | |||
+ | D abnormallyEnded... | ||
+ | | ||
+ | D library | ||
+ | D filename | ||
+ | D usPtr | ||
+ | D usHeader | ||
+ | | ||
+ | D userspace_attr | ||
+ | D usName | ||
+ | D usLib | ||
+ | D dataPtr | ||
+ | D usData | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | D i | ||
+ | D lastChanged | ||
+ | |||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | clear QUSEC; | ||
+ | | ||
+ | ' | ||
+ | |||
+ | // change user space attributes to autoextend | ||
+ | clear QUSEC; | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | clear QUSEC; | ||
+ | | ||
+ | |||
+ | | ||
+ | ' | ||
+ | |||
+ | // iterate through retrieved members | ||
+ | for i = 0 to usHeader.nmbrEntries - 1; | ||
+ | | ||
+ | |||
+ | | ||
+ | // lastchanged Format : EJJMMDDHHMMSS | ||
+ | // E = Epoche : 0 = 19xx , 1 = 2xxx (Jahr) | ||
+ | | ||
+ | |||
+ | | ||
+ | dsply usData.member; | ||
+ | dsply %trimr(' | ||
+ | | ||
+ | |||
+ | if (i > 10); | ||
+ | | ||
+ | | ||
+ | | ||
+ | |||
+ | | ||
+ | | ||
+ | |||
+ | | ||
+ | </ | ||
+ | |||
+ | {{tag> |