Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: AGFLDREQ

Package: IHS Patient Registration

Routine: AGFLDREQ


Information

AGFLDREQ ; IHS/SD/TPF - DEVELOPER TOOL TO ADD REQUIRED FIELDS TO THE REQUIRED FIELD MULTIPLE IN THE REGISTRATION PARAMETER FILE

Source Information

Source file <AGFLDREQ.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
VA Fileman 3 ^DIC  (FIELD,FILE)^DID  ^DIE  

Caller Graph

Caller Graph Total: 6

Package Total Caller Graph
IHS Patient Registration 6 AG3A  AGAPIPAT  AGED2  AGED6  AGEDGUAR  AGEDTPL  

Entry Points

Name Comments DBIA/ICR reference
EDIT ;EP - CALLED FROM INPUT TEMPLATE 'AGFAC' TO EDIT SITE SPECIFIC REQUIRED FIELDS
ISREQ(FILENUM,FIELDNUM) ;EP - USE TO VERIFY A SITE SPECIFIC MANDATORY FIELD IS SET FOR REQUIRED
SUBFILES(TOPFILE,X,Y) ;GO THROUGH THE NEXT LEVEL OF SUB FILES AND FIND
ALTREQ(FILENUM,FIELDNM) ;EP - ALTERNATE CHECK FOR SITE SPECIFIC MANDATORY FIELDS (HANDLES MULTIPLE SUBFIELDS)
RESTRICT(IEN) ;EP - RESTRICT FILE CHOICE TO PATIENT REG FILES OR
GETFIELD(A,B,X) ;EP - CALLED FROM INPUT TRANSFORM OF FIELD 9009061.1101 'REQUIRED FIELD NAME' SUB-FIELD

External References

Name Field # of Occurrence
^DIC GETFIELD+7, SUBFILES+8
FIELD^DID ISREQ+3
FILE^DID EDIT+13
^DIE EDIT+29, EDIT+37, EDIT+46

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Mandatory Fields (site specific) edit:"
  • Line Location: EDIT+8
Routine Call
  • DIE
  • Line Location:
    • EDIT+29
    • EDIT+37
    • EDIT+46
Routine Call
  • DIC
  • Line Location:
    • GETFIELD+7
    • SUBFILES+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^AGFAC - [#9009061] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AGFAC - [#9009061] GETFIELD+3, ISREQ+6, ISREQ+8, ISREQ+10, EDIT+10, EDIT+12, EDIT+17, EDIT+18, ALTREQ+4, ALTREQ+5
, ALTREQ+6
^DD( SUBFILES+4

Label References

Name Line Occurrences
SUBFILES GETFIELD+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EDIT+6~
A GETFIELD~, GETFIELD+3
B GETFIELD~, GETFIELD+3
D EDIT+6~
D0 EDIT+6~
DA EDIT+4, EDIT+6~, EDIT+20!, EDIT+21*, EDIT+33!, EDIT+34*, EDIT+38!, EDIT+42!, EDIT+43*, EDIT+47!
DA(1 EDIT+23*, EDIT+24
DA(2 EDIT+22*, EDIT+24
DC EDIT+6~
DE EDIT+6~
DG EDIT+6~
DH EDIT+6~
DI EDIT+6~
DIA EDIT+6~
DIC GETFIELD+1~, GETFIELD+4*, SUBFILES+2~, SUBFILES+5*, EDIT+6~, EDIT+20!
DIC(0 GETFIELD+5*, SUBFILES+6*
DIE GETFIELD+1~, SUBFILES+2~, EDIT+6~, EDIT+20!, EDIT+24*, EDIT+33!, EDIT+35*, EDIT+38!, EDIT+42!, EDIT+44*
, EDIT+47!
DIE("NO^" EDIT+28*
DIEDA EDIT+6~
DIEL EDIT+6~
DIETMP EDIT+6~
DIFLD EDIT+6~
DIIENS EDIT+6~
DILK EDIT+6~
DIP EDIT+6~
DISYS EDIT+6~
DK EDIT+6~
DL EDIT+6~
DM EDIT+6~
DO GETFIELD+1~, SUBFILES+2~, EDIT+6~
DP EDIT+6~
DQ EDIT+6~
DR EDIT+6~, EDIT+20!, EDIT+25*, EDIT+33!, EDIT+36*, EDIT+38!, EDIT+42!, EDIT+45*, EDIT+47!
DR(2 EDIT+26*
DR(3 EDIT+27*
DSC EDIT+6~
DU EDIT+6~
DUZ(2 ISREQ+6, ISREQ+8, ISREQ+10, ALTREQ+4, ALTREQ+5, ALTREQ+6
DV EDIT+6~
DW EDIT+6~
DXS EDIT+6~
ERROR ISREQ+1!, ISREQ+4, EDIT+7!, EDIT+14
FACIEN EDIT+3~, EDIT+4*, EDIT+10, EDIT+12, EDIT+17, EDIT+18, EDIT+22, EDIT+34, EDIT+43
FDIEN ALTREQ+3~, ALTREQ+5*, ALTREQ+6
FIELDIEN ISREQ+2~, ISREQ+8*, ISREQ+9, ISREQ+10, EDIT+18*, EDIT+21
>> FIELDNAM ISREQ+5*, ISREQ+8, EDIT+16*, EDIT+17*, EDIT+18, EDIT+19, EDIT+32, EDIT+41
FIELDNM ALTREQ~, ALTREQ+5
FIELDNUM ISREQ~, ISREQ+3, EDIT+3~
FILEIEN ISREQ+2~, ISREQ+6*, ISREQ+7, ISREQ+8, ISREQ+10, EDIT+3~, EDIT+11*, EDIT+12*, EDIT+17, EDIT+18
, EDIT+23
FILENUM ISREQ~, ISREQ+3, ISREQ+6, EDIT+3~, EDIT+9*, EDIT+10*, EDIT+12, EDIT+13, EDIT+32, EDIT+41
, ALTREQ~, ALTREQ+4
FLIEN ALTREQ+3~, ALTREQ+4*, ALTREQ+5, ALTREQ+6
IEN RESTRICT~
L EDIT+6~
RETURN ISREQ+1!, EDIT+7!
RETURN("LABEL" ISREQ+5
RETURN("NAME" EDIT+15
>> SUBFILE SUBFILES+3*, SUBFILES+4*, SUBFILES+5
TOPFILE GETFIELD+3*, GETFIELD+4, GETFIELD+8, SUBFILES~, SUBFILES+3, SUBFILES+4
U GETFIELD+3, GETFIELD+10, ISREQ+10, ALTREQ+6
X GETFIELD~, GETFIELD+8, GETFIELD+9!, GETFIELD+10*, SUBFILES~, EDIT+6~
Y GETFIELD+1~, GETFIELD+8, GETFIELD+9, GETFIELD+10, SUBFILES~, SUBFILES+4, EDIT+6~, EDIT+10, EDIT+12, EDIT+17
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  All