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: VENPCCG2

Package: PCC New Encounter Form

Routine: VENPCCG2


Information

VENPCCG2 ; IHS/OIT/GIS - GET ICD PREFERENCES: FILER ;

Source Information

Source file <VENPCCG2.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 3 ^DIC  ^DIE  ^DIK  
PCC New Encounter Form 2 NARR^VENPCCG3  $$ICD^VENPCCU  
IHS VA Utilities 1 ^XBFMK  
Kernel 1 (CLOSE,OPEN)^%ZISH  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
PCC New Encounter Form 2 VENPCC1P  VENPCCG  

Entry Points

Name Comments DBIA/ICR reference
GETNARR ; get most freq. prov. narr. used for this icd code dmh 8/31/2000
CLN
END ;
FILE ; --EP-- CALLED FROM VENPCCG1
S1
ICD ;
STUFF(GIEN,PIEN,STG) ; NEW WAY TO STORE PREFERENCES
NEWAGSEX ; save out actual counts for age and sex groups not 1 or 0
INM(CODE) ;
CLEAN(GIEN,PIEN) ; CLEAN OUT THE OLD ENTRIES IN THE FILE FOR THIS PROVIDER AND ICD GROUP

External References

Name Field # of Occurrence
CLOSE^%ZISH END+4
OPEN^%ZISH NEWAGSEX+3
^DIC STUFF+22
^DIE S1+4
^DIK CLEAN+11
NARR^VENPCCG3 GETNARR+9
$$ICD^VENPCCU INM+2
^XBFMK FILE+7, CLEAN+13

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Creating text files......"
  • Line Location: FILE+3
Function Call: WRITE
  • Prompt: !!,"Saving new preference list..."
  • Line Location: CLN+0
Function Call: WRITE
  • Prompt: OUTREC,!
  • Line Location: CLN+12
Function Call: WRITE
  • Prompt: !!,"Cleaning out this user's old preference list..."
  • Line Location: CLEAN+1
Routine Call
  • DIE
  • Line Location:
    • S1+4
