DGFFP01 ; ALB/SCK - FUGITIVE FELON PROGRAM ROUTINE ; 11/08/2002
Source file <DGFFP01.m>
| Package | Total | Caller Graph | 
|---|---|---|
| Registration | 3 | DGFFP CLR FUGITIVE FELON FLAG DGFFP SET FUGITIVE FELON FLAG ^DPT | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| AGN | ||
| CLR1 | ||
| RMRK() | ; | |
| QCLR | ||
| DD(DFN) | ;  CALLED BY AUFFP X-REF ON THE FUGITIVE FELON FLAG FIELD ; #1100.01 IN THE PATIENT FILE #2. | |
| SETFLAG | ;  Set the Fugitive Felon Flag | |
| CLRFLAG | ;  Clear the Fugitive Felon Flag | |
| SET1 | ||
| CONT() | ;  Query to continue processing | |
| CONFIRM(DGACT,DGPAT) | ; Query to confirm set/clear the fugitive felon flag | |
| GETPAT(ACTION) | ;  Retrieve patient name | |
| QSET | 
| Name | Line Occurrences | 
|---|---|
| Function Call: WRITE | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Routine Call | 
 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DPT - [#2] | DD+11, DD+17 | 
| ^DPT("AXFFP" | CONFIRM+4 | 
| Name | Line Occurrences | 
|---|---|
| $$CONFIRM | SET1+2, CLR1+2 | 
| $$CONT | SET1+7, CLR1+7 | 
| $$GETPAT | SET1, CLR1 | 
| $$RMRK | DD+32 | 
| AGN | AGN+6 | 
| CLR1 | CLR1+8 | 
| QCLR | CLR1+1, CLR1+7 | 
| QSET | SET1+1, SET1+7 | 
| SET1 | SET1+8 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ACTION | GETPAT~, GETPAT+3*, GETPAT+8 | 
| DFN | DD~, DD+11, DD+16, DD+17 | 
| DGABRT | CONFIRM+1~, CONFIRM+3, CONFIRM+6* | 
| DGACT | CONFIRM~, CONFIRM+3, CONFIRM+12 | 
| DGERR | SETFLAG+1~, SET1+5, CLRFLAG+1~, CLR1+5 | 
| DGFDA | SETFLAG+1~, CLRFLAG+1~, DD+14~, DD+34 | 
| DGFDA(1 | SET1+3*, CLR1+3*, DD+21*, DD+22*, DD+24*, DD+25*, DD+26*, DD+30*, DD+31*, DD+32* | 
| DGIEN | DD+14~, DD+16*, DD+21, DD+22, DD+24, DD+25, DD+26, DD+30, DD+31, DD+32 | 
| DGOLD | DD+14~, DD+17*, DD+18, DD+19, DD+23 | 
| DGPAT | CONFIRM~, CONFIRM+4, CONFIRM+8, CONFIRM+14, SETFLAG+1~, SET1*, SET1+1, SET1+2, SET1+3, CLRFLAG+1~ , CLR1*, CLR1+1, CLR1+2, CLR1+3 | 
| DIR | GETPAT+1~, GETPAT+9!, CONT+1~, CONT+8!, CONFIRM+1~, CONFIRM+19!, RMRK+1~, AGN+5! | 
| DIR("?" | GETPAT+7*, CONT+7*, CONFIRM+10*, CONFIRM+16*, AGN+3*, AGN+4* | 
| DIR("A" | GETPAT+6*, CONT+4*, CONT+5*, CONFIRM+7*, CONFIRM+8*, CONFIRM+9*, CONFIRM+13*, CONFIRM+14*, CONFIRM+15*, AGN* , AGN+1*, AGN+2* | 
| DIR("B" | CONT+6*, CONFIRM+18* | 
| DIR("S" | GETPAT+8* | 
| DIR(0 | GETPAT+5*, CONT+3*, CONFIRM+18*, AGN* | 
| DIRUT | GETPAT+1~, GETPAT+11, CONFIRM+1~ | 
| DUZ | DD+21, DD+30 | 
| RSLT | GETPAT+1~, GETPAT+4*, GETPAT+12*, GETPAT+13 | 
| U | CONFIRM+8, CONFIRM+14 | 
| X | GETPAT+1~, CONT+1~, CONFIRM+1~ | 
| Y | GETPAT+1~, GETPAT+12, CONT+1~, CONT+9, CONFIRM+1~, CONFIRM+20, AGN+6!, AGN+7 |