APCLDF3 ; IHS/CMI/LAB -IHS ;
Source file <APCLDF3.m>
Package | Total | Caller Graph |
---|---|---|
Patient Care Component Reports | 2 | APCLDF1 APCLDF2 |
Name | Comments | DBIA/ICR reference |
---|---|---|
INVDATE | ; If COND is 'LAST', then invert date to have in latest to earliest
|
|
GREATER | ; Kill nodes less than indicated visit date plus 1
; e.g., if not "<>", after 1/1/87 kills nodes less than 2870102 ; if =">", then kills nodes less than 2870101 |
|
VISIT | ; - ENTRY POINT - Evaluate visits
|
|
EQUAL | ; Save nodes equal to visit date
|
|
VISRES | ; Finds first n visits or visits as a result of date entered
|
|
LESSTHAN | ; Kill nodes greater than indicated visit date minus .0001
; e.g., less than 1/1/87 kills nodes greater than 2870100.9999 |
|
DATE | ; - ENTRY POINT - from APCLDF2
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^AUPNVSIT("AA" | VISIT+2, VISIT+3 |
^TMP("APCLDF" | EQUAL+1, GREATER+4, GREATER+5, LESSTHAN+3, INVDATE+1*!, VISIT+3*, VISIT+4!, VISRES+2, VISRES+3 |
Name | Line Occurrences |
---|---|
DATE | VISIT+3 |
EQUAL | DATE+1 |
GREATER | DATE+2, DATE+4 |
INVDATE | DATE+5 |
LESSTHAN | DATE+3, DATE+4 |
VISRES | VISIT+3 |
Name | Field # of Occurrence |
---|---|
^( | EQUAL+1!, GREATER+4!, GREATER+5!, LESSTHAN+3!, INVDATE+1, VISIT+2 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> % | EQUAL+1*, GREATER+4*, GREATER+5*, INVDATE+1*, VISRES+2*, VISRES+3 |
>> APCLY | VISIT+2, VISRES+3 |
>> BOOL | DATE+1, DATE+2, DATE+3, DATE+4, GREATER+4, GREATER+5, LESSTHAN+2 |
>> C | VISIT+3* |
>> COND | DATE+5, VISIT+2, VISIT+3 |
D | INVDATE+1*, VISIT+2*, VISIT+3*, VISRES+1~, VISRES+2*, VISRES+3 |
>> DATE | EQUAL+1, GREATER+4, LESSTHAN+2, VISIT+2, VISIT+3 |
>> E | VISIT+2*, VISIT+3* |
>> EDATE | LESSTHAN+2 |
>> I | VISRES+2*, VISRES+3 |
>> N | VISIT+1*, VISIT+2* |
>> NUM | VISIT+2, VISRES+2 |
>> PAT | VISIT+2, VISIT+3 |
>> STDATE | GREATER+5 |
TMPDATE | GREATER+3~, GREATER+4*, GREATER+5* |
>> X | LESSTHAN+2*, LESSTHAN+3* |