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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: VENPCCK1

Package: PCC New Encounter Form

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~
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All