cverbiest

{
    "Frame name": {
        "scope": "abl",
        "prefix": "&FR",
        "body": [
            "{&FRAME-NAME} $1"
        ],
        "description": "Frame name"
    },
    "Global define": {

cverbiest

List forks of repo

List forks of repo, sorted by pushed date

REPO_OWNER= REPO_NAME= curl https://api.github.com/repos/$REPO_OWNER/$REPO_NAME/forks | jq -j '.[] | ."pushed_at", " https://github.com/" + ."full_name", "\n"' | sort

cverbiest

Bitbucket oneliners

get project & repo slug from BitBucket remote

Parse the output of git remote using awk to determine project & repo slugs

git remote -v | awk '/(push)/{ print $2; split($2, ru, "/"); projectslug = ru[4]; reposlug = gensub(/\.git/, "", "g", ru[5]); print projectslug " " reposlug;}'

cverbiest

# Kill all PDSOE AVM processes
# These prowin processes have -wy in the commandline

$Filter = "Name like '%prowin%' and Commandline like '% -wy %' "
Write-Host "Filter $Filter"
Get-WmiObject Win32_Process -Filter "$Filter" |
foreach-object `
-begin { Write-Host 'begin' } `
-process { 
    Write-Host 'Kill' $_.Commandline $_.

cverbiest

Windows Subsystem for Linux (WSL) OpenEdge installation

This document describes the steps need to install Progress OpenEdge on WSL

Prerequisites

• WSL is installed https://docs.microsoft.com/en-us/windows/wsl/install-win10
• Ubuntu 20.04.1 LTS is installed

Steps

cverbiest

#!/bin/bash

set -ue

script=$0
script_dir=${script%/*}
script=${script##*/}
SUFFIX=$(date +%y%m%d.%H%M%S)

export RSYNC_RSH=/usr/bin/ssh

cverbiest

<?xml version="1.0"?>
<project name="Fix_PDSOE" default="build_launcher">
  <taskdef resource="PCT.properties" />

  <property environment="env"/>
  <property name="DLC" value="${env.DLC}" />
  <target name="build_launcher">
    <mkdir dir="build" />
    <mkdir dir="debugListing" />
    <PCTCompile graphicalMode="true" destDir="plugins" dlcHome="${DLC}">

cverbiest

#/bin/bash
# Enhance proshut list, show process info for local processes, needs root access
#
proshut $1 -C list | awk '{ if (NR==1) { procinfo="process info"; } else if ($8 == "REMC" || $9=="REMC") { procinfo="remote process"; } else { procfile="/proc/"$2"/cmdline"; getline procinfo < procfile; procinfo = gensub(/\000/, " ", "g", procinfo); } print $0,procinfo ;}'

cverbiest

# The Protermcap File
#
# This file contains definition entries for Progress supported terminals
# as well as terminal entries that are not supported by Progress. These
# unsupported terminals are provided as a courtesy to our customers because
# it is usually much better to have an unsupported terminal entry than
# no entry at all. If you find you need to use one of these unsupported
# terminal entries, please completely test your application on the terminal
# itself before putting it into production use.
#

cverbiest

&scoped db 
&scoped-define dfin         WZ-DFIN
def var WZ-DFIN as char form "x(65)" init '{&db}.df'.
&scoped-define dfout        WZ-DFOUT
def var WZ-DFOUT as char form "x(65)" init '{&db}area.df'.

update WZ-DFIN WZ-DFOUT.

&scoped csvfile '{&db}area.csv'
&scoped filefield 1