SCAPU1 ;ALB/REW,HPE/ART - TEAM API UTILITIES ; 9/17/09 4:30pm ;07/06/2017
Source file <SCAPU1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | BLD^DIALOG $$GET1^DIQ |
| Authorization Subscription | 1 | $$SUBCLASS^USRLM |
| Scheduling | 1 | INIT^SCAPMCU1 |
| 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 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DTCHK2(SCDATES,ACTDT,INACTDT) | ;given scdates array was it active?
|
|
| DTCHK(BEGINDT,ENDDT,INCL,ACTDT,INACTDT) | ; -- given activation/inactivation dates and begin & end dates and include flag was it active?
|
|
| DTCHKQ | ||
| ERR(SEQ,ERNUM,PARMS,OUTPUT,SCER) | ;-- process errors
|
|
| OKARRAY(ARRAY,CHECK) | ; see if input array says 'check' should be used
; DOES NOT change any varriables - $$okarray(.xx,.yy) is safe... ; if array is null OR undefined it is ok ; if @array@(check) is defined it is ok ; if @array@('exclude') is defined results switch ; RETURNS: 1: Yes use/0: No don't |
|
| OKUSRCL(USRARRAY,CHECK) | ; see if input user class array says 'check' is ok
|
|
| QTOKUSR |
| FileNo | Call Tags |
|---|---|
| ^DI(.84 - [#.84] | GET1^DIQ |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ACTDT | DTCHK2~, DTCHK2+3, DTCHK~, DTCHK+13, DTCHK+17, DTCHK+19*, DTCHK+25, DTCHK+31 |
| ARRAY | OKARRAY~, OKARRAY+6 |
| BEGINDT | DTCHK~, DTCHK+13, DTCHK+17, DTCHK+20*, DTCHK+23, DTCHK+31 |
| CHECK | OKARRAY~, OKARRAY+6, OKUSRCL~, OKUSRCL+3, OKUSRCL+8, OKUSRCL+11 |
| ENDDT | DTCHK~, DTCHK+13, DTCHK+17, DTCHK+21*, DTCHK+25, DTCHK+27, DTCHK+33 |
| ERNUM | ERR~, ERR+2*, ERR+3*, ERR+6, ERR+7 |
| INACTDT | DTCHK2~, DTCHK2+3, DTCHK~, DTCHK+17, DTCHK+18*, DTCHK+23, DTCHK+27, DTCHK+33 |
| INCL | DTCHK~, DTCHK+29 |
| OK | DTCHK+11~, DTCHK+12*, DTCHK+14*, DTCHK+29*, DTCHK+34*, DTCHKQ |
| OUTPUT | ERR~, ERR+7 |
| PARMS | ERR~, ERR+7 |
| SCBEGIN | DTCHK2+1~, DTCHK2+3 |
| SCDATES | DTCHK2~ |
| SCEND | DTCHK2+1~, DTCHK2+3 |
| SCER | ERR~, ERR+4, ERR+7 |
| SCER( | ERR+6* |
| SCINCL | DTCHK2+1~, DTCHK2+3 |
| SCOK | OKUSRCL+1~, OKUSRCL+2*, OKUSRCL+3*, OKUSRCL+7*, OKUSRCL+8*, OKUSRCL+10*, OKUSRCL+11*, QTOKUSR |
| SCU | OKUSRCL+1~, OKUSRCL+5*, OKUSRCL+8*, OKUSRCL+11* |
| SEQ | ERR~, ERR+5*, ERR+6 |
| USRARRAY | OKUSRCL~, OKUSRCL+3, OKUSRCL+4, OKUSRCL+6, OKUSRCL+8, OKUSRCL+11 |