SDWLRP4 ;IOFO BAY PINES/TEH - WAITING LIST - MERGE RPC;06/28/2002 ; 26 Aug 2002 1:25 PM
Source file <SDWLRP4.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
FDA | ;Get data from SDWLSTR string and set FDA.
|
|
SB0 | ||
SB1 | ||
VAL | ;Validate fields
|
|
DCHK(VALID) | ;Check for valid DESIRED DATE
|
|
INPUT(SDWLRES,SDWLSTR) | ;
|
|
SET | ;Input data to file ^SDWL(409.3,IEN,0)
|
|
DEL | ||
DUP(IEN) | ;Duplicate Check
|
|
NEW | ;Get IEN from ^SDWL(409.3,IEN,0).
|
Name | Field # of Occurrence |
---|---|
^%DT | DCHK+2 |
H^%DTC | NEW+53, SB1+8 |
IX^DIC | NEW+15 |
FILE^DICN | NEW+23 |
^DIE | NEW+27, NEW+29, NEW+30, NEW+31, NEW+32, NEW+38, NEW+39, NEW+40, NEW+41, SB0+5 , SB0+6, SB0+7, SB0+8 |
UPDATE^DIE | SET+1 |
VALS^DIE | VAL+2 |
^DIK | DEL |
$$IENS^DILF | FDA+5 |
CLEAN^DILF | INPUT+29 |
FDA^DILF | FDA+7 |
$$GET1^DIQ | NEW+36 |
$$ENROLL^EASWTAPI | NEW+52 |
$$TF^XUAF4 | SB1+4 |
RPC Name | Call Tags |
---|---|
SD W/L IMPORT API | INPUT |
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |
^SDWL(409.3 - [#409.3] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGCN(391.91 - [#391.91] | SB1, SB1+1, SB1+2 |
^DIC(4 - [#4] | NEW+14 |
^DIC(40.7 - [#40.7] | NEW+8 |
^SC("B" | NEW+10 |
^SCTM(404.51 - [#404.51] | NEW+6 |
^SCTM(404.57 - [#404.57] | NEW+7 |
^SDWL(409.3 - [#409.3] | DUP+12, DUP+13 |
^SDWL(409.31 - [#409.31] | NEW+9 |
^SDWL(409.32 - [#409.32] | NEW+11 |
^TMP("DIERR" | INPUT+17! |
^TMP("SDWLIN" | INPUT+17!, INPUT+29!, FDA+8 |
^TMP("SDWLOUT" | INPUT+17!, INPUT+29!, VAL+4 |
Name | Line Occurrences |
---|---|
$$DCHK | INPUT+23 |
$$DUP | NEW+18 |
DEL | INPUT+27, INPUT+28 |
FDA | INPUT+27 |
NEW | INPUT+25 |
SB0 | NEW+51, NEW+52 |
SB1 | NEW+50 |
SET | INPUT+28 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | DCHK+2* |
%H | NEW+53, SB0+8!, SB1+8 |
D | INPUT+17!, NEW+15* |
DA | NEW+25*, NEW+32!, NEW+37*, NEW+41!, SB0+5*, SB0+8!, SET+3!, DEL*! |
DIC | NEW+15*, NEW+23*, SB0+9!, SET+3! |
DIC(0 | NEW+15*, NEW+23* |
DIE | NEW+25*, NEW+32*!, NEW+38*, NEW+41!, SB0+5*, SB0+8!, SB0+9! |
DIK | DEL*! |
DIR | SB0+9! |
DR | NEW+27*, NEW+29*, NEW+30*, NEW+31*, NEW+32*!, NEW+38*, NEW+39*, NEW+40*, NEW+41*!, SB0+5* , SB0+6*, SB0+7*, SB0+8*!, SB0+9! |
IEN | DUP~, DUP+12 |
SDWL6 | NEW+1~, NEW+5*, NEW+6*, NEW+22, DUP+14 |
SDWL6P | NEW+1~, NEW+6* |
SDWL7 | NEW+1~, NEW+5*, NEW+7*, NEW+22, DUP+14 |
SDWL7P | NEW+1~, NEW+7* |
SDWL8 | NEW+1~, NEW+5*, NEW+8*, NEW+9*, NEW+22, DUP+14 |
>> SDWL80 | NEW+8*, NEW+9 |
SDWL8P | NEW+1~ |
SDWL9 | NEW+1~, NEW+5*, NEW+10*, NEW+11*, NEW+22, DUP+14 |
>> SDWL90 | NEW+10*, NEW+11 |
SDWL9P | NEW+1~ |
SDWLD | SB0+9!, SB1+6*, SB1+8* |
>> SDWLDA | NEW+24*, NEW+25, NEW+37, SB0+5, FDA+5, SET+4, DEL, DEL+1 |
SDWLDB | NEW+50*, SB1~, SB1+8* |
SDWLDE | NEW+50*, NEW+53*, SB0+9!, SB1+8 |
SDWLDET | NEW+53*, NEW+54, SB0+9! |
SDWLDFN | NEW+1~, NEW+15*, NEW+16*, NEW+17, NEW+18, NEW+23, NEW+24*, NEW+36, NEW+52, SB1 , SB1+1 |
SDWLDS | NEW+53*, SB0+9! |
SDWLDTF | SB1+7, SB1+8*, SB1+10! |
SDWLDTF(0 | SB1+8 |
SDWLDTF(9999999 | SB1+6* |
>> SDWLDUZ | NEW+24* |
SDWLE | NEW+50*, NEW+51, NEW+53*, NEW+54*, NEW+55*, SB0+1*, SB0+2*, SB0+3, SB0+9!, SB1* , SB1+8*, SB1+9* |
SDWLEE | NEW+50*, SB0+1, SB0+2, SB0+9!, SB1+8*, SB1+9 |
>> SDWLF | FDA+1*, FDA+7 |
>> SDWLFLD | FDA+3*, FDA+4*, FDA+7 |
>> SDWLFLG | FDA+5* |
>> SDWLI | FDA+2*, FDA+3 |
>> SDWLIEN | FDA+5*, FDA+7 |
SDWLIN | NEW+1~, NEW+13*, NEW+14*, DUP+16 |
SDWLMOD | NEW+1~, NEW+5*, NEW+6*, NEW+7*, NEW+9*, NEW+11*, NEW+12 |
>> SDWLMSG | FDA+6 |
>> SDWLMSG("DIERR" | VAL+3, SET+2 |
SDWLODUZ | NEW+2~, NEW+20*, NEW+22 |
SDWLPRI | NEW+2~, NEW+19*, NEW+21*, NEW+22, NEW+26, NEW+28 |
SDWLRBY | NEW+2~, NEW+20*, NEW+21*, NEW+22 |
SDWLRES | INPUT~, INPUT+18*, INPUT+19*, INPUT+20*, INPUT+21*, INPUT+22*, INPUT+23*, INPUT+26, INPUT+27, INPUT+28 , NEW+3*, NEW+12*, NEW+13*, NEW+14*, NEW+15*, NEW+17*, NEW+18*, NEW+23*, FDA+6*, FDA+8* , VAL+3*, SET+2*, SET+4*, DEL+1* |
SDWLRES("SDWLIN" | FDA+8* |
SDWLRES("SDWLOUT" | VAL+4* |
SDWLRNE | NEW+52*, NEW+55, SB0, SB0+3*, SB0+9! |
SDWLRNED | NEW+50*, NEW+52*, NEW+53, SB0+9! |
SDWLSTR | INPUT~, INPUT+18, INPUT+19, INPUT+20, INPUT+21, INPUT+22, INPUT+23, INPUT+24*, NEW+4, NEW+5 , NEW+6, NEW+7, NEW+8, NEW+9*, NEW+10, NEW+11*, NEW+13, NEW+15, NEW+19, NEW+24 , NEW+27, DUP+14, DUP+16 |
>> SDWLSTRN | NEW+22*, FDA+2 |
SDWLTP | NEW+1~, NEW+5*, NEW+6, NEW+7, NEW+8, NEW+10, NEW+21, NEW+22, NEW+28 |
SDWLV1 | DUP+10~, DUP+11*, DUP+12*, DUP+13 |
SDWLV2 | DUP+10~, DUP+13*, DUP+15, DUP+16 |
SDWLV3 | DUP+10~, DUP+14*, DUP+16 |
SDWLV4 | DUP+10~, DUP+15*, DUP+16 |
SDWLV5 | DUP+10~, DUP+11*, DUP+12, DUP+16*, DUP+17 |
>> SDWLVAL | FDA+2*, FDA+7 |
>> SDWLX | SB1+1*, SB1+2, SB1+6 |
>> SDWLY | SB1+2*, SB1+4, SB1+6 |
U | INPUT+19, INPUT+20, INPUT+21, INPUT+22, INPUT+23, INPUT+24, INPUT+26, NEW+4, NEW+5, NEW+6 , NEW+7, NEW+8, NEW+9, NEW+10, NEW+11, NEW+13, NEW+15, NEW+19, NEW+24, NEW+27 , NEW+52, SB0, SB1+4, SB1+6, DUP+14, DUP+15, DUP+16 |
VALID | DCHK~, DCHK+2 |
X | NEW+15*, NEW+23*, NEW+36*, NEW+53*, SB1+8*, DCHK+1~, DCHK+2* |
>> Y | NEW+15, NEW+16, NEW+23, NEW+24, DCHK+3 |