DGPFLF6 ;ALB/RPM - PRF FLAG MANAGEMENT LM SUB-ROUTINE ; 4/19/04 4:25pm
Source file <DGPFLF6.m>
Package | Total | Call Graph |
---|---|---|
Registration | 2 | $$GETHTIU^DGPFAPI1 $$ANSWER^DGPFUT |
VA FileMan | 1 | $$EXTERNAL^DILFD |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Name | Comments | DBIA/ICR reference |
---|---|---|
PRININV(DGFIEN,DGPFLF) | ;Prompt for principle investigators
|
|
ASGNCNT(DGFIEN,DGDFNLST) | ;counts existing assignments for a given flag
|
|
CKTIUPN(DGTITLE,DGARRAY) | ;check for progress notes linked to a record flag
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGPF(26.11 - [#26.11] | PRININV+25 |
^DGPF(26.13 - [#26.13] | ASGNCNT+21, ASGNCNT+25, ASGNCNT+27 |
^TMP("DGHTIU" | CKTIUPN+28 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DGARRAY | CKTIUPN~, CKTIUPN+26, CKTIUPN+30 |
DGASK | PRININV+11~, PRININV+36*, PRININV+39, PRININV+42, PRININV+45, PRININV+46, PRININV+53, PRININV+69, PRININV+70, PRININV+73 , PRININV+74 |
DGCNT | PRININV+12~, PRININV+30*, PRININV+72*, PRININV+73, PRININV+74, ASGNCNT+16~, ASGNCNT+19*, ASGNCNT+26*, ASGNCNT+29 |
DGDA | PRININV+13~, PRININV+33*, PRININV+36, PRININV+47*, PRININV+63*, PRININV+69, PRININV+75* |
DGDFN | ASGNCNT+17~, ASGNCNT+24*, ASGNCNT+25*, ASGNCNT+27, CKTIUPN+20~, CKTIUPN+29*, CKTIUPN+30*, CKTIUPN+32 |
DGDFNLST | ASGNCNT~ |
DGDFNLST( | ASGNCNT+27* |
DGFIEN | PRININV~, PRININV+22*, PRININV+25, ASGNCNT~, ASGNCNT+21, ASGNCNT+25, ASGNCNT+27 |
DGHTIU | CKTIUPN+21~, CKTIUPN+28*, CKTIUPN+31, CKTIUPN+32, CKTIUPN+34, CKTIUPN+35, CKTIUPN+37 |
DGI | CKTIUPN+22~, CKTIUPN+33*, CKTIUPN+34*, CKTIUPN+35 |
DGLAST | PRININV+14~, PRININV+30*, PRININV+33, PRININV+42, PRININV+46*, PRININV+47, PRININV+54, PRININV+55, PRININV+56, PRININV+57 , PRININV+58, PRININV+59, PRININV+61, PRININV+62*, PRININV+63, PRININV+69 |
DGLKUP | PRININV+15~, PRININV+26* |
DGLKUP( | PRININV+45, PRININV+46, PRININV+56!, PRININV+73* |
DGNEWPI | PRININV+16~, PRININV+70*, PRININV+71, PRININV+74 |
DGORIG | PRININV+17~, PRININV+25*, PRININV+26 |
DGORIG( | PRININV+58 |
DGPFLF | PRININV~ |
DGPFLF("PRININV" | PRININV+30, PRININV+33, PRININV+42, PRININV+47, PRININV+54, PRININV+55, PRININV+56, PRININV+57, PRININV+58, PRININV+59* , PRININV+61!, PRININV+63, PRININV+69, PRININV+74* |
DGPREV | PRININV+18~, PRININV+57*, PRININV+62 |
DGQUIT | PRININV+19~, PRININV+29*, PRININV+35, PRININV+39*, PRININV+42* |
DGRSLT | PRININV+20~, PRININV+28*, PRININV+39*, PRININV+77, CKTIUPN+19~, CKTIUPN+24*, CKTIUPN+30, CKTIUPN+34, CKTIUPN+35*, CKTIUPN+39 |
DGTITLE | CKTIUPN~, CKTIUPN+26, CKTIUPN+32 |
U | PRININV+33, PRININV+42, PRININV+47, PRININV+55, PRININV+56, PRININV+58, PRININV+63, PRININV+69, PRININV+74, CKTIUPN+35 |