SCDXUTL ;ALB/JLU;Utility routine for ambcare project;4/26/96
Source file <SCDXUTL.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Scheduling | 6 | SCCVU SCDXMSG SCMSP SCMSP66 SCMSVUT2 SDOEUT | 
| Registration | 3 | VAFHCDG VAFHCPV VAFHLPV1 | 
| PCE Patient Care Encounter | 2 | PXBAPI1 PXCEVFIL | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| DATECHK() | ;this function call returns whether to require diag/prov based | |
| QT | ||
| OCCA(CLN) | ;This function call returns whether or not the clinic is | |
| FMDATE() | ;this entry point returns the FM date from the parameter of | 
 
 | 
| CLOSEFM() | ;this entry point returns the close out date parameter in FM format. | 
 
 | 
| DATE(DATE) | ;this entry point will accept a date and return whether the new or old Scheduling Visits file limitations are to be used. | 
 
 | 
| INPATENC(PTR,PTR2) | ;ALB/JRP - Determine if an Outpatient Encounter ; is for an inpatient appointment | 
 
 | 
| CLOSED(DATE) | ;this entry point accepts a date, compares it to the close out | 
 
 | 
| OCCAQ | ||
| DATECHKQ | ||
| CQT | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(40.7 - [#40.7] | OCCA+12, OCCA+13 | 
| ^SC - [#44] | OCCA+9, OCCA+10 | 
| ^SCE - [#409.68] | INPATENC+24, INPATENC+40 | 
| ^SD(404.91 - [#404.91] | DATE+7, FMDATE+2, CLOSED+8, CLOSEFM+1, DATECHK+9 | 
| ^SD(409.45 - [#409.45] | OCCA+15 | 
| ^SD(409.63 - [#409.63] | INPATENC+46 | 
| ^SD(409.73 - [#409.73] | INPATENC+23, INPATENC+32 | 
| ^SD(409.74 - [#409.74] | INPATENC+25, INPATENC+41 | 
| Name | Line Occurrences | 
|---|---|
| $$DATE | DATECHK+8 | 
| CQT | CLOSED+9, CLOSED+10 | 
| DATECHKQ | DATECHK+8, DATECHK+9 | 
| OCCAQ | OCCA+9, OCCA+11, OCCA+12, OCCA+14, OCCA+15, OCCA+16 | 
| QT | DATE+8, DATE+9 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ANS | DATE+6~, DATE+8*, DATE+9*, DATE+10*, QT, CLOSED+7~, CLOSED+9*, CLOSED+10*, CLOSED+11*, CQT , DATECHK+7~, DATECHK+8*, DATECHK+9*, DATECHK+10*, DATECHKQ, OCCA+8~, OCCA+9*, OCCA+11*, OCCA+12*, OCCA+14* , OCCA+15*, OCCA+16*, OCCA+17*, OCCAQ | 
| CLN | OCCA~, OCCA+9, OCCA+10 | 
| DATE | DATE~, DATE+9, CLOSED~, CLOSED+10, DATECHK+7~ | 
| DT | DATECHK+8 | 
| PAR | DATE+6~, DATE+7*, DATE+8, DATE+9, CLOSED+7~, CLOSED+8*, CLOSED+9, CLOSED+10 | 
| PTR | INPATENC~, INPATENC+19*, INPATENC+20, INPATENC+23, INPATENC+24, INPATENC+25, INPATENC+31, INPATENC+32, INPATENC+33*, INPATENC+35 , INPATENC+37*, INPATENC+40, INPATENC+41 | 
| PTR2 | INPATENC~, INPATENC+21*, INPATENC+22*, INPATENC+24, INPATENC+25, INPATENC+31, INPATENC+35*, INPATENC+38*, INPATENC+41 | 
| SC | OCCA+8~, OCCA+13*, OCCA+14, OCCA+15, OCCA+16 | 
| SCP | OCCA+8~, OCCA+10*, OCCA+11, OCCA+12, OCCA+13 | 
| STATPTR | INPATENC+27~, INPATENC+43*, INPATENC+44, INPATENC+46 | 
| STATUS | INPATENC+27~, INPATENC+48*, INPATENC+50 | 
| U | DATE+7, FMDATE+2, CLOSED+8, CLOSEFM+1, DATECHK+9, OCCA+10, OCCA+13 | 
| ZERONODE | INPATENC+27~, INPATENC+32*, INPATENC+33, INPATENC+37, INPATENC+40*, INPATENC+41*, INPATENC+43, INPATENC+46*, INPATENC+48 |