Routine: VENPCCK1

Information

VENPCCK1 ; IHS/OIT/GIS - KNOWLEDGE BASE ;

Source Information

Source file <VENPCCK1.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA Fileman	5	^DIC YN^DICN ^DIE ^DIK ^DIR
IHS VA Utilities	1	^XBFMK
M Transfer	1	DATA^BMXADOV1

Entry Points

Name	Comments	DBIA/ICR reference
AGE	; EP - DIALOGUE FOR AGE-SEX SPECIFIC ITEMS
CAT	; EP - GET THE KB CATEGORY
KBT1(OUT,IN)	; EP - RPC: VEN PCC+ GET KB TEMPLATES
ADD(CIEN)	; EP - ADD A NEW ITEM
M1
TREM(OUT,IN)	; EP - REMOVE A KB FROM ONE OR MORE TEMPLATES
EDIT(DA)	; EP - EDIT AN ITEM
NKBT(KGIEN,IENS,MAX,OUT,TOT)	; EP - RETURN A LIST OF TEMPLATES THAT ARE NOT ASSOCIATED WITH A KB GROUP
TAX(OUT,IN)	; EP - RPC: VEN PCC+ KB TAXONOMY
ITAX(PARAM,IENS,MAX,OUT,TOT)	; EP - RETURN A LIST OF TEMPLATES ASSOCIATED WITH A KB GROUP
KBT3(OUT,IN)	; EP-ASSOCIATE KB GROUP WITH TEMPLATES
KBT2(OUT,IN)	; EP - RPC: VEN PCC+ GET NON KB TEMPLATES
ITEM(CIEN)	; EP - ENTER/EDIT ITEMS FOR A SPECIFIC CATEGORY
TADD(OUT,IN)	; EP - ADD A KB TO ONE OR MORE TEMPLATES
KBG(OUT,IN)	; EP - RPC: VEN PCC+ GET KB GROUPS
FKBT(KGIEN,IENS,MAX,OUT,TOT)	; EP - RETURN A LIST OF TEMPLATES ASSOCIATED WITH A KB GROUP
KBI(OUT,IN)	; EP-SUBMIT KB GROUP AND RETURN ALL THE ITEMS IN A TABLE
MENU	; EDIT OPTION
FKBTX	; FILTERS
LOOKUP
LOOP
DELETE

External References

