YSASRPWP ;DALOI/YH- Report Calls ;5/11/2001
Source file <YSASRPWP.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Mental Health | 2 | YSRP ASI ITEM YSRP ASI NARRATIVE |
Name | Comments | DBIA/ICR reference |
---|---|---|
ASINAR(ROOT,YSASDA) | ;YSRP ASI NARRATIVE
|
|
ASIITM(ROOT,YSASDA) | ;YSRP ASI ITEM
|
|
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
|
RPC Name | Call Tags |
---|---|
YSRP ASI NARRATIVE | ASINAR |
YSRP ASI ITEM | ASIITM |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^TMP( | INIT+2 |
^TMP("YSDATA" | START+4! |
Name | Field # of Occurrence |
---|---|
^( | STRIP+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%ZIS | OPEN+8! |
%ZIS("HFSMODE" | OPEN+6* |
%ZIS("HFSNAME" | OPEN+6* |
>> CNT | INIT+1* |
GOTO | START~, START+7 |
I | STRIP+1~, STRIP+2*, STRIP+4*, STRIP+5*, STRIP+6 |
>> INC | INIT+1* |
IO | OPEN+9, OPEN+10, CLOSE+2, CLOSE+3, CLOSE+5, USEHFS+1~ |
IOP | OPEN+5*, OPEN+8! |
IOPAR | OPEN+4! |
RM | START~, START+2*, START+6 |
ROOT | ASINAR~, ASIITM~, START+4*, USEHFS+4, INIT+2*, INIT+3, STRIP+2, STRIP+4*, STRIP+5*, STRIP+6 |
SECTION | USEHFS+1~, USEHFS+2*, INIT+1*, INIT+2 |
X | STRIP+1~, STRIP+2*, STRIP+3, STRIP+4*, STRIP+5*, STRIP+6 |
YSARR | USEHFS+6~, USEHFS+7 |
YSARR( | USEHFS+6* |
YSASDA | ASINAR~, ASIITM~ |
YSHFS | START+3~, START+5*, START+6, START+8, OPEN~, OPEN+6, CLOSE~, USEHFS+4, USEHFS+6 |
YSIO | START+3~, START+6, START+8, OPEN~, OPEN+10*, CLOSE~, CLOSE+2 |
YSMODE | OPEN~, OPEN+6 |
YSOK | USEHFS+1~, USEHFS+4*, USEHFS+7* |
YSRM | START+8, OPEN~, OPEN+5, CLOSE~ |
YSSUB | START+3~, START+5*, START+8, CLOSE~, INIT+2 |
ZTQUEUED | START+3~, OPEN+4* |