Routine Call
  • DIC
  • Line Location:
    • STUFF+22

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^VEN(7.34 - [#19707.34] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUTNPOV - [#9999999.27] GETNARR+8
^ICD9 - [#80] ICD+13, INM+3
^TMP("VEN PREF" FILE+6!
^VA(200 - [#200] CLEAN+4, STUFF+3
^VEN(7.33 - [#19707.33] CLEAN+3, STUFF+2
^VEN(7.34 - [#19707.34] CLEAN+6, CLEAN+7, STUFF+19, S1+4

Label References

Name Line Occurrences
$$INM CLN+6
CLEAN CLN
GETNARR ICD+14
ICD FILE+4
S1 STUFF+19
STUFF CLN+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% INM+1~, INM+2*, INM+3*, INM+4
AF STUFF+4~, STUFF+15*
AG NEWAGSEX+13*, NEWAGSEX+14*, NEWAGSEX+16, NEWAGSEX+18, NEWAGSEX+19, NEWAGSEX+21, END+1!
>> AGEBUK ICD+15*, ICD+16*, ICD+17, ICD+19
>> AGESEX ICD+20*, ICD+22*, ICD+23, ICD+25
AM STUFF+4~, STUFF+14*
>> C CLN+1*, CLN+2*, CLN+3, CLN+4, CLN+6, CLN+8
CHLD STUFF+4~, STUFF+11*
CODE ICD+13*, ICD+19, ICD+21, ICD+25, NEWAGSEX+17*, NEWAGSEX+18*, NEWAGSEX+19, NEWAGSEX+20, NEWAGSEX+21, END+1!
, INM~, INM+2
CT NEWAGSEX+14*, NEWAGSEX+16, NEWAGSEX+18, NEWAGSEX+22*, END+1!
DA CLEAN+2~, CLEAN+5*, CLEAN+6*, CLEAN+7, STUFF+5~, STUFF+19*, STUFF+23*, S1+4
DES ICD+18*, ICD+19, ICD+24*, ICD+25, NEWAGSEX+15*, NEWAGSEX+16*, NEWAGSEX+18, NEWAGSEX+19, NEWAGSEX+21, END+1!
>> DESALL ICD+11*, ICD+12, ICD+21
DIC STUFF+5~, STUFF+20*, S1
DIC(0 STUFF+20*
DIE STUFF+5~, S1*
DIK CLEAN+2~, CLEAN+5*, STUFF+5~
>> DLAYGO STUFF+20*
DR STUFF+5~, S1+1*, S1+2*, S1+3*
>> DXPRV CLN, CLN+11
FREQ END+1!
GIEN CLEAN~, CLEAN+3, CLEAN+10, STUFF~, STUFF+2, STUFF+18
>> I CLN+9*
ICD STUFF+4~, STUFF+7*, STUFF+18
ICDNAME CLN+6*, CLN+8, END+1!
>> ICDPTR ICD+8*, ICD+9*, ICD+10, ICD+12, ICD+13, ICD+16, ICD+17, ICD+22, ICD+23, GETNARR+3
, GETNARR+4
ICDTXT STUFF+4~, STUFF+9*
INF STUFF+4~, STUFF+10*
IO NEWAGSEX+4
MOST GETNARR+1!, GETNARR+5*, GETNARR+6*
>> MOSTPNP GETNARR+5*, GETNARR+6*, GETNARR+8
NAME ICD+19, ICD+25, NEWAGSEX+19*, NEWAGSEX+20, CLN+5*, CLN+8, END+1!, GETNARR+10*
>> NARR GETNARR+8*, GETNARR+10
>> NEWDXP FILE+3, NEWAGSEX+2, CLN, CLN+11, END+2
OUTREC CLN+8*, CLN+9*, CLN+10*, CLN+11, CLN+12, END+1!
>> PATH NEWAGSEX+3
PIEN CLEAN~, CLEAN+4, CLEAN+9, STUFF~, STUFF+3, STUFF+18, STUFF+21
>> PNP GETNARR+2*, GETNARR+3*, GETNARR+4, GETNARR+5, GETNARR+6
>> POP NEWAGSEX+3
>> PROVFLG ICD+2*, ICD+3*, CLN+10
PVAL CLN+9*, END+1!
>> QUIET CLN, CLEAN+1
REC CLN+3*, CLN+5, CLN+7, END+1!
RECA CLN+4*, CLN+9, END+1!
SF STUFF+4~, STUFF+17*
SM STUFF+4~, STUFF+16*
STG STUFF~, STUFF+1, STUFF+7, STUFF+8, STUFF+9, STUFF+10, STUFF+11, STUFF+12, STUFF+13, STUFF+14
, STUFF+15, STUFF+16, STUFF+17
T STUFF+4~, STUFF+6*, STUFF+7, STUFF+8, STUFF+9, STUFF+10, STUFF+11, STUFF+12, STUFF+13, STUFF+14
, STUFF+15, STUFF+16, STUFF+17
TF STUFF+4~, STUFF+13*
TM STUFF+4~, STUFF+12*
>> TMP FILE+2, FILE+5, ICD+2, ICD+6, ICD+7, ICD+9, ICD+10, ICD+12, ICD+16, ICD+17
, ICD+19, ICD+21, ICD+22, ICD+23, ICD+25, NEWAGSEX+1, NEWAGSEX+6, NEWAGSEX+14, NEWAGSEX+16, NEWAGSEX+18
, NEWAGSEX+19, NEWAGSEX+20, NEWAGSEX+21*, CLN+2, CLN+3, CLN+4, END+3, GETNARR+3, GETNARR+4
TOT ICD+10*, ICD+11, ICD+17*, ICD+18, ICD+23*, ICD+24, CLN+7*, CLN+10, END+1!
>> TOTPN GETNARR+4*, GETNARR+5, GETNARR+6
TXT STUFF+4~, STUFF+8*
U CLEAN+10, INM+3
UID STUFF+4~, STUFF+18*, STUFF+19
>> VENFLNO NEWAGSEX+1*, NEWAGSEX+3, END+3
VENIO FILE+2~, NEWAGSEX+4*, CLN+12, END+4
X CLEAN+2~, CLEAN+7*, CLEAN+8, CLEAN+9, CLEAN+10, STUFF+5~, STUFF+21*
Y STUFF+5~, STUFF+22, STUFF+23
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