Rick Martin's template to add all fields to a view

Owned by David Harms
Last updated: Apr 25, 2013Version comment
1 min read

This template is handy for TPS to SQL conversions where you are not sure all the fields actually used in the procedure got added to the hot fields.

UP_SQL_ProjectAllFields.tpw
#EXTENSION (SQLProjectALLFieldsBrowse, 'Project all fields in view tables for SQL Browse'),REQ(BrowseBox(ABC))
#!
#ATSTART 
  #FIX(%File,%Primary)
  #INSERT(%SQLProjectALLFields)
  #FOR(%Secondary)
    #FIX(%File,%Secondary)
    #INSERT(%SQLProjectALLFields)
  #ENDFOR
#ENDAT  
#!
#GROUP(%SQLProjectALLFields)
  #FOR(%Field)
    #SET(%ValueConstruct,%Field)
    #INSERT(%CleanDimensions(ABC))
    #IF(~INLIST(%ValueConstruct,%QueueField))
      #ADD(%QueueField,%ValueConstruct)
      #SET(%QueueFieldAssignment,%Field)
      #SET(%QueueFieldComment,'Force all fields')
    #ENDIF
  #ENDFOR