YTRPWRP ;DALOI/YH - Report Calls ;Nov 13, 2023@09:16:25
Source file <YTRPWRP.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
INTRMNT(ROOT,YSDFN,YSXT) | ; -- return report text
|
|
START(RM,GOTO) | ;
|
|
HFS() | ; -- get hfs file name
; -- need to define better unique algorithm |
|
OPEN(YSRM,YSHFS,YSMODE,YSIO) | ; -- open WORKSTATION device
; YSRM: right margin ; YSHFS: host file name ; YSMODE: open file in 'R'ead or 'W'rite mode |
|
CLOSE(YSRM,YSHFS,YSSUB,YSIO) | ; -- close WORKSTATION device
; YSSUB: unique subscript name for output |
|
USEHFS | ; -- use host file to build global array
|
|
INIT | ; -- initialize counts and global section
|
|
STRIP | ; -- strip off control chars
|
|
TESTCODE(ROOT) | ;YTRP LIST TEST/CODE
|
|
TESTDES(ROOT) | ;YTRP LIST TEST/DESC
|
|
TESTTL(ROOT) | ;YTRP LIST TEST/TITLE
|
|
AL60193 | ; strip control chars. from all entries in MH REPORT (#601.93)
|
|
RMVCC(YSIEN) | ; remove control chars. from W-P field in MH REPORT (#601.93)
; entry should be LOCKed before call |
RPC Name | Call Tags |
---|---|
YTRP INSTRUMENT REPORT | INTRMNT |