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 |  Label References |  Local Variables  | All
Print Page as PDF
Routine: A1VSLPD1

Package: VistA Package Sizing Utility

Routine: A1VSLPD1


Information

A1VSLPD1 ;Albany FO/GTS - VistA Package Sizing Manager - Caption display APIs; 12-JUL-2016

Source Information

Source file <A1VSLPD1.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 1 ^DIR  
VistA Package Sizing Utility 1 $$YNCHK^A1VSLAPI  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
VistA Package Sizing Utility 1 A1VSLPDC  

Entry Points

Name Comments DBIA/ICR reference
EDITPRFX(DATELEMT,LISTDATA,UPDATLST) ; Update Prefix list
EDITFNUM(DATELEMT,LISTDATA,UPDATLST) ; Update File list
EDITFRNG(DATELEMT,LISTDATA,UPDATLST) ; Update File Range
LSTEDT(EDTELEMT,PCE,DATELEMT,LISTDATA,UPDATLST) ;Edit List dialog
UPDTNODE(UPDIRUT,EDITARY,DATANUM,DATANAME,UPDX,CHNGMADE) ;Update ^TMP("A1VS-PARAM-EDIT") array node
SPLITOUT(DATANAME,LISTDATA) ; -- Split list data to separate lines as needed and output
; DATANAME - Data element name
; LISTDATA - Data element list
BADRNG(X) ;Checks user entered File Range (used by DIR call)
SETSTR(PKGARY) ;Return a string of Package File Lineitem (Concatonate fields to 1 HDR line)
PCEPOS(LISTDATA,DATELEMT) ; Return the piece position number of DATELEMT in LISTDATA

External References

Name Field # of Occurrence
$$YNCHK^A1VSLAPI LSTEDT+3, LSTEDT+6, UPDTNODE+4
^DIR EDITPRFX+8, EDITFNUM+8, EDITFRNG+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"?? ...Element not in list, cannot delete!"
  • Line Location: LSTEDT+5
Function Call: WRITE
  • Prompt: !,"{no data list}"
  • Line Location: SPLITOUT+6
Function Call: WRITE
  • Prompt: !,LISTDATA
  • Line Location: SPLITOUT+8
Function Call: WRITE
  • Prompt: !,$P(LISTDATA,"|",NXSTPCE,PCENUM-1)
  • Line Location: SPLITOUT+13
Function Call: WRITE
  • Prompt: !,$P(LISTDATA,"|",NXSTPCE,999)
  • Line Location: SPLITOUT+14
Routine Call
  • DIR
  • Line Location:
    • EDITPRFX+8
    • EDITFNUM+8
    • EDITFRNG+9

Label References

Name Line Occurrences
$$PCEPOS EDITPRFX+3, EDITFNUM+3, EDITFRNG+3
LSTEDT EDITPRFX+9, EDITFNUM+9, EDITFRNG+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CAPARY SETSTR+4, SETSTR+5, SETSTR+6
CHNGMADE UPDTNODE~, UPDTNODE+1*, UPDTNODE+4*, UPDTNODE+5*
DATANAME UPDTNODE~, UPDTNODE+1, UPDTNODE+3, UPDTNODE+4, UPDTNODE+5, SPLITOUT~, SPLITOUT+5
DATANUM UPDTNODE~, UPDTNODE+1, UPDTNODE+3, UPDTNODE+4, UPDTNODE+5
DATELEMT EDITPRFX~, EDITPRFX+3, EDITPRFX+5, EDITPRFX+9, EDITFNUM~, EDITFNUM+3, EDITFNUM+5, EDITFNUM+9, EDITFRNG~, EDITFRNG+3
, EDITFRNG+5, EDITFRNG+10, LSTEDT~, LSTEDT+3, LSTEDT+5, PCEPOS~, PCEPOS+2
DELIMPOS PCEPOS+1~
DIR EDITPRFX+1~, EDITFNUM+1~, EDITFRNG+1~
DIR("?" EDITPRFX+6*, EDITFNUM+6*, EDITFRNG+6*, EDITFRNG+7*
DIR("A" EDITPRFX+4*, EDITFNUM+4*, EDITFRNG+4*
DIR("B" EDITPRFX+5*, EDITFNUM+5*, EDITFRNG+5*
DIR(0 EDITPRFX+7*, EDITFNUM+7*, EDITFRNG+8*
DIRUT EDITPRFX+1~, EDITFNUM+1~, EDITFRNG+1~
DTOUT EDITPRFX+1~, EDITFNUM+1~, EDITFRNG+1~
DUOUT EDITPRFX+1~, EDITFNUM+1~, EDITFRNG+1~
EDITARY UPDTNODE~, UPDTNODE+1, UPDTNODE+3, UPDTNODE+4, UPDTNODE+5
EDTELEMT EDITPRFX+1~, EDITFNUM+1~, EDITFRNG+1~, LSTEDT~, LSTEDT+1, LSTEDT+2, LSTEDT+5*, LSTEDT+6
FLD SETSTR+1~, SETSTR+5*, SETSTR+6
ITEM PCEPOS+1~, PCEPOS+2*
LINE SPLITOUT+4~, SPLITOUT+10*
LINEITM SETSTR+1~, SETSTR+2*, SETSTR+6*, SETSTR+7
LISTDATA EDITPRFX~, EDITPRFX+3, EDITPRFX+9, EDITFNUM~, EDITFNUM+3, EDITFNUM+9, EDITFRNG~, EDITFRNG+3, EDITFRNG+10, LSTEDT~
, LSTEDT+1*, LSTEDT+3*, LSTEDT+6*, SPLITOUT~, SPLITOUT+6, SPLITOUT+7, SPLITOUT+8, SPLITOUT+9, SPLITOUT+12, SPLITOUT+13
, SPLITOUT+14, PCEPOS~, PCEPOS+2
LISTPCE SPLITOUT+4~, SPLITOUT+12*
LPCNT SETSTR+1~, SETSTR+3*, SETSTR+4*, SETSTR+5, SETSTR+6
NXSTPCE SPLITOUT+4~, SPLITOUT+11*, SPLITOUT+13*, SPLITOUT+14
PCE EDITPRFX+1~, EDITPRFX+2*, EDITPRFX+3*, EDITPRFX+9, EDITFNUM+1~, EDITFNUM+2*, EDITFNUM+3*, EDITFNUM+9, EDITFRNG+1~, EDITFRNG+2*
, EDITFRNG+3*, EDITFRNG+10, LSTEDT~, LSTEDT+1, LSTEDT+2, LSTEDT+4, PCEPOS+1~, PCEPOS+2*, PCEPOS+3
PCENUM SPLITOUT+4~, SPLITOUT+12*, SPLITOUT+13
PKGARY SETSTR~
>> RESULT BADRNG+1*, BADRNG+2*, BADRNG+3
UPDATLST EDITPRFX~, EDITPRFX+9, EDITFNUM~, EDITFNUM+9, EDITFRNG~, EDITFRNG+10, LSTEDT~, LSTEDT+1*, LSTEDT+3*, LSTEDT+6*
UPDIRUT UPDTNODE~, UPDTNODE+1, UPDTNODE+2
UPDX UPDTNODE~, UPDTNODE+1, UPDTNODE+3, UPDTNODE+5
X EDITPRFX+1~, EDITPRFX+9, EDITFNUM+9, EDITFRNG+10, BADRNG~, BADRNG+2
Y EDITPRFX+1~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Label References |  Local Variables  | All