SCAPMCU3 ;MJK/ALB - AUTOLINK API ; 8/10/99 4:09pm
Source file <SCAPMCU3.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | FILE^DICN ^DIK |
Scheduling | 1 | $$PRTPC^SCAPMC |
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 |
---|---|---|
Scheduling | 8 | SCAPMCU2 SCMCQK1 SCMCQK2 SCMCWAIT SCTM AUTOLINK GETLINK SCTM AUTOLINK GETRECORD SCTM AUTOLINK SETRECORD SDWLE3 |
Registration | 1 | DGSDUTL |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETREC(SCDATA,SCTEAM) | ; -- get team record with autolink data
; input : SCTEAM := ien of team ; output : SCDATA is the return array ; SCDATA(0) := 0th node of Team ; (1..n) := autolink name ^ autolink type ^ ien of entity |
|
BUILD(SC,SCDATA) | ; -- build string to send and add to return array
|
|
SET(X,INC,SCDATA) | ; -- set value in return array
|
|
SETREC(SCOK,SCTEAM,SC) | ; -- add/edit autolink data to Team record
; input : SCTEAM := ien of team ; output : SC is the input array ; SC(1..n) := autolink name ^ autolink type ^ ien of entity |
|
ADD(SCTEAM,SCLINK) | ; -- add an autolink to a Team
|
|
DELETE(SCLINKI) | ; -- delete an autolink from a Team
|
|
GETEAM(SCTEAM) | ; -- retrieve Team demographics
|
|
SCAN(SCTEAM,SC) | ; -- build an array of current autolink assignments
|
|
ROOT(SCTYPE,SCROOT,SCGLB) | ; -- determine global root of autolink type
|
|
GETLINK(SC,SCTYPE,SCIEN) | ; -- get autolink entity data
; input: SCTYPE := type of autolink (WARD, SPECIALTY, ectc.) ; SCIEN := ien of entity ; output: SC(1..n) := list of Team names autolinked to entity ; |
|
PCPROV(SCTP,DATE,PCAP) | ;returns ien & name of practitioner filling position
|
RPC Name | Call Tags |
---|---|
SCTM AUTOLINK GETRECORD | GETREC |
SCTM AUTOLINK SETRECORD | SETREC |
SCTM AUTOLINK GETLINK | GETLINK |
FileNo | Call Tags |
---|---|
^SCTM(404.56 - [#404.56] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^SCTM(404.51 - [#404.51] | GETEAM+1, GETLINK+16 |
^SCTM(404.56 - [#404.56] | DELETE+2, SCAN+3, GETLINK+13, GETLINK+14 |
Name | Line Occurrences |
---|---|
$$GETEAM | GETREC+8 |
ADD | SETREC+16 |
BUILD | GETREC+14 |
DELETE | SETREC+23 |
ROOT | SETREC+13, GETLINK+8 |
SCAN | GETREC+12, SETREC+7 |
SET | GETREC+10, BUILD+12 |
Name | Field # of Occurrence |
---|---|
^( | SCAN+3 |
^(0 | BUILD+12 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | DELETE+1~, DELETE+3* |
DATE | PCPROV~, PCPROV+10*, PCPROV+11 |
DD | ADD+1~ |
DIC | ADD+1~, ADD+2* |
DIC("DR" | ADD+2* |
DIC(0 | ADD+2* |
DIK | DELETE+1~, DELETE+3* |
DLAYGO | ADD+1~, ADD+2* |
DO | ADD+1~ |
DT | PCPROV+10 |
ERR | PCPROV+9~ |
INC | SET~, SET+1* |
PCAP | PCPROV~, PCPROV+19, PCPROV+22, PCPROV+28, PCPROV+30, PCPROV+32, PCPROV+34 |
SC | GETREC+6~, GETREC+12, GETREC+14, BUILD~, SETREC~, SCAN~, GETLINK~ |
SC( | BUILD+4, SETREC+11, SCAN+3*, GETLINK+16*, GETLINK+19* |
SCDATA | GETREC~, GETREC+10, GETREC+14, BUILD~, BUILD+12, SET~ |
SCDATA( | SET+1* |
SCGLB | BUILD+1~, BUILD+6*, BUILD+7*, BUILD+8*, BUILD+9*, BUILD+10*, BUILD+12, SETREC+5~, SETREC+13, SETREC+16 , ROOT~, ROOT+1*, ROOT+2*, ROOT+3*, ROOT+4*, ROOT+5*, ROOT+6*, GETLINK+6~, GETLINK+8 |
SCI | SETREC+5~, SETREC+11*, PCPROV+9~, PCPROV+17*, PCPROV+18, PCPROV+20, PCPROV+21 |
SCIEN | GETLINK~, GETLINK+10 |
SCII | PCPROV+9~, PCPROV+20*, PCPROV+21 |
SCINC | BUILD+1~, BUILD+2*, BUILD+12, GETLINK+6~, GETLINK+12*, GETLINK+15*, GETLINK+16, GETLINK+18*, GETLINK+19 |
SCLINK | BUILD+1~, BUILD+3*, BUILD+4*, BUILD+5, BUILD+12, SETREC+5~, SETREC+14*, SETREC+15, SETREC+16, SETREC+20* , SETREC+21*, SETREC+22, ADD~, SCAN+1~, SCAN+2*, SCAN+3*, GETLINK+6~, GETLINK+10*, GETLINK+13, GETLINK+14 |
SCLINKI | SETREC+5~, SETREC+22*, SETREC+23, DELETE~, DELETE+2, DELETE+3 |
SCNEW | SETREC+5~ |
SCNEW( | SETREC+15*, SETREC+21 |
SCOK | SETREC~, SETREC+24* |
SCOLD | SETREC+5~, SETREC+7 |
SCOLD( | SETREC+16, SETREC+21, SETREC+22 |
SCPP | PCPROV+9~, PCPROV+10*, PCPROV+19*, PCPROV+28, PCPROV+30, PCPROV+34 |
SCPR | PCPROV+9~ |
SCPR( | PCPROV+17, PCPROV+18, PCPROV+20, PCPROV+21 |
SCPRDTS | PCPROV+9~ |
SCPRDTS("BEGIN" | PCPROV+11* |
SCPRDTS("END" | PCPROV+11* |
SCPRDTS("INCL" | PCPROV+10* |
SCPRX | PCPROV+9~ |
SCPRX( | PCPROV+23* |
SCPRX("PREC" | PCPROV+28 |
SCPRX("PROV" | PCPROV+32 |
SCPRX("PROV-P" | PCPROV+34 |
SCPRX("PROV-U" | PCPROV+30 |
SCROOT | SETREC+5~, SETREC+13, SETREC+14, ROOT~, ROOT+1*, ROOT+2*, ROOT+3*, ROOT+4*, ROOT+5*, ROOT+6* , GETLINK+6~, GETLINK+8, GETLINK+10 |
SCSUB | PCPROV+9~, PCPROV+18*, PCPROV+19, PCPROV+20, PCPROV+21, PCPROV+22 |
SCTEAM | GETREC~, GETREC+8, GETREC+12, SETREC~, SETREC+7, SETREC+16, ADD~, ADD+2, GETEAM~, GETEAM+1 , SCAN~, SCAN+3, GETLINK+6~, GETLINK+12*, GETLINK+13, GETLINK+14*, GETLINK+16 |
SCTP | PCPROV~, PCPROV+15 |
SCTYPE | BUILD+1~, BUILD+6*, BUILD+7*, BUILD+8*, BUILD+9*, BUILD+10*, BUILD+12, SETREC+5~, SETREC+12*, SETREC+13 , ROOT~, ROOT+2, ROOT+3, ROOT+4, ROOT+5, ROOT+6, GETLINK~, GETLINK+8 |
SCX | SETREC+11*, SETREC+12, SETREC+14, PCPROV+9~, PCPROV+21*, PCPROV+23 |
SCY | PCPROV+9~, PCPROV+22*, PCPROV+23 |
U | BUILD+12, SETREC+12, SETREC+14, GETLINK+16, PCPROV+21 |
X | GETREC+6~, GETREC+8*, GETREC+10, BUILD+1~, BUILD+5*, BUILD+6, BUILD+7, BUILD+8, BUILD+9, BUILD+10 , SET~, SET+1, ADD+2*, PCPROV+9~, PCPROV+15* |