Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

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

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
Info |  Source |  Entry Points |  Interaction Calls