ACMPOST1 ; IHS/TUCSON/TMJ - POST INIT #2 ;
Source file <ACMPOST1.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
ORGAN | ;Converts Resource DFN's Text value to the new Organization field (ORGAN1)
|
|
SERVICE | ;Convert Service DFN in new Purpose Field #11 to Actual Text value in CMS Service List Entry File
|
|
RECLDIE | ;SET FLAG IN CMS PARAMETERS FILE TO INDICATE RECALL DATE CONVERSION HAS BEEN COMPLETED
|
|
START | ;EP - CALLED FROM ACMPOST
|
|
EXIT | ;
|
|
RECALL1 | ;Converts Old .01 Resource to Recall Date (Next Appoint Fld #1 value)
|
|
APPTSTAT | ;Convert Date Last Seen to Appointment Status=Open
|
Name | Field # of Occurrence |
---|---|
^DIE | ORGAN+11, SERVICE+11, RECALL1+8, APPTSTAT+5, RECLDIE+3 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^ACM(40 - [#9002240] | Classic Fileman Calls |
^ACM(49 - [#9002249] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ACM(40 - [#9002240] | START+1 |
^ACM(47.1 - [#9002247.1] | SERVICE+9 |
^ACM(49 - [#9002249] | ORGAN+4, ORGAN+7, SERVICE+4, SERVICE+7, RECALL1+4, RECALL1+6, APPTSTAT+3, APPTSTAT+4 |
^ACM(50 - [#9002250] | ORGAN+9 |
Name | Line Occurrences |
---|---|
APPTSTAT | START+5 |
EXIT | START+5 |
ORGAN | START+5 |
RECALL1 | START+5 |
RECLDIE | START+5 |
SERVICE | START+5 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
ACMDFN | ORGAN+4*, ORGAN+7, ORGAN+11, ORGAN+12!, SERVICE+4*, SERVICE+7, SERVICE+11, SERVICE+12!, RECALL1+4*, RECALL1+6 , RECALL1+8, RECALL1+9!, APPTSTAT+3*, APPTSTAT+4, APPTSTAT+5, APPTSTAT+7! |
ACMNEWN | ORGAN+9*, ORGAN+10*, ORGAN+11, ORGAN+12!, SERVICE+9*, SERVICE+10*, SERVICE+11, SERVICE+12!, RECALL1+6*, RECALL1+7* , RECALL1+8, RECALL1+9!, APPTSTAT+4*, APPTSTAT+5, APPTSTAT+7! |
ACMOLDN | ORGAN+7*, ORGAN+8, ORGAN+9, ORGAN+12!, SERVICE+7*, SERVICE+8, SERVICE+9, SERVICE+12! |
DA | ORGAN+11*, SERVICE+11*, RECALL1+8*, APPTSTAT+5*, RECLDIE+3*! |
DIC | RECLDIE+3! |
DIE | ORGAN+11*!, SERVICE+11*!, RECALL1+8*!, APPTSTAT+5*!, RECLDIE+3*! |
DR | ORGAN+11*, SERVICE+11*, RECALL1+8*, APPTSTAT+5*, RECLDIE+3*! |
DT | RECALL1+7 |
DUZ(2 | START+1, RECLDIE+3 |
U | START+1, ORGAN+7, ORGAN+9, SERVICE+7, SERVICE+9, RECALL1+6, APPTSTAT+4 |