DGPFAPIU ;ALB/SCK - PRF API UTILITIES FOR HIGH RISK MENTAL HEALTH ; Jan 21, 2011
Source file <DGPFAPIU.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 1 | $$NOW^XLFDT | 
| Registration | 1 | $$ASGNDATE^DGPFAPIU | 
| VA Fileman | 1 | $$GET1^DIQ | 
| Package | Total | Caller Graph | 
|---|---|---|
| Registration | 2 | DGPFAPIH DGPFAPIU | 
| Clinical Reminders | 1 | PXRMPRF | 
| Scheduling | 1 | SDMHAD | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| ASGNDATE(DGIEN) | ; Get intial assignment date from new record history entry | |
| CHKQ | ; | |
| CHKDFN(DGDFN,DGNAME) | ; Check for a valid entry in the PATIENT file | |
| ACTIVE(DGIEN,DGRANGE) | ; Check if "active" during date range ; Input ; DGIEN - Pointer to PRF Assignment File (#26.13) ; DGRANGE - Array containg Start Date/End Date | |
| CHKDATE(DGSTART,DGEND,DGRANGE) | ; Check for valid start and end dates, set DGRANGE parameter | |
| GETFLAG(DGPRF,DGCAT) | ; Get the variable pointer value for the flag text passed in ; Input: DGPRF - Flag name, i.e. BEHAVIORAL ; DGCAT - Flag Category, N - National [Optional] ; L - Local | 
 
 | 
| FileNo | Call Tags | 
|---|---|
| ^DPT - [#2] | GET1^DIQ | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DGPF(26.11 - [#26.11] | GETFLAG+19, GETFLAG+24 | 
| ^DGPF(26.14 - [#26.14] | ASGNDATE+4, ASGNDATE+5, ACTIVE+14, ACTIVE+15, ACTIVE+16, ACTIVE+47, ACTIVE+48, ACTIVE+49, ACTIVE+50 | 
| ^DGPF(26.15 - [#26.15] | GETFLAG+15, GETFLAG+28 | 
| Name | Line Occurrences | 
|---|---|
| CHKQ | ACTIVE+23 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DGACT | ACTIVE+9~, ACTIVE+18*, ACTIVE+27 | 
| DGACT( | ACTIVE+16*, ACTIVE+23, ACTIVE+29, ACTIVE+32, ACTIVE+37, ACTIVE+38, ACTIVE+51, ACTIVE+52 | 
| DGACT(0 | ACTIVE+28 | 
| DGACT(99999999 | ACTIVE+22, ACTIVE+31 | 
| DGACT2 | ACTIVE+9~, ACTIVE+36*, ACTIVE+38*, ACTIVE+40 | 
| DGACT2( | ACTIVE+38*, ACTIVE+41, ACTIVE+42 | 
| DGCAT | GETFLAG~, GETFLAG+11*, GETFLAG+12*, GETFLAG+14, GETFLAG+18, GETFLAG+22 | 
| DGCNT | ACTIVE+9~, ACTIVE+13*, ACTIVE+17*, ACTIVE+18 | 
| DGDFN | CHKDFN~, CHKDFN+4 | 
| DGDONE | GETFLAG+9~, GETFLAG+16*, GETFLAG+20*, GETFLAG+25*, GETFLAG+27, GETFLAG+29*, GETFLAG+31 | 
| DGDT | ACTIVE+9~, ACTIVE+13*, ACTIVE+14*, ACTIVE+15 | 
| DGDTPRE | ACTIVE+9~, ACTIVE+46*, ACTIVE+47*, ACTIVE+48 | 
| DGDTPST | ACTIVE+9~, ACTIVE+49*, ACTIVE+50 | 
| DGEND | CHKDATE~, CHKDATE+3*, CHKDATE+6, CHKDATE+8*, CHKDATE+12 | 
| DGERR | CHKDFN+1~, CHKDFN+5 | 
| DGERR("DIERR" | CHKDFN+5 | 
| DGIEN | ASGNDATE~, ASGNDATE+4, GETFLAG+9~, GETFLAG+15*, GETFLAG+16, GETFLAG+19*, GETFLAG+20, GETFLAG+24*, GETFLAG+25, GETFLAG+28* , GETFLAG+29, ACTIVE~, ACTIVE+14, ACTIVE+15, ACTIVE+35, ACTIVE+47, ACTIVE+48, ACTIVE+49, ACTIVE+50 | 
| DGNAME | CHKDFN~, CHKDFN+4*, CHKDFN+5* | 
| DGPRE | ACTIVE+9~, ACTIVE+48*, ACTIVE+51 | 
| DGPRF | GETFLAG~, GETFLAG+15, GETFLAG+19, GETFLAG+24, GETFLAG+28 | 
| DGPST | ACTIVE+9~, ACTIVE+50*, ACTIVE+52 | 
| DGRANGE | CHKDATE~, CHKDATE+7*, CHKDATE+10*, ACTIVE~, ACTIVE+26 | 
| DGRANGE("END" | CHKDATE+12*, ACTIVE+35, ACTIVE+38, ACTIVE+49 | 
| DGRANGE("START" | CHKDATE+12*, ACTIVE+38, ACTIVE+46 | 
| DGRSLT | CHKDATE+1~, CHKDFN+1~, CHKDFN+3*, CHKDFN+5*, CHKDFN+6, ASGNDATE+1~, ASGNDATE+5*, ASGNDATE+7, GETFLAG+9~, GETFLAG+16* , GETFLAG+20*, GETFLAG+25*, GETFLAG+29*, GETFLAG+31*, GETFLAG+34, GETFLAG+35, GETFLAG+36*, GETFLAG+38, ACTIVE+9~, ACTIVE+11* , ACTIVE+23*, ACTIVE+29*, ACTIVE+32*, ACTIVE+33*, ACTIVE+35*, ACTIVE+42*, ACTIVE+51*, ACTIVE+52*, CHKQ+2 | 
| DGSTART | CHKDATE~, CHKDATE+3*, CHKDATE+4*, CHKDATE+6, CHKDATE+8*, CHKDATE+12 | 
| DGSTAT | GETFLAG+9~, GETFLAG+35*, GETFLAG+36 | 
| DGX | ASGNDATE+1~, ASGNDATE+3*, ASGNDATE+4*, ASGNDATE+5, ACTIVE+9~, ACTIVE+15*, ACTIVE+16, ACTIVE+22*, ACTIVE+23, ACTIVE+28* , ACTIVE+29, ACTIVE+31*, ACTIVE+32, ACTIVE+36*, ACTIVE+37*, ACTIVE+38, ACTIVE+41*, ACTIVE+42 | 
| U | ASGNDATE+5, ACTIVE+16, ACTIVE+23, ACTIVE+29, ACTIVE+32, ACTIVE+38, ACTIVE+42, ACTIVE+51, ACTIVE+52 |