SCCVCST3 ;ALB/TMP - Scheduling Conversion Template Utilities - CST; APR 20, 1998
Source file <SCCVCST3.m>
Package | Total | Call Graph |
---|---|---|
Scheduling | 3 | ($$DISP1,CONV1,NOENT)^SCCVCST4 $$VAL1^SCCVCST5 ($$ENDDATE,$$OK)^SCCVU |
VA Fileman | 3 | ^%DT ^DIC ^DIR |
Kernel | 1 | $$FMTE^XLFDT |
Registration | 1 | FULL^VALM1 |
Name | Comments | DBIA/ICR reference |
---|---|---|
SEL1() | ; Select an entry, convert
|
|
DTCNVT(X) | ; Convert date/time for disposition
|
|
SETFL(SCCVTYP,SCCVDFN) | ;Set the lookup format of the file
; INPUT: SCCVTYP, SCCVDFN ; FUNCTION OUTPUT: Lookup format of filename for type/patient |
|
ONE | ; -- Select/Convert one pt's encounter episode - no CST needed
|
|
ONEQ | ||
CHK(SCCVEVT,SCCVTYPN,SCFILE,SCFILE1,SCDTM,SC,SCMULT,SCQUIT,SCONE) | ;
; Check for validity for convert, display entry, convert if confirmed |
|
SEL1Q |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(40.7 - [#40.7] | SEL1+3 |
^SCE - [#409.68] | SEL1+37, SEL1+67 |
^SCE("ADFN" | SEL1+87 |
Name | Line Occurrences |
---|---|
$$SEL1 | ONE+5 |
$$SETFL | SEL1+20 |
CHK | SEL1+37, SEL1+67, SEL1+70, SEL1+75, SEL1+79, SEL1+88, SEL1+92 |
ONEQ | ONE+3 |
SEL1Q | SEL1+7, SEL1+13, SEL1+17, SEL1+39, SEL1+49, SEL1+52 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
%DT | DTCNVT+1~, DTCNVT+2*, DTCNVT+6* |
DA | SEL1+1~ |
DIC | SEL1+1~, SEL1+16* |
DIC(0 | SEL1+16* |
DIQ | SEL1+1~ |
DIR | SEL1+1~, SEL1+6!, SEL1+12!, SEL1+33!, SEL1+48!, SEL1+83!, CHK+2~ |
DIR("?" | SEL1+11*, SEL1+28*, SEL1+30*, SEL1+31*, SEL1+32*, SEL1+44*, SEL1+45*, SEL1+46*, SEL1+47* |
DIR("A" | SEL1+5*, SEL1+11*, SEL1+27*, SEL1+43*, SEL1+83* |
DIR("B" | SEL1+5* |
DIR(0 | SEL1+5*, SEL1+10*, SEL1+26*, SEL1+42*, SEL1+83* |
SC | SEL1+56~, SEL1+64*, SEL1+65*, SEL1+67, SEL1+70, SEL1+73*, SEL1+74*, SEL1+75, SEL1+77*, SEL1+78 , SEL1+79, CHK~, CHK+3, CHK+5, CHK+7 |
SCCV900 | SEL1+1~, SEL1+3* |
SCCVACRP | SEL1+1~, SEL1+2*, SEL1+26, SEL1+31, SEL1+42, SEL1+45 |
SCCVCOD | SEL1+1~, SEL1+10*, SEL1+14 |
SCCVDA | SEL1+1~, SEL1+36*, SEL1+37, SEL1+87*, SEL1+88, SEL1+91*, SEL1+92 |
SCCVDFN | SEL1+1~, SEL1+18*, SEL1+20, SEL1+21, SEL1+57, SEL1+60, SEL1+81, SEL1+87, SETFL~, SETFL+4 , CHK+7 |
SCCVDIS | SEL1+1~ |
SCCVEVT | SEL1+1~, SEL1+8*, SEL1+11, SEL1+37, SEL1+61, SEL1+67, SEL1+70, SEL1+75, SEL1+79, SEL1+88 , SEL1+92, CHK~, CHK+3, CHK+7 |
SCCVTYP | SEL1+1~, SEL1+14*, SEL1+20, SETFL~, SETFL+4 |
SCCVTYPN | SEL1+14*, SEL1+28, SEL1+31, SEL1+32, SEL1+37, SEL1+44, SEL1+46, SEL1+60, SEL1+67, SEL1+70 , SEL1+75, SEL1+79, SEL1+81, SEL1+88, SEL1+92, CHK~, CHK+5 |
SCD | SEL1+56~, SEL1+67* |
SCDTM | SEL1+50*, SEL1+52, SEL1+58, SEL1+59, SEL1+60, SEL1+64, SEL1+65, SEL1+73*, SEL1+74, SEL1+77 , SEL1+81, SEL1+85, SEL1+87, SEL1+88, SEL1+91, SEL1+92, CHK~, CHK+7 |
SCF | SEL1+56~, SEL1+57*, SEL1+58, SEL1+65, SEL1+66, SEL1+67, SEL1+69, SEL1+74, SEL1+77 |
SCFILE | SEL1+1~, SEL1+20*, SEL1+21, SEL1+26, SEL1+27, SEL1+28, SEL1+30, SEL1+31, SEL1+36, SEL1+37 , SEL1+57, SEL1+63, SEL1+67, SEL1+70, SEL1+72, SEL1+75, SEL1+76, SEL1+79, SEL1+86, SEL1+88 , SEL1+90, SEL1+91, SEL1+92, CHK~, CHK+3, CHK+7 |
SCFILE1 | SEL1+1~, SEL1+21*, SEL1+37, SEL1+67, SEL1+70, SEL1+75, SEL1+79, SEL1+88, SEL1+92, CHK~ , CHK+5 |
SCMULT | CHK~, CHK+3 |
SCONE | SEL1+37, SEL1+56~, SEL1+58*, SEL1+59*, SEL1+60, SEL1+61*, SEL1+64*, SEL1+67, SEL1+70, SEL1+73* , SEL1+75, SEL1+77*, SEL1+79, SEL1+81, SEL1+83, SEL1+88, SEL1+92, CHK~, CHK+4* |
SCPREF | SEL1+1~, SEL1+8*, SEL1+11, SEL1+28, SEL1+44, SEL1+47 |
SCQUIT | SEL1+1~, SEL1+24*, SEL1+37, SEL1+39, SEL1+50*, SEL1+52, SEL1+60*, SEL1+65, SEL1+67, SEL1+70 , SEL1+74, SEL1+75, SEL1+79, SEL1+81*, SEL1+83, SEL1+88, SEL1+92, CHK~, CHK+6*, CHK+7* |
SCSTOP | SEL1+1~, SEL1+4*, SEL1+7*, SEL1+13*, SEL1Q |
SCV | SEL1+56~, CHK+2~, CHK+5*, CHK+6 |
SCX | DTCNVT+1~, DTCNVT+4*, DTCNVT+5 |
SCZ | DTCNVT+1~, DTCNVT+5*, DTCNVT+6 |
U | SEL1+10, SEL1+67 |
>> VALMBCK | ONEQ* |
X | SEL1+1~, DTCNVT~, DTCNVT+3, DTCNVT+4, DTCNVT+6*, DTCNVT+7*, DTCNVT+8! |
Y | SEL1+1~, SEL1+7, SEL1+8, SEL1+13, SEL1+14, SEL1+17, SEL1+18, SEL1+36, SEL1+37, SEL1+49 , SEL1+50, CHK+2~, DTCNVT+1~, DTCNVT+7, DTCNVT+8 |
Z | SEL1+1~, SEL1+29*, SEL1+30*, SEL1+31, DTCNVT+1~, DTCNVT+5*, DTCNVT+6 |