SCDXPOV2 ;ALB/SCK - VISIT REPORT BY NPCDB TRANSMISSION STATUS ; 10/31/96
Source file <SCDXPOV2.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
GETDATE(CAPTION) | ; Get and return a date value
; Input: ; Caption - Prompt to be displayed in reader call |
|
SHWTOT() | ; Selects wether only the grand total page is shown
|
|
RPTOPT() | ; Selects which parts of the report are shown
|
|
QUE | ; Sets up the report for queueing
|
|
CHKELG(SCELG) | ; checks for inactive entries in the ELIGIBILTIT CODE File, #8
|
|
ELGPRI(SCEL,SCCUR) | ; Returns whether heirarchy level of eligibility should change
; Input ; SCEL - Eligibility ; SCCUR - Current Hierarchy level ; Returns ; SCPRI = 1 Change current hierarchy to new ; SCPRI = 0 Do not change |
|
COVPRI(SCNEW,SCCUR) | ; Returns whether heirarchy level of visit should change
; Input ; SCNEW - Eligibility ; SCCUR - Current Hierarchy level ; Returns ; SCPRI = 1 Change current hierarchy to new ; SCPRI = 0 Do not change |
|
CLEAR | ; Clear DIR variables
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(8 - [#8] | CHKELG+2, ELGPRI+9 |
Name | Line Occurrences |
---|---|
CLEAR | GETDATE+8, SHWTOT+6, RPTOPT+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CAPTION | GETDATE~, GETDATE+5 |
DIR | GETDATE+6!, SHWTOT+4!, RPTOPT+3!, CLEAR+1! |
DIR("?" | SHWTOT+3* |
DIR("??" | GETDATE+5* |
DIR("A" | GETDATE+5*, SHWTOT+1*, SHWTOT+2*, RPTOPT+2* |
DIR("B" | GETDATE+5*, SHWTOT+1*, RPTOPT+2* |
DIR(0 | GETDATE+5*, SHWTOT+1*, RPTOPT+1* |
DIROUT | CLEAR+1! |
DIRUT | GETDATE+7, SHWTOT+5, RPTOPT+4, CLEAR+1! |
DTOUT | CLEAR+1! |
DUOUT | CLEAR+1! |
IO("Q" | QUE+6! |
LV | QUE+1~, QUE+4* |
SCCUR | ELGPRI~, ELGPRI+13, COVPRI~, COVPRI+13 |
SCEL | ELGPRI~, ELGPRI+9 |
SCELG | CHKELG~, CHKELG+2 |
SCNEW | ELGPRI+8~, ELGPRI+9*, ELGPRI+10, ELGPRI+11, ELGPRI+12, COVPRI~, COVPRI+10, COVPRI+11, COVPRI+12 |
SCPRI | ELGPRI+8~, ELGPRI+9*, ELGPRI+10*, ELGPRI+11*, ELGPRI+12*, ELGPRI+13, COVPRI+8~, COVPRI+9*, COVPRI+10*, COVPRI+11* , COVPRI+12*, COVPRI+13 |
U | CHKELG+2, ELGPRI+9, ELGPRI+13, COVPRI+13 |
>> X | GETDATE+4 |
>> Y | GETDATE+4*, GETDATE+5, GETDATE+7*, GETDATE+9, SHWTOT+5*, SHWTOT+7, RPTOPT+4*, RPTOPT+6 |
>> ZTDESCR | QUE+3* |
>> ZTRTN | QUE+2* |
>> ZTSAVE( | QUE+4* |
>> ZTSK | QUE+5 |