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 |
| Package | Total | Caller Graph |
|---|---|---|
| Scheduling | 5 | SCAPMCU2 SCMCQK1 SCMCQK2 SCMCWAIT SDWLE3 |
| Registration | 1 | DGSDUTL |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| ROOT(SCTYPE,SCROOT,SCGLB) | ; -- determine global root of autolink type
|
|
| PCPROV(SCTP,DATE,PCAP) | ;returns ien & name of practitioner filling position
|
|
| 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 |
|
| GETEAM(SCTEAM) | ; -- retrieve Team demographics
|
|
| DELETE(SCLINKI) | ; -- delete an autolink from a Team
|
|
| SET(X,INC,SCDATA) | ; -- set value in return array
|
|
| 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 ; |
|
| 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 |
|
| SCAN(SCTEAM,SC) | ; -- build an array of current autolink assignments
|
|
| BUILD(SC,SCDATA) | ; -- build string to send and add to return array
|
|
| ADD(SCTEAM,SCLINK) | ; -- add an autolink to a Team
|
| 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* |