Name	Field # of Occurrence
DATA^BMXADOV1	FKBTX+9
^DIC	CAT+4, LOOKUP+6, ADD+4, TADD+13, KBI+8, KBT3+10
YN^DICN	M1+9, DELETE+1
^DIE	EDIT+6, EDIT+9
^DIK	M1+11, M1+13, DELETE+3, EDIT+11, TREM+11
^DIR	M1+4, LOOP+5
^XBFMK	CAT+4, M1+6, M1+15, LOOP+6, LOOKUP+6, EDIT+12, TADD+15, TREM+13, KBI+11, KBT3+12

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"What do you want to do next ->" Line Location: M1+0
Function Call: WRITE	Prompt: !,?3,"1. Add or edit items in this category." Line Location: M1+1
Function Call: WRITE	Prompt: !,?3,"2. Delete this KB category." Line Location: M1+2
Function Call: WRITE	Prompt: !,?3,"3. Quit." Line Location: M1+3
Function Call: WRITE	Prompt: !!,"This will DELETE the category and all items associated with it!!!" Line Location: M1+7
Function Call: WRITE	Prompt: !,"Are you sure you want to do this" Line Location: M1+8
Function Call: WRITE	Prompt: ! Line Location: M1+10
Function Call: WRITE	Prompt: !," * CATEGORY DELETED *" Line Location: M1+14
Function Call: WRITE	Prompt: !!,"What do you want to do next ->" Line Location: LOOP+0
Function Call: WRITE	Prompt: !,?3,"1. Add an item" Line Location: LOOP+1
Function Call: WRITE	Prompt: !,?3,"2. Edit an existing item" Line Location: LOOP+2
Function Call: WRITE	Prompt: !,?3,"3. Delete an item" Line Location: LOOP+3
Function Call: WRITE	Prompt: !,?3,"4. Quit" Line Location: LOOP+4
Function Call: WRITE	Prompt: !,"Are you sure you want to delete the item" Line Location: DELETE+0
Function Call: WRITE	Prompt: ! Line Location: DELETE+2
Function Call: WRITE	Prompt: !," * ITEM DELETED *",! Line Location: DELETE+4
Function Call: WRITE	Prompt: KB Line Location: KBT1+2
Function Call: WRITE	Prompt: KB Line Location: KBT2+2
Routine Call	DIE Line Location: EDIT+6 EDIT+9
Routine Call	DIC Line Location: CAT+4 LOOKUP+6 ADD+4 TADD+13 KBI+8 KBT3+10
Routine Call	DIR Line Location: M1+4 LOOP+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VEN(7.11 - [#19707.11]	Classic Fileman Calls
^VEN(7.12 - [#19707.12]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	ITAX+6
^ATXAX("B"	ITAX+3, ITAX+5
^VEN(7.11 - [#19707.11]	ITEM+2, TADD+4, TREM+4, KBI+4, FKBTX+2, KBT3+2
^VEN(7.12 - [#19707.12]	M1+13, EDIT+7, EDIT+11
^VEN(7.41 - [#19707.41]	TADD+11, TREM+8, TREM+10, FKBTX+4, FKBTX+6, FKBTX+7, FKBTX+8, KBT3+8

Label References

Name	Line Occurrences
$$ADD	LOOP+9
CAT	AGE+3
EDIT	LOOP+9, LOOKUP+8
FKBTX	FKBT+2, NKBT+2
ITEM	MENU+2, M1+5
LOOP	LOOP+9, LOOKUP+6, LOOKUP+8, DELETE+5
M1	M1+10, DELETE+2

Naked Globals

Name	Field # of Occurrence
^(0	EDIT+11

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	CAT+1~, M1+9, M1+10, ITEM+1~, LOOKUP+3, LOOKUP+4, LOOKUP+5, DELETE+1, DELETE+2, EDIT+1~ , ADD+1~, TADD+3~, TREM+3~
%Y	CAT+1~
AGE	AGE+1~, AGE+2*, ITEM+2, LOOKUP+4, EDIT+4
CIEN	CAT+1~, MENU+1*, MENU+2, M1+5, M1+11, M1+13, ITEM~, ITEM+2, LOOP+9, ADD~ , ADD+3
DA	CAT+1~, M1+11, M1+12, M1+13, ITEM+1~, DELETE+3, EDIT~, EDIT+7, EDIT+11, TADD+3~ , TREM+3~, TREM+10, KBI+3~, ITAX+1~, ITAX+4, ITAX+5, ITAX+6, FKBTX+1~, FKBTX+5, FKBTX+6* , FKBTX+7, FKBTX+8, FKBTX+9, KBT3+1~
DA(1	TADD+10, TADD+11, TADD+12, TREM+7, TREM+8, TREM+9, TREM+10, KBT3+6*, KBT3+8, KBT3+9
DIC	CAT+1~, CAT+3, ITEM+1~, LOOKUP, LOOKUP+7!, ADD+1~, ADD+2, TADD+3~, TADD+12, KBI+3~ , KBI+6, KBT3+1~, KBT3+9
DIC("A"	CAT+2, LOOKUP+1
DIC("P"	TADD+6, KBT3+3
DIC("S"	LOOKUP+2*
DIC("W"	LOOKUP+5*
DIC(0	CAT+3, LOOKUP, ADD+2, TADD+5, KBT3+3*
DIE	EDIT+1~, EDIT+2*
DIK	CAT+1~, M1+11, M1+12, ITEM+1~, DELETE+3, EDIT+11, TREM+3~, TREM+9*
DIR	CAT+1~, ITEM+1~
DIR("A"	M1+4, LOOP+5
DIR("B"	M1+4, LOOP+5
DIR(0	M1+4, LOOP+5
>> DLAYGO	CAT+3, ADD+2, TADD+5, KBI+7, KBT3+3*
>> DOC(0	KBI+6*
DR	EDIT+1~, EDIT+3, EDIT+5, EDIT+8*
FLAG	ITEM+1~, LOOP+7, LOOP+8, LOOP+9*, LOOKUP+8
IENS	ITAX~, FKBT~, NKBT~, FKBTX+9
IIEN	CAT+1~, LOOP+9, LOOKUP+7, DELETE+3
IN	TADD~, TADD+2, TADD+4, TADD+8, TREM~, TREM+2, TREM+4, TREM+5, KBG~, KBI~ , KBI+2, KBI+4, KBI+7, TAX~, KBT1~, KBT1+1, KBT1+2, KBT2~, KBT2+1, KBT2+2 , KBT3~, KBT3+2, KBT3+4
KB	KBT3+1~, KBT3+2*, KBT3+7
KGIEN	KBI+3~, KBI+4, KBI+5, KBI+9, KBI+12, KBI+13, FKBT~, NKBT~, FKBTX+2, FKBTX+7 , FKBTX+8
KIEN	TADD+3~, TADD+4, TADD+7, TREM+3~, TREM+4, TREM+10, KBI+3~
LEN	TADD+3~, TADD+8, TADD+9, TREM+3~, TREM+5, TREM+6
MAX	ITAX~, FKBT~, NKBT~
MODE	FKBT+1~, NKBT+1~, FKBTX+7, FKBTX+8
NAME	ITAX+1~, ITAX+2, ITAX+3, ITAX+5, FKBTX+1~, FKBTX+3, FKBTX+4, FKBTX+6
OUT	TADD~, TADD+1, TADD+16, TREM~, TREM+1, TREM+14, KBG~, KBG+1, KBI~, KBI+1 , KBI+13, TAX~, TAX+1, KBT1~, KBT1+1, KBT1+2, KBT2~, KBT2+1, KBT2+2, ITAX~ , FKBT~, NKBT~, KBT3~, KBT3+12*
PARAM	ITAX~
PCE	TADD+3~, TADD+9, TADD+10, TREM+3~, TREM+6, TREM+7, KBT3+1~, KBT3+5*, KBT3+6
STG	ITAX+1~, FKBTX+1~, KBT3+1~, KBT3+4*, KBT3+5, KBT3+6
TIEN	TADD+3~, TREM+3~
TOT	ITAX~, FKBT~, NKBT~
TSTG	TADD+3~, TADD+8, TADD+10, TREM+3~, TREM+5, TREM+7
TUNIT	ITEM+1~, ITEM+2*
U	MENU+2, ITEM+2, EDIT+7, EDIT+11, ITAX+6
X	CAT+1~, ITEM+1~, EDIT+1~, ADD+1~, ADD+3, TADD+3~, TADD+7, TREM+3~, KBI+3~, KBI+7* , KBT3+1~, KBT3+7*
Y	CAT+1~, CAT+4, MENU+1, MENU+2, M1+5, M1+6, M1+7, ITEM+1~, LOOP+6, LOOP+7 , LOOP+8, LOOP+9, LOOKUP+6, LOOKUP+7, EDIT+1~, ADD+1~, ADD+5, ADD+6, TADD+3~, TADD+13 , TREM+3~, TREM+11, KBI+8, KBI+9, KBT3+1~
Z	CAT+1~, ITEM+1~, EDIT+1~

Customize PDF page

Package: PCC New Encounter Form

Routine: VENPCCK1

Call Graph Total: 7